Vfp 文档 一些经典编程文章 可供初学者学习编程时使用

				FoxPro中Windows API的调用
				
				
				 
				         
				
				□山东 李文强 孟祥富
				
				动态连接函数库（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