Hallo,
abgesehen von der Identifizierung der Labels über ihren Komponentennamen gibt es noch andere Möglichkeiten. Du kannst die Labels an ihrem Tag-Value erkennen und über ihren Owner besuchen - oder vielleicht haben alle relevanten Labels einen gemeinsamen Parent:
Delphi-Quellcode:
procedure SetCaptionOfLabels(aParent: TWinControl; aCaption: string);
var
i: Integer;
begin
for i := 0 to Pred(aParent.ControlCount) do
if aParent.Controls[i] is TLabel then
with aParent.Controls[i] as TLabel do
Caption := aCaption;
end;
procedure TDemoForm.ButtonClick(Sender: TObject);
begin
SetCaptionOfLabels(Panel, 'abc');
end;
Grüße vom marabu