Изменить цвет текста.

WolfCF

В memo вводится текст,как изменить его цвет? я написал процедуру
procedure TForm1.N4Click(Sender: TObject);
begin
if ColorDialog1.Execute then Memo1.Color:=ColorDialog1.Color;
end;
но она меняет цвет фона.
2 ответа

WolfCF

Попробуй так:
 procedure TForm1.N4Click(Sender: TObject);
begin
if ColorDialog1.Execute then Memo1.Font.Color:=ColorDialog1.Color;
end;


WolfCF

Ztrel, получилось Спасибо!