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);

RichEditControl Найти похожие ветки