Форум: "Начинающим";
Текущий архив: 2005.10.09;
Скачать: [xml.tar.bz2];
ВнизКак выделить строку в РичЭдите при опр условиях? Найти похожие ветки
← →
Ксардас © (2005-09-03 12:19) [0]Пробовал так:
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 13:23) [1]SelAttributes
← →
Наиль © (2005-09-03 18:37) [2]SelStart+SelLength+[1]
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2005.10.09;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.022 c