打印本文   关闭窗口

FoxPro中WindowsAPI的调用

作者：佚名  文章来源：不详  点击数  更新时间：2008/4/18 14:51:07  文章录入：杜斌  责任编辑：杜斌

动态连接函数库（DLLs）可以说是Windows系统的基础，Windows系统或Windows的应用系统在执行过程中，常常通过外部的动态连接函数库支持其所需功能，如控制屏幕、打印机、鼠标、键盘等设备，若在设计过程中，将完成这些功能的程序都重复写在系统中，就会使程序过大。另外一点，就是这些工作函数库具有共享功能，也就是说可以利用Windows程 序开发工具，直接使用这些属于Windows函数库的功能，直接在程序中访问，增加开发的 系统与Windows系统环境的结合能力。WindowsAPI的大约４００多个API功能，大部分都可 供用户调用，若能用好这些WindowsAPI功能，既可减少重复开发，又能提高应用系统对 Windows环境的兼容性和系统性能。 　　在Windows环境中所提供的工作函数库主要有下面三个文件： 　　·GDI.EXE———屏幕显示及打印功能。 　　·USER.EXE———鼠标、键盘、通信端口、声音及时钟功能。 　　·KERNEL.EXE———文件及内存管理（核心部分）功能。 　　FOXTOOLS.FLL就是FOXPRO For Windows提供的访问WindowsAPI函数的动态连接函数库。 　　它提供下面两个函数： 　　RegFn（）———WindowsAPI功能注册函数。 　　CallFn（）———WindowsAPI功能调用函数。 　　要使用WindowsAPI函数首先应该用RegFn（）函数注册该函数，注册成功后再用CallFn（）函数调用之。RegFn（）和CallFn（）的语法如下。RegFn（＜Function name＞，＜Argment Types＞，＜Return Types＞，［DLL name］） CallFn（＜Fn Num＞，［＜Arg1＞，＜arg2＞．．．．］） 　　参数说明： 　　Function name为要调用的API函数的函数名称。 　　Argment Types为要调用的API函数的参数类型说明。 　　Return Types为要调用的API函数的返回值类型说明。 　　DLL name为您要调用的API函数所在的动态连接函数库名。必须包括扩展名，如.DLL或.DLL或.EXE（GDI.EXE、USER.EXE，KERNEL.EXE可省略扩展名）。 　　｛Fn Num＞是用RegFn（）注册成功的函数，即RegFn（）的返回值［＜Arg1＞，＜arg2＞．．．］）为参数序列，注意参数类型必须与用RegFn（）注册的类型一致。 　　如果用RegFn（）注册一个WindowsAPI函数成功的话，会返回一个数值，若无法找到指定的 ＜DLL name＞将返回－１，同时出现一个Windows错误窗口。所以如果您使WindowsAPI函数，您必须保证您所调用的函数所在的动态连接函数库存在，而且函数调用格式正确CallFn（）缺省传递参数的方式为传值，若要改为传址，应在该参数前加上＠强制符号。笔者曾经因为鼠标器左键不好使而用WindowsAPI的SwapMouseButton（）函数对换了鼠标器的左右键，下面就以此为例说一下RegFn（）和CallFn（）的用法。 　　SwapMouseButton（）的语法如下： 　　SwapMouseButton（BOOL bSwap）bSwap为真值（1）时将鼠标器左右键对换，为假（0）时 　　将左右键恢复正常设置。 　　对换过程SwapMouse.prg 　　PARAMETERS Swap 　　SET LIBRARY TO SYS(2004)+"FOXTOOLS.FLL" 　　&&连入FOXTOOLS.FLL库 　　Fn=RegFn("SwapMouseButton","I","I","USER.EXE") 　　&&注册SwapMouseButton 　　IF Fn=-1 　　WAIT WINDOWS"注册失败!"NOWAIT 　　SET LIBRARY TO 　　RETURN 　　ENDIF 　　&&注册成功 　　Result=CallFn(Fn,Swap) 　　SET LIBRARY TO 　　RETURN

打印本文   关闭窗口