Alle Komponenten einer Application ändern

[Michael Habbe]

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?