Komponenten-Array zur Laufzeit erstellen

[Uwe Raabe]

Der Fehler liegt hier:

Delphi-Quellcode:

   
SetLength(Zeile,Anzahl);
Zeile[Anzahl]:=TZeile.Create(Form1);

besser so:

Delphi-Quellcode:

   
SetLength(Zeile,Anzahl);
Zeile[Anzahl-1]:=TZeile.Create(Form1);

Desgleichen hier:

Delphi-Quellcode:

      
Zeile[Anzahl-1].Free;
Dec(Anzahl);