Переполнение стека при передачи функциям массивов большой размерности

[graphoman]

При передачи функции массива большой размерности (около 3 mb) вызывается исключение: SteckOverflow

Как этого избежать?

[_Dmitry]

Сделать массив глобальным для этой функции и не передавать через стек

[Ins]

Ну еще бы... Где это видано, чтобы массивы такого размера так прямо параметрами в подпрограмму передавали... Мало того, что переполнение стека может вызвать, так еще сколько времени копирование его в стек займет - страшно подумать. УКАЗАТЕЛЬ на массив передавать надо, это всего-навсего 4 байта, стек не переполнит. Для этого либо явно пропишите тип параметра - указатель, и передавайте при вызове адрес массива, либо просто объявите его как var-параметр (передача по ссылке. В этом случае указатель вместо самого массива будет передан неявно автоматически). Ну, т.е. если у вас подпрограмма выглядит как-нибудь так:

type
  TMyArray = array[1..X] of XXX;
procedure MyProc(A: TMyArray);

сделайте либо так:

type
  PMyArray = ^TMyArray;
  TMyArray = array[1..X] of XXX;
procedure MyProc(A: PMyArray);

либо так:

procedure MyProc(var A: TMyArray);