如果VFP不是万能的,VFP+Myfll.fll就是万能的,再次请教VFP回调函数
全网搜遍了回调函数,都说VFP不能使用回调函数。大失所望之际,竟在Myfll.fll帮助里找到现成的回调函数实例——函数名:ProcLoad(cProcName,argList)。可由于本人功力不够,还是没有调试成功,请各位大侠助我一臂之力,查查下面程序问题在哪?*下面示例演示如何使用回调函数
#define iBaseID integer
#define iMode integer
#define sInfo string
iBaseID=1
iMode=1
sInfo=SPACE(10)
Set Library To myfll
fn = ProcLoad( 'MyCallBack', 'iis')
Declare integer SetConnectEventCallBack in SunVoteSDK.dll
=SetConnectEventCallBack(fn) &&就这句出错了,说参数太多了,可说明里就是一个指针
=MESSAGEBOX(sInfo,64,"通告")
ProcUnload(fn)
*-------------------------------------------------------------------------------
*回调函数
Procedure MyCallBack
lparameters iBaseID,;
iMode,;
sInfo
?iBaseID
?iMode
?sInfo
return 0 && 继续
EndProc
Set Library To
RETURN