Zitat von
Andreas L.:
Falls die Labels alle auf der selben Komponente liegen (Form, Panel, etc.) gehts auch so:
Delphi-Quellcode:
var
i: Integer;
begin
for i := 0 to ComponentCount -1 do
begin
if Components[i] is TLabel then
(components[i] as TLabel).Text := 'blubb';
end;
end;
Wenn Du den Typ schon mit "is" geprüft hast, kannst Du Dir das anschließende "as" sparen. Und der Code geht in Ordnung, wenn es alle Labels betrifft, ansonsten geht das so nicht.