Einzelnen Beitrag anzeigen

Benutzerbild von Michael Habbe
Michael Habbe

Registriert seit: 10. Aug 2005
264 Beiträge
 
Turbo Delphi für Win32
 
#4

Re: Alle Komponenten einer Application ändern

  Alt 27. Jul 2006, 23:17
Zitat von Dragon27:
Ich würde aber gerne alle Labels Programmweit umstellen. Geht das?
Bei über 23 Formen wird das unübersichtlich jedes einzeln aufzurufen.
Tja, Du wirst nicht drumrum kommen, diese Funktion für jedes Formular umzusetzen. Mir ist keine Funktion bekannt, wo man als Ergebnis die Namen der kreierten Formulare in z.B. einer StringList zurückbekommt.

Am besten im FormCreate für jedes Formular:
Delphi-Quellcode:
  for I := 0 to ComponentCount-1 do
    if Components(I) is TLabel then
      TLabel(Components(I)).Font.Color := frmMain.myLabelColor; // als Property
edit: Da schon wieder:
Zitat von Florian Bernd:
//Edit: Kein roter Kasten
Was ist der rote Kasten?
  Mit Zitat antworten Zitat