VFP中常用WIN32API函数调用事例

来源：作者：出处：综艺读书 2006-10-13

我们在VFP编程时，为了弥补VFP本身功能的不足，常常会用到WIN32API函数
来对VFP的功能行扩展，例如取得系统信息、对注册表进行操作等，但是由于
WIN32API函数是C++的数据结构形式,在调用时与VFP的数据格式有所不同,因此在

调用时往往会产生问题，而目前的一些资料所介绍的大都是VB、DELPHI等语言如
何调用，对VFP如何调用介绍的比较少，更缺少具体的调用事例，下面我分几次
介绍在VFP如何调用WIN32API函数，并就一些常用的WIN32API函数作一介绍，由于
本人水平有限，所介绍的内容，仅供您参考，也欢迎您在我的[请您留言]中共同
探讨：

.................一、VFP中调用WIN32API函数的格式

VFP中调用WIN32API函数的命令主要是：
DECLARE - DLL
CLEAR DLLS
1.DECLARE - DLL 它用于注册外部 Windows 32 位动态链接库 ( .DLL ) 中的
一个函数。
语法： DECLARE [cFunctionType] FunctionName IN LibraryName [AS AliasName]
　　 .......[cParamType1 [@] ParamName1, cParamType2 [@] ParamName2, ...]
说明：
cFunctionType 指定该函数返回值的类型，其类型代码如下：
SHORT16 位整数
INTEGER32 位整数
SINGLE 32 位浮点数
DOUBLE 64 位浮点数
STRING 字符串
FunctionName 指定要注册使用的32位函数名。注意 FunctionName 区分大小写。
　　　　　　如果该函数名与Visual FoxPro的保留字相同，应使用AS参数另起
　　　　　　别名。
IN LibraryName 指定该函数所在的外部动态链接库文件名，如果LibraryName为：
　　　　　　　 WIN32API时，VFP将依次查找KERNEL32.DLL、GDI32.DLL、
　　　　　　　USER32.DLL、MPR.DLL及ADVAPI32.DLL等动态链接库文件名。
AS AliasName 当API函数的名称与Visual FoxPro的保留字相同时，另取
　　　　　　　AliasName别名，另取的别名是不区分大小写的。
cParameterType1 [@] ParamName1, cParameterType2 [@] ParamName2, ...
　　　　　　指定传递给被调用的32位.DLL函数的参数类型及参数名称。其类
　　　　　　型代码如FunctionType，如果要以传址方法传递参数则应在参数
　　　　　　名前加上@。

2.CLEAR DLLS 释放所有利用DECLARE - DLL命令所装入的动态链接库。

....一旦申明WIN32API函数成功，就可以和一般函数一样用？xxx()、=xxx()
来调用。
....下面以具体事例谈谈win32api在Vfp中的运用：

1.利用win32api函数获取指定磁盘的卷标：

Stor 0 to C_var,C_cd,C_qf
C_Var='c:\'
DECLARE INTEGER GetVolumeInformation IN Win32API STRING @, STRING @, INTEGER,;
　　　 INTEGER @, INTEGER @, INTEGER @, STRING @, INTEGER
xx=GetVolumeInformation(C_Var,"",20,@C_var,@C_cd,@C_qf,0,0)
CLEAR DLLS &&释放所有利用DECLARE - DLL命令所装入的动态链接库。
xx<>0 获取指定磁盘的卷标成功，反之则未成功。
C_var=指定磁盘的卷标，是个十进制的数值，与我们在DOS下看到的16进制不同。
C_cd=系统规定的文件名每一部分的长度,是个十进制的数值。
C_qf=文件名的大小写标志,是个十进制的数值。

.....怎么样很简单吧，我们可以把获取的磁盘卷标，用来加密我们的软件，这样
我们的软件就具有防拷贝的功能了。

进入讨论组讨论。

【收藏此文】【大中小】【打印】【关闭】

较早的文章：VFP中EXCEL格式的输入方法

较新的文章：VFP中导出数据的几种方法

站内各频道最新更新文档

形形色色的台湾特产

怀念“黛玉”妹妹

·如何设置路由器
·照片合成处理软件
·RedHat6.2服务配置之Apache
·提升电脑性能的方法
·电脑无法正常启动的问题
·delphi两种方法使用xml文档
·证券行业交易平台解决方案
·三星人寿保险Sybase案例

·东软商业保险系统解决方案
·CSO向Sun平台应用移植解决..
·东软税务全面整体解决方案
·珠海国地税KILL安全系统案例
·友讯：D-Link助昆明市公安..
·江苏邮政票据打印机系统方案
·浪潮：云南国税备份系统案例
·CSS 标签属性

站内最新制作专题

·ACDSEE专题教程-下载使用
·迅雷专题教程-下载使用
·Windows XP频道
·Windows Vista频道
·Windows 2000频道
·win2003频道
·Freebsd频道
·Oracle频道

·Linux频道
·Windows频道
·邮件服务器专题
·协议大全
·数据恢复指南教程
·FreeBSD使用教程
·Linux数据库宝典
·Linux基础知识

热门关键字导读

Photoshop教程：照片处理照片制作 PS快捷键抠图
计算机故障：XP系统修复
艺术与设计：设计流媒体设计欣赏边框
计算机安全：ARP

站内频道文章精选

新闻资讯	电脑技巧
· 秘密:Vista隐蔽的动态屏保 · 腾讯开发新电子宠物--QQ熊 · 惠普否认2999元PC有价无货	· 驱逐Win系统“流氓”文件 · WinXP中获取未使用的IP地址 · 尝试format C:格式化硬盘？
操作系统	常用软件
· 在DOS下恢复回收站中的文件 · 拯救WinXP崩溃的救命稻草 · Linux系统中超级权限的应用	· 搜狗PK谷歌：谁能代言拼... · 昨日重现，一键GHOST轻松.. · 实现Web迅雷在空闲时杀毒
桌面开发	网络编程
· AVIFile函数制做AVI文件 · VC中链接动态链接库的方法 · 熊猫烧香核心源码(Delphi)	· DateDiff函数祥解 · JavaScript去除空格的三种 · js效果图片加载进度实时..
数据库	图像处理
· SQL Server数据库优化方案 · Oracle的初学者入门心得 · JSP连接Mysql数据库	· Photoshop为美女做艺术处理 · 用Freehand创建发光字特效 · 设计自己的个性QQ动态表情

百度推荐，商机无限

搜索您感兴趣的内容