调用Dll的返回值问题

[pyp]

我调用一个C写的Dll，里面有一个函数：
BOOL __stdcall Fp_SetCallback(
IN Fp_Callback_ pCallback
);


参数：
pCallback回调函数指针, 指向通过Fp_Callback_类型的回调函数, Fp_Callback_ 在FpDrv.h 中
定义如下：
typedef void (__stdcall *Fp_Callback_)(BYTE * const pBuffer,
long lBufferSize);
其中, pBuffer 指向图像内存, lBufferSize 是图像数据大小, 以字节为单位。
返回值：
成功返回TRUE, 失败返回FALSE。

请问在Delphi中应该如何定义p_Callback并调用？谢谢！

[do2008]

type
//定义函数类型
Fp_Callback_= procedure(pBuffer:byte; lBufferSize:Integer);

//定义Dll输出的函数类型
function Fp_SetCallback (fp :Fp_Callback_) : integer ; stdcall ;External 'c_dll.dll';


注：c_dll.dll改成你dll的名字