SelStart в RichEdit [D7, WinXP]
Antonmm © (2004-07-31 11:32:00)
Как сделать так, чтобы RichEdit.SelStart в каждой строке
RichEdit начинался с 0 или с 1?
Кириешки (2004-07-31 12:07:00) [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;
работает только тогода, если строка уникальная
Наверх 
ЧАТ |
Орешник |
|
