Einzelnen Beitrag anzeigen

Benutzerbild von faux
faux

Registriert seit: 18. Apr 2004
Ort: Linz
2.044 Beiträge
 
Turbo Delphi für Win32
 
#5

Re: Bei dyn. erzeugten Labels die Text Farbe ändern

  Alt 23. Nov 2005, 16:08
Hallo!

Die Eigenschaft Delphi-Referenz durchsuchenControls des Parent-Objekts und die Eigenschaft Delphi-Referenz durchsuchenTag der Labeles können dir behilflich sein.

Beispiel um alle Labels mit Tag=1 scharz zu färben (musst du halt anpassen):
Delphi-Quellcode:
for i := 0 to Panel1.ControlCount - 1 do
  if Panel1.Controls[i] is TLabel then
    if (Panel1.Controls[i] as TLabel).Tag = 1 then
      (Panel1.Controls[i] as TLabel).Font.Color := clBlack;
Grüße
Faux
Faux Manuel
Wer weiß, dass er nichts weiß, weiß mehr, als der der nicht weiß, dass er nichts weiß.
GoTrillian
  Mit Zitat antworten Zitat