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