Viele Labels, viel Code?

[gordon freeman]

Delphi-Quellcode:

var
meineLabels : array[1..10] of TLabel; //fixe Größe
meineLabelsdyn : array[1..10] of TLabel; //dynamische Größe

//füllen (fix)
meineLabels[1] := label1;

//füllen (dyn)
setlength(meinelabelsdyn,length(meineLabelsDyn)+1); //array um 1 verlängern.
meineLabelsDyn[high(meineLabelsDyn)] := labelX; //Das neu angefügte Element füllen
...