Mehrdimensionales dynamisches Array, Element löschen

[mleyen]

Doh, ja TList wär echt die bessere Wahl.
Bzw:

Delphi-Quellcode:

type
  TIntArray = array of Integer;
  PIntArr = ^TIntArray;
  TIntArrayArray = array of PIntArr;
  
  procedure DeleteArrayElement(var AArray: TIntArrayArray; const AIndex: Integer);
  begin        
    Dispose(AArray[AIndex]);
    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;