Dimensionsbestimmung dynamische Arrays

[Muehle]

Ich habe folgendes Problem mit der Bestimmung
der Groesse eines dynamischen Arrays während der Laufzeit :

thearr ist ein dynamisches Array. Jedoch liefert
sizeof() immer den Anfangswert = 4. Dasselbe gilt
übrigens für length().

Auch High() und Low() verhalten sich da nicht besser.
Wer weiss die Lösung ???

var thearr : Array of Integer;
itest:Integer;

begin
itest := sizeof(thearr);
setlength(thearr,100000);
itest := sizeof(thearr);
setlength(thearr,1000);
itest := sizeof(thearr);
setlength(thearr,90000);
itest := sizeof(thearr);
end