怎样在VB中声明和使用API函数

API函数简介--下一节

作为一个编程初学者来说，API函数也许是一个时常耳闻却感觉有些神秘的东西。单看它的复杂语法，就足令人望而生畏，但是任何事物在我们深入了解它之前，总是会有这种感觉的。我们这篇API入门教程的目的，就是要把API函数的来龙去脉告诉大家，破除对API函数的畏惧，使它成为我们编程的好助手。
大家可能在许多书上看到过API的英文全称(Application Programming Interface)，WIN32 API也就是MicrosoftWindows 32位平台的应用程序编程接口。对这个定义的理解，需要追溯到操作系统的发展历史上，当WINDOWS操作系统开始占据主导地位的时候，开发WINDOWS平台下的应用程序成为人们的需要。而在WINDOWS程序设计领域处于发展的初期，WINDOWS程序员所能使用的编程工具唯有API函数，这些函数是WINDOWS提供给应用程序与操作系统的接口，他们犹如“积木块”一样，可以搭建出各种界面丰富，功能灵活的应用程序。所以可以认为API函数是构筑整个WINDOWS框架的基石，在它的下面是WINDOWS的操作系统核心，而它的上面则是所有的华丽的WINDOWS应用程序。（配图1）

但是，那时的WINDOWS程序开发还是比较复杂的工作，程序员必须熟记一大堆常用的API函数，而且还得对WINDOWS操作系统有深入的了解。然而随着软件技术的不断发展，在WINDOWS平台上出现了很多优秀的可视化编程环境，程序员可以采用“即见即所得”的编程方式来开发具有精美用户界面和功能强大的应用程序。
这些优秀可视化编程环境操作简单、界面友好（诸如VB、VC++、DELPHI等），在这些工具中提供了大量的类库和各种控件，它们替代了API的神秘功能，事实上这些类库和控件都是构架在WIN32 API函数基础之上的，是封装了的API函数的集合。它们把常用的API函数的组合在一起成为一个控件或类库，并赋予其方便的使用方法，所以极大的加速了WINDOWS应用程序开发的过程。有了这些控件和类库，程序员便可以把主要精力放在程序整体功能的设计上，而不必过于关注技术细节。
实际上如果我们要开发出更灵活、更实用、更具效率的应用程序，必然要涉及到直接使用API函数，虽然类库和控件使应用程序的开发简单的多，但它们只提供WINDOWS的一般功能，对于比较复杂和特殊的功能来说，使用类库和控件是非常难以实现的，这时就需要采用API函数来实现。
这也是API函数使用的场合，所以我们对待API函数不必刻来研究每一个函数的用法，那也是不现实的(能用的到的API函数有几千个呢)。正如某位大虾所说：API不要去学，在需要的时候去查API帮助就足够了。
API函数快速入门--怎样在VB中声明和使用API函数--
下一节




一、在VB中声明API函数有两种方法：如果我们只在某个窗体中使用API函数，我们可以在窗体代码的General部分声明它：
声明的语法是：
Private Declare Function ...
Private Declare Sub.....
这里必须采用Private声明，因为这个API函数只能被一个窗体内的程序所调用。
如果我们的程序有多个窗体构成，而且我们需要在多个窗体中使用同一个API函数，就需要在模块中声明了。
先添加一个模块（如图示），
然后采用如下语法声明：
Public Declare Function....
Public Declare Sub....
Public声明的含义是把API函数作为一个公共函数或过程，在一个工程中的任何位置（包括所有的窗体和模块）都能直接调用它。 声明完毕我们就能在程序中使用此API函数了。
二、可采用以下几种方式使用API函数，以SetWindowPos函数为例：
（1）忽略函数返回值的调用：
SetWindowPos Form1.hWnd, -2 ,0 ,0 ,0, 0, 3
注意此时函数的参数是不加括号的。
（2）Call方法调用：
Call SetWindowPos(Form1.hWnd, -2, 0, 0, 0, 3)
注意这里需要加上括号，但我们不取回函数的返回值。
（3）取得函数返回值的调用：
MyLng = SetWindowPos(Form1.hWnd, -2, 0, 0, 0, 3)
此时需要加上括号，而且我们必须事先定义一个变量（变量的类型与函数返回值类型相同）来存储API函数的返回值。
三、几个问题的说明：
（1）声明中的Lib 和 Alias 是怎么回事
一般情况下WIN32API函数总是包含在WINDOWS系统自带的或是其它公司提供的动态连接库DLL中，而Declare语句中的Lib关键字就用来指定DLL（动态连接库）文件的路径，这样VB才能找到这个DLL文件，然后才能使用其中的API函数。如果我们只是列出DLL文件名而不指出其完整的路径的话，VB会自动到.EXE文件所在目录、当前工作目录、WINDOWS\SYSTEM目录、WINDOWS目录下搜寻这个DLL文件。所以如果所要使用DLL文件不在上述几个目录下的话，我们应该指明其完整路径。
Alias用于指定API函数的别名，如果我们调用的API函数要使用字符串（参数中包含String型）的话，Alias关键字是必须的。这是因为在ANSI和Unicode字符集中同一API函数的名称可能是不一样的，为了保证不出现声明错误，我们使用Alias关键字指出API函数的别名，一般来说在WIN9X平台下我们把API函数名后加一个大写A作为别名即可。
（2）常见的API参数类型的说明
API函数的参数中最常见的是长整Long型数据类型，例如API中的句柄、一些特定的常量、函数的返回值都是此类型 的值；另外几种常见的参数类型有：整型Integer、Byte型、String型等。
（3）声明中的ByVal是作什么用的
这跟VB的参数传递方式有关，在默认情况下VB是通过地址传递方式传递函数的参数、而有些API函数要求必须采用传值方式来传递函数参数（这两种参数传递方式是不同的，前者传递的是一个指针，而后者要求是参数真实的值）。这样就会发生错误，解决的办法是在API函数参数声明的前面加上ByVal关键字，这样VB就采用传值方式传递参数了。
（4）怎样得到完整的API函数声明
VB自带了API文本查看器API TEXT VIEWER，我们可以在其中找到API函数的完整声明，然后把它粘贴到程序中即可。
怎样在DELPHI中使用API函数--下一节

