![]() ![]() |
|
vfp动态链接库的调用方法学习 | |
作者:佚名 文章来源:不详 点击数 更新时间:2008/5/24 20:04:53 文章录入:杜斌 责任编辑:杜斌 | |
|
|
要调用动态链接库,先使用DECLARE命令说明要调用的函数,也就是使用前必须注册一下外部32动态链接库中的函数。其语法如下: DECLARE [函数返回值类型]函数名IN 库名[AS 别名][参数1类型][@][参数1名] [,参数2类型][@][参数2名]…… 假定函数的返回值为INTEGER(32整数 值),闪烁窗口的函数为:FlashWindow(), 其调用说明如下: DECLARE INTEGER FlashWindowIN win32api integer hWnd ,integer Bool 清除DLL时用:clear dlls 具体实现方法如下: 建立表单,加入ti mer 控件和命令按 钮。属性如下: 控件属性值 ti mer1Interval 200 visable false CommandButton1Caption 退出 方法如下: form1.Init DECLARE INTEGER FlashWindow IN win32api integer hWnd ,integer Bool set libraryto "d :\vfp\foxtools .fll" &&调用foxtools .fll 库中的_WhToHwnd()和_WonTop()函数以得到 窗口句柄 Ti mer1.ti mer =FlashWindow(_WhToHwnd(_WOnTop()),1) CommandButton1.click clear dlls thisform.release |
|
![]() ![]() |