delphi如何表示BOOL NET_DVR_SetDVRMessCallBack(BOOL (CALLBACK *fMessCallBack)(在线等

snow_white 2010-07-01 07:43:40

BOOL NET_DVR_SetDVRMessCallBack(BOOL (CALLBACK *fMessCallBack)(LONGlCommand,char *sDVRIP,char *pBuf,DWORD dwBufLen))
功能：设置接收硬盘录像机消息的回调函数（以IP 地址区分设备）
参数说明：
fMessCallBack：消息回调函数，像硬盘录像机主动发起的请求；以及通过报警上传通道收到的
报警信息，都通过此函数回调。
lCommand：消息的类型，定义如下：
#define COMM_ALARM 0x1100 //上传报警信息
#define COMM_TRADEINFO 0x1500 //ATMDVR 上传交易信息
sDVRIP：服务器的IP 地址
pBuf：存放信息的缓冲区，不同的类型分别指向不同的结构
dwBufLen：缓冲区的大小
返回值：TRUE 表示成功，FALSE 表示失败。
请教真高手老师如何实现DELPHI表示，在线等

...全文

185 6 打赏收藏转发到动态举报

写回复

用AI写文章

6 条回复

切换为时间正序

请发表友善的回复…

发表回复

snow_white 2010-07-02

打赏
举报

sz_haitao，你QQ或msn多少?

snow_white 2010-07-02

打赏
举报

sz_haitao你好，楼上报错啊

haitao 2010-07-02

打赏
举报

function NET_DVR_SetDVRMessCallBack(Tfun fMessCallBack):integer;



需要先定义回调函数指针的类型：

type

  Tfun=function (command:longint;sDVRIP:pchar;pBuf:pchar;dwBufLen:longint):integer;

snow_white 2010-07-02

打赏
举报

具体点啊！好像不行啊？领导

haitao 2010-07-02

打赏
举报

哦，还漏了一个参数：pchar sDVRIP

haitao 2010-07-02

打赏
举报

function NET_DVR_SetDVRMessCallBack(Tfun fMessCallBack):boolean;



需要先定义回调函数指针的类型：

type

  Tfun=function (longint command;Pchar pBuf;DWord dwBufLen):boolean;