实际上，在DELPHI中调用WIN32 API函数与在C或C++中调用WIN32 API函数没有大的区别。DELPHI中将C或C++中引用 的WINDOWS.H头文件改写为WINDOWS.PAS单元，使WINDOWS API函数的定义符合PASCAL语法。而其他的头文件在DELPHI中也都有相应的.PAS单元一一对应，所以在DELPHI中调用API函数时，只须将相应的API函数单元加入到USES语句的单元之中，便可直接调用相应的函数了。
下面我们来看一个简单的例子，程序的作用是改变桌面墙纸：
unit Unit1;
interface
{Windows.PAS是DELPHI提供的标准单元，我们要调用API函数，需要引用这个单元}
uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;
type
TForm1 = class(TForm);
Button1: TButton;
procedure Button1Click(Sender: TObject);
private { Private declarations }
public { Public declarations }
end;
var Form1: TForm1;
implementation {$R *.DFM}
procedure TForm1.Button1Click(Sender: TObject);
var filename1:string;
begin
filename1:='c:\windows\mywallpaper.bmp';
{调用API函数SystemParametersInfo来设置桌面墙纸的图片文件为'c:\windows\mywallpaper.bmp'}
SystemParametersInfo(SPI_SETDESKWALLPAPER, 0,pchar(filename1), SPIF_UPDATEINIFILE);
end;
end.
其中SystemParametersInfo函数的参数的意义如下表：
参数：
意义
uAction
Longint，指定要设置的参数。参考uAction常数表
uParam
Longint，参考uAction常数表
lpvParam
不定，按引用调用的Integer、Longint和数据结构。
fuWinIni
参数规定了在设置系统参数的时候，是否应更新用户设置参数
常数SPIF_UPDATEINIFILE表示更新
下面是本例的uAction常数，和使用它的方法：
参数
意义和使用方法
SPI_SETDESKWALLPAPER
设置桌面背景墙纸，用法为：
SystemParametersInfo(SPI_SETDESKWALLPAPER, 0, 图片路径, 1)
好了在DELPHI中调用API函数就是这样简单，我们需要知道的只是API函数的意义和参数列表，然后把它用到程序中就可以了。需要提醒的是C的数据类型可能会与DELPHI的数据类型有些不同，而调用API函数时必须保证类型一致才行，这是我们必须注意的一点。
WIN32 API的分类介绍-- 下一节

今天我们把标准WIN32 API函数分类介绍一下，虽然我们不必去刻意研究每个API函数的用法，但是在需要的时候，至少应该知道它属于哪一类的API函数，这样才能正确查找和使用。
按照通常的划分标准，WIN32 API函数分为七大类：
1、窗口管理类：这类API函数向应用程序提供了一些创建和管理用户界面的方法，我们可以使用它们来做出程序的界面。
2、窗口通用控制类：系统SHELL提供了一些控制，使用这些控制可以使窗口具有与众不同的外观，通用控制是由通用控制库COMCTL32.DLL提供的。
3、SHELL特性类：应用程序可以使用它们来增强系统SHELL各方面的功能。
4、图形设备接口(GDI)：提供绘图、图形处理、使用显示设备等一系列的API函数。
5、系统服务类：为计算机提供了访问计算机资源以及底层操作的手段。
6、国际特性类：有助于我们编写国际化的应用程序，提供Unicode字符集和多语种支持。
7、网络服务类：允许网络上的不同计算机之间的不同应用程序之间进行通讯，用于在各计算机上创建和管理共享资源的连接。
上面的分类对于我们来说还是显得宽泛了一些，所以本节以后的各节会采用小分类的方法，也就是按具体功能的划分为大家介绍一些常用的API函数的用法。