Hallo,
ich versuche gerade aus einem dynamischen Array ein Element zu löschen.
Dabei halte ich mich an dieses Beispiel:
Delphi-Quellcode:
type
TIntArray = array of Integer;
procedure DeleteArrayElement(var AArray: TIntArray; const AIndex: Integer);
var
i: Integer;
begin
Move(AArray[AIndex + 1], AArray[AIndex], SizeOf(AArray[0]) * (Length(AArray) - AIndex - 1)); //Dahinterliegende Daten aufrücken
SetLength(AArray, Length(AArray) - 1); // Länge kürzen
end;
Nun habe ich aber:
Delphi-Quellcode:
type
TIntArray = array of array of Integer;
Wenn nun SetLength aufgrufen wird crashed es. Ich komme nicht drauf...