л
Распределите память кучи с помощью GetMem. Если вы имеете:
var
a, b:
array[0..30000]: Integer;
то попробуйте:
type
TBigArray =
array[0..30000]
of Integer;
var
a, b: ^TBigArray;
и во внешнем блоке сделайте:
GetMem(a, SizeOf(TBigArray));
GetMem(b, SizeOf(TBigArray));
Также необходимо применять указатели на память вместо ссылок, например взамен:
a[0] := xxx;
необходимо использовать
a^[0] := xxx;
Взято из
Советов по Delphi от