SelStart в RichEdit

← →
Antonmm (2004-07-31 11:32) [0]

Как сделать так, чтобы RichEdit.SelStart в каждой строке RichEdit начинался с 0 или с 1?

← →
Кириешки © (2004-07-31 12:07) [1]

Надо использовать не SelStart a CaretPos но работает только в D6

var
p: TPoint;
begin
p.X := 0;
p.Y := 4;
RichEdit.CaretPos := p; //
RichEdit.SelLen := Length(RichEdit.Lines[4]);
end.

Можно вот так, но
with richedit1 do begin
selstart:=FindText(lines[3],0,length(text), [stWholeWord]);
sellength:=length(lines[3]);
selattributes.color:=clBlue;
end;
работает только тогода, если строка уникальная

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