![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как выделить строку в РичЭдите при опр условиях?
Ксардас © (2005-09-03 12:19:00)Пробовал так:
procedure TForm1.Button1Click(Sender: TObject);Но закрашивается весь текс.Подскажите почему плиз...
begin
for a:=1 to 30 do begin
Richedit1.Font.Color:=clblack ;
if a mod 3=0 then Richedit1.Font.Color:=clred;
Richedit1.Text:=Richedit1.Text+inttostr(a)+#13#10;
end;
end;
Наиль (2005-09-03 18:37:00) [1]SelStart+SelLength+[1]
Плохиш (2005-09-03 13:23:00) [2]SelAttributes