[cotseec]

как вариант - повторно устанавливается размер массива, что приводит к ошибке, попробуй

Код:

try
...
SetLength(dArr.Arr1, N)
...
except

или просто отслеживай, чтобы оператор SetLength(dArr.Arr1, N) использовался один раз за время выполнения программы