Einzelnen Beitrag anzeigen

Benutzerbild von Jelly
Jelly

Registriert seit: 11. Apr 2003
Ort: Moestroff (Luxemburg)
3.741 Beiträge
 
Delphi 2007 Professional
 
#2

Re: Farbe aller Labels ändern

  Alt 26. Jul 2004, 12:21
Hi,

so kannst du zumindest mal alle Labels finden:
Delphi-Quellcode:
var
 i : integer ;
begin
     for i := 0 to componentcount-1 do begin
        if components[i] is TLabel
        then with components[i] as TLabel do begin
           font.color := clRed ;
        end ;
     end ;
end;
Gruß,
Tom
  Mit Zitat antworten Zitat