dyn. Array verkürzen

[Gargamel]

Hi

Wenn ich einem dyn. Array eine Länge zuweise, die Elemente mit Werten fülle und danach das Array mit setLength(...) verkürze, sind die obersten Elemente trotzdem verfügbar. Das verstehe ich nicht. Kann mir das jemand erklären?

Danke.

Hier in dem Codebeispiel ist es ein Array aus 5 Elementen, welches dann auf 3 gekürzt wird.

Delphi-Quellcode:

var liste:array of integer;
    i:integer;
begin
  setLength(liste, 5);

  liste[0]:=0;
  liste[1]:=1;
  liste[2]:=2;
  liste[3]:=3;
  liste[4]:=4;

  for i:=0 to 4 do
    ListBox1.Items.Add(IntToStr(liste[i]));
  Listbox1.Items.Add('Schleifenende');

  setLength(liste, 3);
  for i:=0 to 4 do
    ListBox1.Items.Add(IntToStr(liste[i]));
  Listbox1.Items.Add('Schleifenende');
end;

[dummzeuch]

Das liegt daran, dass man auch ueber Arraygrenzen hinaus auf Elemente zugreifen kann, wenn man das nicht unter den Compileroptionen ausschaltet. Der Speicher ist allerdings u.U. schon wieder fuer andere Verwendung freigegeben und koennte dadurch ueberschrieben worden sein, deshalb sollte man sich darauf nicht verlassen.

[Gargamel]

Vielen Dank.
Wenn ich in den Compiler-Optionen "Bereichsüberprüfung" aktiviere, tritt tatsächlich sofort der Fehler auf.

[Popov]

Du weißt es wahrscheinlich schon, aber am besten mit for i := Low(Arrayname) to High(Arrayname) do arbeiten.

[Gargamel]

Ja, ich ermittle immer die Gesamtanzahl der Elemente eines Arrays. Ich bin auch nur durch Zufall darauf gestossen, daß man nach Verkürzung eines Arrays immer noch auf dessen Elemente zugreifen kann.