viele ähnliche Befehle zusammenfassen

[Hador]

Für soetwas würde ich die n Label in ein Array packen und dynamisch erzeugen, ober aber automatisch erzeugen lassen und dann in ein array schreiben (das kannst du dann wiederum mit findcomponents bzw. Panel1.Components machen).

Dynamisch erzeugen:

Delphi-Quellcode:

type 
  Form1 = class(Tform)
    [...]
    Label : array[1..20] of TLabel;

[...]

  for i:=1 to 20 do
    Label[i] := TLabel.Create(Self);
  // Dann noch Parent zuweisen und positionieren
  for i:=1 to 20 do
    Label[i].Caption := 'Hallo ' + IntToStr(i);
[...]