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;