Спасибо...
Не поверишь была такая мысль.... тут с коллегой утро общались и он предложил именно такой вариант... Но как то геморно...
Пока ждал ответ... переписал в функции выделения памяти следующую строчку:
Код:
GetMem(NP, Index * sizeof(TMyDBEvents));
на
Код:
NP := AllocMem(Index * sizeof(TMyDBEvents));
И все заработало... незнаю как и почему но он стал нормально ложить данные... и все пока пашет... бредок...
Щас буду тестить с реальным массивом данных... понаблюдаю...