惯性聚合 高效追踪和阅读你感兴趣的博客、新闻、科技资讯
阅读原文 在惯性聚合中打开

推荐订阅源

GbyAI
GbyAI
OSCHINA 社区最新新闻
OSCHINA 社区最新新闻
博客园 - 叶小钗
大猫的无限游戏
大猫的无限游戏
H
Help Net Security
G
Google Developers Blog
D
Docker
阮一峰的网络日志
阮一峰的网络日志
A
About on SuperTechFans
aimingoo的专栏
aimingoo的专栏
博客园 - 聂微东
Hugging Face - Blog
Hugging Face - Blog
酷 壳 – CoolShell
酷 壳 – CoolShell
Apple Machine Learning Research
Apple Machine Learning Research
云风的 BLOG
云风的 BLOG
让小产品的独立变现更简单 - ezindie.com
让小产品的独立变现更简单 - ezindie.com
腾讯CDC
T
The Blog of Author Tim Ferriss
Microsoft Security Blog
Microsoft Security Blog
WordPress大学
WordPress大学
I
InfoQ
Engineering at Meta
Engineering at Meta
Stack Overflow Blog
Stack Overflow Blog
Google DeepMind News
Google DeepMind News

博客园 - 张瓅

puppy-language ConsolePlayer 仙剑奇侠传4主题曲 QBASIC代码 HTML5 模版调用析构函数的一个发现 编译期运算 如何测量代码执行时间 【转】老外眼中的武侠小说 1850年的宁波 关于安装 DirectX SDk Dec 2005 后无法编译DirectShow应用程序的问题 [转]VB中嵌入汇编与真正的DLL 新的连连看网络版 各种连接字符串 关于CSS属性display:none和visible:hidden的区别 我用超白痴的方法解出了这道题,大家有没有更好的方法 Fire Net 尝试了一下Flex DES加密算法的实现 软件项目经理必备素质(转)
VFP中如何调用API函数
张瓅 · 2005-10-20 · via 博客园 - 张瓅

首先用DECLARE 关键字声明API函数

DECLARE  [API函数返回值类型] API函数名 IN WIN32API 参数类型1 [参数名1] .....

如声明获得计算机名的函数GetComputerName

DECLARE integer GetComputerName IN "kernel32" string @,long @

参数名可以省略,@号表示引用或指针型的参数

上面用了kernel32(具体的库名)代替了WIN32API,这样做也是可以的,但需要加双引号。

例子:
VFP中如何获得获得计算机名

DECLARE integer GetComputerName IN "kernel32" string @,long @ 

cc
=SPACE(100)
ll
=100
GetComputerName(@cc,@ll)

MESSAGEBOX(
cc)