Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.31;
Скачать: [xml.tar.bz2];



Вниз

RichEditControl 

Илья   (2002-01-15 09:48) [0]

У меня в форме есть компонента RichEditControl, в котором
находится текст. Предположим, что курсор находится где-то посередине этого
текста и пользователь что-то пишет. Так вот, мне надо узнать текущее положение
курсора в компоненте относительно начала, то есть сколько символов находится
перед курсором, причем функция должна работать очень быстро... как это сделать
средствами делфи я без понятия... Нигде в хелпах не нашел.. Сеньксы заранее.

---

MBo   (2002-01-15 10:06) [1]

это просто SelStart, а если отбрасывать переводы строк, то будет так
var
LineNum: integer;
begin
LineNum := SendMessage(re1.Handle, EM_LINEFROMCHAR, re1.SelStart, 0);
Label1.Caption :=IntToStr(re1.SelStart-2*LineNum);

---

Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.31;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.71 MB
Время: 0.016 c