Показать сообщение отдельно
  #2  
Старый 06.12.2012, 23:13
Аватар для YVitaliy
YVitaliy YVitaliy вне форума
Местный
 
Регистрация: 14.12.2011
Сообщения: 481
Версия Delphi: Borland Delphi7
Репутация: 17
По умолчанию

Изменяй перед вызовом диалога
Код:
fontdialog1.Font.Name:='Times New Roman';
if fontdialog1.Execute then
begin
Ответить с цитированием