л

Распределите память кучи с помощью 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;