Hallo,
sollte die erste for-Schleife nicht besser so sein:
Delphi-Quellcode:
for j := high(AArray) downto low(AArray) do
//...
Dynamische Arrays fangen eigentlich immer bei 0 an.
(Low(AArray) liefert den kleinsten Index, könnte also eigentlich auch gleich direkt 0 sein)
mfg
Helmi 
>> Theorie ist Wissen, dass nicht funktioniert - Praxis ist, wenn alles funktioniert und keiner weiss warum! <<