Variable als Zeiger?

[neomic]

Aktuell habe ich eine (recht) einfache Möglichkeit gefunden:

Alles spielt sich jetzt eigentlich nur in der zweiten for-Schleife ab:

Delphi-Quellcode:

procedure TSteuerung.Aufraeumen();
var i,h,j:Integer;
begin
        for i:=0 to 3 do
        for h:=0 to (Length(hAuto[i])-1) do
        begin
                if hAuto[i][h].IstAusDemBild then
                begin
                        // Auto zerstören
                        hAuto[i][h].Destroy;

                        // Array Indizes verschieben und Array verkürzen
                        for j:=h to (Length(hAuto[i])-2) do hAuto[i][j]:=hAuto[i][j+1];
                        SetLength(hAuto[i],Length(hAuto[i])-2);

                        // Vordermann löschen
                        if h>0 then hAuto[i][h-1].SetzeAuto(nil);
                end;
        end;
end;

Der Code müsste von der Logik her richtig sein, aber ich bekomme nen RangeCheck Error (keine AV mehr *juhu*)

Einer ne Idee?