Hi!
pack doch deine Labels auf ein Panel
und arbeite dies durch:
etwa so:
Delphi-Quellcode:
var
i: integer;
begin
for i:= 0 to Panel1.ControlCount-1 do
If Panel1.Controls[i] is TLabel then
with Panel1.Controls[i] as TLabel do
begin
Caption:= 'Hier die geänderte Caption';
end;
Hier kannst du ganz gezielt nur die Labels
verändern, die du auf dem Panel platziert hast.
Wenn du es nur mit bestimmten machen willst, könntst
du den .Tag bei den Labels beschreiben und
dann noch eine If-Abfrage einfügen, etwa so:
Delphi-Quellcode:
var
i: integer;
begin
for i:= 0 to Panel1.ControlCount-1 do
If Panel1.Controls[i] is TLabel then
with Panel1.Controls[i] as TLabel do
begin
If Tag = 1 then
Caption:= 'Hier die geänderte Caption';
end;
Gruß
Pfoto