Dynamisches Array

[DeddyH]

Das funktioniert nicht?

Delphi-Quellcode:

type TKartenArray = Array of TKarte;

var
KartenGezogen : TKartenArray;

implementation

procedure cardToArray(karte:TKarte; var KartenArray:TKartenArray);
var laenge:integer;
begin
  laenge:=length(KartenArray);
  setLength(KartenArray, laenge+1);
  KartenArray[laenge]:=karte;
end;