Форум: "Основная";
Поиск по всему сайту: 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
7-100074          Win                   2001-10-19 16:19  2002.01.31  
Как прогу скопировать7


14-100058         Seery                 2001-12-05 11:12  2002.01.31  
Бездарность


4-100120          Crafox                2001-12-04 19:51  2002.01.31  
Блокировка сочетаний типа Win+M и т.п.


14-100044         lel                   2001-12-05 10:14  2002.01.31  
Способность добиваться успеха...


1-100001          bill                  2002-01-15 09:36  2002.01.31  
считывание дос файла построчно в ListBox