注册 登录
编程论坛 VFP论坛

如果VFP不是万能的,VFP+Myfll.fll就是万能的,再次请教VFP回调函数

WSQSZSQ 发布于 2022-05-06 19:55, 1409 次点击
  全网搜遍了回调函数,都说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
2 回复
#2
my23182022-05-06 21:11
这个函数不清楚,但我用vfp+myfll.fll进行ftp操作时可以调用回调函数实现上传与下载进度显示。
#3
WSQSZSQ2022-05-07 09:20
查看调试器  fn=13219671  这是正常的内存地址吗?
1