C语言回调函数如何转化为delphi语言

[SVIP_]

NET_DVR_API BOOL __stdcall NET_DVR_SetDVRMessCallBack(BOOL (CALLBACK *fMessCallBack)(LONG lCommand,char *sDVRIP,char *pBuf,DWORD dwBufLen));

NET_DVR_API BOOL __stdcall NET_DVR_SetDVRMessCallBack_EX(BOOL (CALLBACK *fMessCallBack_EX)(LONG lCommand,LONG lUserID,char *pBuf,DWORD dwBufLen));

C语言回调函数如何转化为delphi语言
初学delphi 大家别见笑

[SVIP_]

自己先顶一下 在线等啊

[珍惜生命远离CPP]

type
  fMessCallBack_EX_Type = function (lCommand :integer; lUserID : integer; buf:PChar ;  dwBufLen:integer ):LONGBOOL;
 function NET_DVR_SetDVRMessCallBack_EX( fMessCallBack_EX :fMessCallBack_EX_Type):LONGBOOL;

[SVIP_]

多谢 先结贴 然后我去试试。。。

[SVIP_]

好像。。。
NET_DVR_API BOOL __stdcall NET_DVR_SetDVRMessCallBack_EX(BOOL (CALLBACK *fMessCallBack_EX)(LONG lCommand,LONG lUserID,char *pBuf,DWORD dwBufLen));
这一个就是个回调函数。。。不是把前后2个整合了

[珍惜生命远离CPP]

就是一个,前面那个是一个函数类型.