Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.11.07;
Скачать: CL | DM;

Вниз

Шрифт MessageBox’ов и InputBox’ов   Найти похожие ветки 

 
Dr. Genius   (2004-10-20 21:23) [0]

В настройках моей программы я хочу сделать так, чтобы можно было изменять шрифт программы. Но изменяется только шрифт форм. Я же хочу, чтобы изменился шрифт всего приложения, а в частности шрифт MessageBox’ов и InputBox’ов. Как это можно реализовать?


 
KilkennyCat ©   (2004-10-20 21:34) [1]

сделать свои боксы.


 
GuAV ©   (2004-10-20 23:38) [2]


> сделать свои боксы.

проще всего их сделать на базе стандартных.
procedure TForm1.Button1Click(Sender: TObject);
var Result: Integer;
begin
 with CreateMessageDialog("zzzzzzzz", mtInformation, [mbOK, mbCancel]) do
 try
   Font.Assign(Form1.Font);
   Result:=ShowModal;
 finally
   Free;
 end;
end;



Страницы: 1 вся ветка

Текущий архив: 2004.11.07;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.061 c
1-1098474867
GanibalLector
2004-10-22 23:54
2004.11.07
странности...


1-1098842604
vovanx
2004-10-27 06:03
2004.11.07
Перенос проектов из Delphi 5 в Delphi 7


1-1098418745
Fynjy1984
2004-10-22 08:19
2004.11.07
Установка EhLib


14-1097815067
MBo
2004-10-15 08:37
2004.11.07
Пятница - время поломать голову над непростыми задачками.


6-1093878441
zlo_inside
2004-08-30 19:07
2004.11.07
монитор портов