Форум: "Основная";
Текущий архив: 2002.07.01;
Скачать: [xml.tar.bz2];
Внизкак в ReachEdit разукрасить строки, сделать жирным? Найти похожие ветки
← →
volph (2002-06-19 12:15) [0]как в ReachEdit разукрасить строки? дайте конкретный пример
← →
Игорь Шевченко (2002-06-19 12:26) [1]Program Files/Borland/Delphi/Demos
← →
DeMoN-777 (2002-06-19 12:26) [2]Извиняй пример писать некогда, но на водку ;) дать могу:
RichEdit1.SelAttributes+F1
← →
DeMoN-777 (2002-06-19 12:35) [3]Больше никак не успеваю,
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;
Удачи.
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.07.01;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.006 c