| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
как в ReachEdit разукрасить строки, сделать жирным?
volph © (2002-06-19 12:15:00)как в ReachEdit разукрасить строки? дайте конкретный пример
DeMoN-777 (2002-06-19 12:35:00) [1]Больше никак не успеваю,
procedure TForm1.Button1Click(Sender: TObject);
begin
with RichEdit1.SelAttributes do
begin
Color := clRed;
Height := Height + 5;
end;
RichEdit1.Lines.Add("This line of text will be red.");
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
RichEdit1.DefAttributes.Color := clBlue;
RichEdit1.DefAttributes.Style := [fsBold, fsItalic];
end;
Удачи.
Игорь Шевченко (2002-06-19 12:26:00) [2]Program Files/Borland/Delphi/Demos
DeMoN-777 (2002-06-19 12:26:00) [3]Извиняй пример писать некогда, но на водку ;) дать могу:
RichEdit1.SelAttributes+F1
| |
