Передача списка указателей (TList) как параметр в dll

[sneksnek2006]

Доброго времени суток!
Опять я за помощью к знатокам )).
Имеется программа написанная в Delphi5, которая работает с Dll. Переписал Dll на С++ (использ. С++Builder6).
Вот хэдер:

#ifdef __DLL__
# define DllUse __declspec(dllexport)
#else
# define DllUse __declspec(dllimport)
#endif
typedef int __fastcall (*TProgressProc) (int Count);
extern "C"{ DllUse int __stdcall SetTypeOfOma(void);
DllUse bool __stdcall isOMAPresent(void);
DllUse void __stdcall StartPermanentReset(void);
DllUse void __stdcall StopPermanentReset(void);
DllUse bool __stdcall InitOma(void);
DllUse void __stdcall DoneOma(void);
DllUse bool __stdcall ReadSpectr( TProgressProc ProgrProc,
bool Relay,
int Num,
int SumBy,
double ExpTime,
double DelayAfterFire,
double IVSDelay,
TList *Lst );
}
#endif

В функцию ReadSpectr передается список указателей, который в Delphi формируется так:
GetMem(P,Opt.Straightedge.PixelCoun t*2); //Opt.Straightedge.PixelCount = 3698
SList.Add(P);

В ReadSpectr происходит связь с устройством через параллельный порт и получение данных в буфер:
unsigned short SumBuffer[3698];
Затем из буфера данные записываются по указателю в память:
void CopyBuffer(unsigned short *dest)
{
for (int i = 0; i < PixelCount ; i++) *dest++ += SumBuffer[i];
}

В результате полученные данные программа должна отобразить на компоненте Chart в виде спектра.
Что в принципе и происходит, только после отображения графика вызывается исключение(стандартный обработчик заменен на свой). Сообщение имеет такой вид:

[sneksnek2006]

Никак не могу понять в результате чего вызывается данное исключение?