Beliebig viele Komponenten zur Laufzeit erstellen

[SirThornberry]

ganz einfach:

Delphi-Quellcode:

private
  meineLabels: Array of TLabel;
[...]
var
  lCount: Integer;
begin
  SetLength(meineLabels, 10);
  for lCount := 0 to Length(meineLabels) - 1 do
  begin
    meineLabels[lCount]          := TLabel.Create(Self);
    meineLabels[lCount].Parent   := Self;
    meineLabels[lCount].Caption  := 'Label Nummer: ' + IntToStr(lCount + 1);
    meineLabels[lCount].Left     := lCount * 50;
  end;

Die schleife demonstriert erstellen + Zugreifen in einem. Nach gebrauch natürlich das Freigeben nicht vergessen.