Oder einfach eine Funktion basteln, die mir die Labels übergibt.
Damit bist du unabhängig von der Namensgebung deiner Labels und kannst gezielt nur die Labels ansprechen, die wirklich benötigt werden, wenn noch mehr Label auf deiner Form vorhanden sind.
Delphi-Quellcode:
Function TForm1.GetLabel(aIndex:Integer):TLabel;
begin
case aIndex
of
1:Result := Label1;
2:Result := Label2;
3:Result := LabelXYZ;
4:Result := Labelqqq;
5:Result := LabelWasWeisIch;
else
Result :=
nil;
// Oder eine Exception
end;
end;