Показать сообщение отдельно
  #4  
Старый 26.11.2011, 18:55
m1sclick m1sclick вне форума
Начинающий
 
Регистрация: 04.07.2011
Адрес: Украина
Сообщения: 186
Версия Delphi: 2010
Репутация: 2094
По умолчанию

PHP код:
procedure TForm1.BlackColorButton(SenderTObject);
begin
  Memo1
.Font.Color:= clWindowText;
end;

procedure TForm1.GreenColorButton(SenderTObject);
begin
  Memo1
.Font.Color:=clLime;
end

Смекаешь?
Ответить с цитированием