Database 版 (精华区)
发信人: mengy (LEAR DLLS 命令时，将从内存中清除), 信区: Database
标 题: ＶＦＰ动态链接库的调用
发信站: 哈工大紫丁香 (2000年12月30日18:38:41 星期六), 转信
ＶＦＰ动态链接库的调用
动态链接库ＤＬＬ是Ｗｉｎｄｏｗｓ 最重要的组成要素，它是应用程序外部
的、可以从应用程序进行调用的过程库。在ＶＦＰ 中调用动态链接库，就可以大
大加强ＶＦＰ 的功能，特别是一些ＶＦＰ 自身不能实现的功能。本文以建立一个
闪烁的窗口为例介绍一下ＶＦＰ 中动态链接库的调用方法。
要调用动态链接库，先使用ＤＥＣＬＡＲＥ命令说明要调用的函数，也就是使
用前必须注册一下外部３２动态链接库中的函数。其语法如下：
ＤＥＣＬＡＲＥ ［函数返回值类型］函数名ＩＮ
库名［ＡＳ 别名］［参数１类型］［＠］［参数１名］
［，参数２类型］［＠］［参数２名］……
假定函数的返回值为ＩＮＴＥＧＥＲ（３２整数
值），闪烁窗口的函数为：ＦｌａｓｈＷｉｎｄｏｗ（），
其调用说明如下：
ＤＥＣＬＡＲＥ ＩＮＴＥＧＥＲ ＦｌａｓｈＷｉｎｄｏｗＩＮ ｗｉｎ３２ａｐ
ｉ
ｉｎｔｅｇｅｒ ｈＷｎｄ ，ｉｎｔｅｇｅｒ Ｂｏｏｌ
清除ＤＬＬ时用：ｃｌｅａｒ ｄｌｌｓ
具体实现方法如下：
建立表单，加入ｔｉ ｍｅｒ 控件和命令按
钮。属性如下：
控件属性值
ｔｉ ｍｅｒ１Ｉｎｔｅｒｖａｌ ２００
ｖｉｓａｂｌｅ ｆａｌｓｅ
ＣｏｍｍａｎｄＢｕｔｔｏｎ１Ｃａｐｔｉｏｎ 退出
方法如下：
ｆｏｒｍ１．Ｉｎｉｔ
ＤＥＣＬＡＲＥ ＩＮＴＥＧＥＲ ＦｌａｓｈＷｉｎｄｏｗ ＩＮ ｗｉｎ３２ａｐ
ｉ ｉｎｔｅｇｅｒ ｈＷｎｄ ，ｉｎｔｅｇｅｒ
Ｂｏｏｌ ｓｅｔ ｌｉｂｒａｒｙｔｏ ＂ｄ ：＼ｖｆｐ＼ｆｏｘｔｏｏｌｓ
．ｆｌｌ＂
＆＆调用ｆｏｘｔｏｏｌｓ ．ｆｌｌ 库中的＿ＷｈＴｏＨｗｎｄ（）和＿Ｗｏｎ
Ｔｏｐ（）函数以得到
窗口句柄
Ｔｉ ｍｅｒ１．ｔｉ ｍｅｒ
＝ＦｌａｓｈＷｉｎｄｏｗ（＿ＷｈＴｏＨｗｎｄ（＿ＷＯｎＴｏｐ（）），１）
ＣｏｍｍａｎｄＢｕｔｔｏｎ１．ｃｌｉｃｋ
ｃｌｅａｒ ｄｌｌｓ
ｔｈｉｓｆｏｒｍ．ｒｅｌｅａｓｅ
（安徽韦法运）
返回首页
--
大海无边天做岸
山登绝顶我为风
※ 来源:·哈工大紫丁香 bbs.hit.edu.cn·[FROM: 202.118.227.121]
Powered by KBS BBS 2.0 (http://dev.kcn.cn)
页面执行时间：2.211毫秒