Thema: Delphi Font für alle Forms

Einzelnen Beitrag anzeigen

Benutzerbild von Pseudemys Nelsoni
Pseudemys Nelsoni

Registriert seit: 24. Dez 2002
Ort: Hamburg-Harburg
3.551 Beiträge
 
#1

Font für alle Forms

  Alt 6. Apr 2003, 14:14
moin

ich habe ein Fontdialog in meinem "programm" eingebaut, wie ich die fonts jedes einzelnen objects änder weiss ich, hab ich aber nicht die möglichkeit alle forms und somit die darauf liegenden komps mit einem befehl die schriftart zu geben? ich meine....

Delphi-Quellcode:
    Form1.Font.Name := settings.ReadString('font', 'font', '');
    GroupBox1.Font.Name := settings.ReadString('font', 'font', '');
    GroupBox2.Font.Name := settings.ReadString('font', 'font', '');
    GroupBox3.Font.Name := settings.ReadString('font', 'font', '');
    Memo1.Font.Name := settings.ReadString('font', 'font', '');
    ListBox1.Font.Name := settings.ReadString('font', 'font', '');
    Edit1.Font.Name := settings.ReadString('font', 'font', '');

da sind noch 46245 mehr komponenten auf den forms...muss ich jetzt für jede, extra schreiben?

mfg silent
Mario
  Mit Zitat antworten Zitat