1、针对 API 初学者的教程第一篇文章来源:vb 大世界什么是 API? API(Advanced Programmers Interface,高级程序员接口)(注:API 实际是指 Application Programming Interface,应用程序编程接口;此处疑为原文错误,不过在 VB 中也可以这么说吧!)是一套用来控制 Windows 的各个部件(从桌面的外观到位一个新进程分配的内存)的外观和行为的一套预先定义的 Windows 函数.用户的每个动作都会引发一个或几个函数的运行以 Windows 告诉发生了什么.这在某种程度上很象 Windows 的天然代码 .其他的语言只是提供
2、一种能自动而且更容易的访问 API 的方法.VB 在这方面作了很多工作.它完全隐藏了 API 并且提供了在 Windows 环境下编程的一种完全不同的方法.这也就是说,你用 VB 写出的每行代码都会被 VB 转换为 API 函数传递给 Windows.例如,Form1.Print.VB 将会以一定的参数(你的代码中提供的 ,或是默认参数) 调用 TextOut 这个 API 函数.同样,当你点击窗体上的一个按钮时,Windows 会发送一个消息给窗体( 这对于你来说是隐藏的),VB 获取这个调用并经过分析后生成一个特定事件(Button_Click).API 函数包含在 Windows 系统目
3、录下的动态连接库文件中( 如 User32.dll,GDI32.dll,Shell32.dll.).API 声明正如在“什么是 API“中所说,API 函数包含在位于系统目录下的 DLL 文件中.你可以自己输入 API 函数的声明,但 VB 提供了一种更简单的方法,即使用 API Text Viewer.要想在你的工程中声明 API 函数,只需运行 API Text Viewer,打开 Win32api.txt(或.MDB 如果你已经把它转换成了数据库的话,这样可以加快速度.注:微软的这个文件有很多的不足,你可以试一下本站提供下载的 api32.txt),选择“声明“,找到所需函数,点击 “添
4、加(Add)“ 并“复制(Copy)“,然后粘贴 (Paste)到你的工程里.使用预定义的常量和类型也是同样的方法.你将会遇到一些问题:假设你想在你的窗体模块中声明一个函数.粘贴然后运行,VB 会告诉你:编译错误.Declare 语句不允许作为类或对象模块中的 Public 成员.看起来很糟糕,其实你需要做的只是在声明前面添加一个 Private(如 Private Declare Function.).-不要忘了,可是这将使该函数只在该窗体模块可用.在有些情况下,你会得到“不明确的名称 “这样的提示,这是因为函数. 常量或其他的什么东西共用了一个名称.由于绝大多数的函数(也可能是全部 ,我没
5、有验证过) 都进行了别名化 ,亦即意味着你可以通过 Alias 子句使用其它的而不是他们原有的名称,你只需简单地改变一下函数名称而它仍然可以正常运行.你可以通过查看 VB 的 Declare 语句帮助主题来获取有关 Alias 的详细说明.消息(Messages)好了,现在你已经知道什么是 API 函数了,但你也一定听说过消息(如果你还没有,你很快就会)并且想知道它是什么.消息是 Windows 告诉你的程序发生了哪些事件或要求执行特定操作的基本方法.例如,当用户点击一个按钮,移动鼠标,或是向文本框中键入文字时,一条消息就会被发送给你的窗体.所有发送的消息都有四个参数-一个窗口句柄(hwnd)
6、,一个消息编号(msg) 还有两个 32 位长度(Long)的参数.hwnd 即要接受消息的一个窗口的句柄,msg 即消息的标识符(编号).该标识符是指引发消息的动作类型( 如移动鼠标),另外两个参数是该消息的附加参数 (例如当鼠标移动时光标的当前位置 )但是,当消息发送给你时你为什么看不到呢-就象有人在偷你的信一样 ?请先别恼火,让我告诉你.小偷其实是 Visual Basic.但它并没有偷走你的信,而是在阅读了之后挑出重要的以一种好的方式告诉你 .这种方式就是你代码中的事件(Event).这样,当用户在你的窗体上移动鼠标时,Windows 会发送一条 WM_MOUSEMOVE 消息给你的窗
7、口,VB 得到这条消息以及它的参数并运行你在事件 MouseMove 中的代码,同时 VB 会把这条消息的第二个 32 位数(它包含了 x,y 坐标,单位为像素(Pixel),每个位 16 位) 转换为两个单精度数,单位为缇(Twip).现在,如果你需要光标坐标的像素表示,然而 VB 已经把它转换成了缇,因此你需要重新把它转换为以像素为单位.在这里,Windows 给了你所需要的 ,但 VB“好意地“进行了转换而使你不得不重新转换.你可能会问- 我难道不能自己接收消息吗?答案是肯定的,你可以使用一种叫做子类处理(Subclass) 的方法.但你除非必须否则最好不要使用,因为这与 VB 的安全程
8、序设计有一点点的违背.(注:子类处理确实有很大的风险,但如果使用得当,是很有用处的.不过有一点一定要注意,即千万不要使用 VB 的断点调试功能,这可能会导致 VB 崩溃!)需要补充说明的是:你可以发送消息给你自己的窗口或其他的窗口,只需调用 SendMessage 或 PostMessage(SendMessage 会使接受到消息的窗口立刻处理消息,而 PostMessage 是把消息发送到一个称为消息队列的队列中去,等候处理(它将会在该消息处理完后返回 ,例如有些延迟).你必须制定接受消息的窗口的句柄,欲发送消息的编号(所有的消息的编号均为常量 ,你可以通过 API Text Viewer
9、查得)以及两个 32 位的参数.针对 API 初学者的教程第二篇文章来源:vb 大世界Windows 的一些特别之处这个主题是要告诉你 Windows 的一些与在 VB 中的不同的细节Windows 通过句柄(Handle)识别每个窗体 ,控件,菜单,菜单项或其他任何你能想得到的东西 .当你的程序运行时,它所包含的每个部件都有一个唯一确定的句柄用来同其他的部件相区别.例如,某个按钮得句柄就与其他部件不同,当你想要通过 API 来执行有关该按钮的某种操作时就必须使用这个句柄.从哪儿得到它呢?VB 为每个拥有 Windows 句柄的控件都提供了 Hwnd 属性来表示其句柄.Windows 使用像素
10、(Pixel) 而不是缇(Twip). 因此,把涉及 API 函数调用的控件的 ScaleMode 属性设为 3-(Pixel)是个不错的主意,这样你可以通过 ScaleXXX 属性得到它们的国际单位值.尽管这样,你可能有时仍需要进行从 Twip 到 Pixel 的转换(反之亦然),你可以通过 Screen 对象的 TwipsPerPixelX 和 TwipsPerPixelY 来实现.举例如下:PixelXValue=TwipXValueScreen.TwipsPerPixelXPixelYValue=TwipYValueScreen.TwipsPerPixelYTwipXValue=Pix
11、elXValue*Screen.TwipsPerPixelXTwipYValue=PixelYValue*Screen.TwipsPerPixelY我并没有在实际中见到过 TwipsPerPixelX 和 TwipsPerPixelY 的值有什么不同,但你最好是把它们区别开来而不是混用,这至少是一种好的程序设计风格.另外需要注意的是,这里用的是“ “(整除) 而不是 “ / “ ,这是因为像素值必须是整数.另外需要提到的是,Windows 函数中用到了不同的坐标系统 ,因此需要注意.最后要注意的是,一旦你使用了 API 函数,VB 就可能不再可靠了-API 调用中一个简单的语法错误就会导致 V
12、B 崩溃!(请经常保存您的工程).VB 并不能识别 API 调用中的错误,因此一旦你的程序出现异常,要先检查 API 调用-是否缺少 ByVal,或者是错误的类型,参数等等. 从哪里得到有关函数的说明?这个主题不会告诉你如何通过 API 函数改变按钮文字或如何快速查找一个文件.这不是一个 API 函数文档.为了得到有关函数的说明,你需要 SDK 帮助或微软的 SDK 文档( 至少有 40M-我怎么可能放在这里?).这些SDK 帮助通常都包含在 Borland Dephli 3.0 开发包或者 MS Visual C+中.到网上去或找您的朋友要一个,版本越新越好注意 Win3.x 的 SDK 帮
13、助对你并没有用,因为很多函数已经过于陈旧甚至废弃不用,尽管他们中的大多数由于与 Windows95 兼容而依然存在 .API 参数类型如果你已经有了一个 SDK 帮助,你肯定主意到了函数的返回之或参数有很多奇怪的类型如 VOID,LPCSTR, 和 DWORD.如果你对 C 语言比较熟悉的话,那你肯定明白它们的意思.对于其他不熟悉 C 语言的人,这里有一张摘自 VB Books Online(标题是:C 语言声明到 Visual Basic 的转换)C 语言数据类型 在 VB 中的声明 Call withATOM ByVal variable As Integer An expression
14、that evaluates to an IntegerBOOL ByVal variable As Long An expression that evaluates to a LongBYTE ByVal variable As Byte An expression that evaluates to a ByteCHAR ByVal variable As Byte An expression that evaluates to a ByteCOLORREF ByVal variable As Long An expression that evaluates to a LongDWOR
15、D ByVal variable As Long An expression that evaluates to a LongHWND, HDC,HMENU,etc.(Windows handles)ByVal variable As Long An expression that evaluates to a LongINT, UINT ByVal variable As Long An expression that evaluates to a LongLONG ByVal variable As Long An expression that evaluates to a LongLP
16、ARAM ByVal variable As Long An expression that evaluates to a LongLPDWORD variable As Long An expression that evaluates to a LongLPINT, LPUINT variable As Long An expression that evaluates to a LongLPRECT variable As type Any variable of that user-defined typeLPSTR, LPCSTR ByVal variable As String A
17、n expression that evaluates to a StringLPVOID variable As Any Any variable (use ByVal when passing a string)LPWORD variable As Integer An expression that evaluates to an IntegerLRESULT ByVal variable As Long An expression that evaluates to a LongNULLAs Any orByVal variable As Long ByVal Nothing or B
18、yVal 0& or vbNullStringSHORT ByVal variable As Integer An expression that evaluates to an IntegerVOID Sub procedure Not applicableWORD ByVal variable As Integer An expression that evaluates to an IntegerWPARAM ByVal variable As Long An expression that evaluates to a Long注释:你应该注意到了 BOOL 类型(Boolean)求出
19、的值为 Long 而不是 Boolean.因此 0 表示“假“(False),其他任何值表示“真“(True).HWND,HDC,HMENU,etc.-etc.指其他所有与于前面所述相似的类型.它们都以“H“ 开头来表示不同对象的句柄.举例来说,HBITMAP 表示一副位图的句柄,HBRUSH 标是一个刷子的句柄等等.它们均为 Long 而且要按值传递(ByVal).同样要注意 LPVOID 被声明为 Any 型变量,本文将会有独立的一个主题用来论述 Any 类型.有些类型以“LP“ 开头.LP 是 Long Pointer 的缩写.因此 LPWORD 实际表示数据所存的内存地址.不过,你并没
20、有必要调用某个函数来获取这个地址.当你按引用(ByRef)传递参数时,你实际上传递的就是它的地址.在这里你只需记住:如果某个参数的类型以“LP“开头,应该按引用(ByRef)传递.顺便说一句,LPARAM 与 Lparam 很相似但不是 Lparam,Lparam 不是一个指针,在这里你必须传递它的真实值,因此要按值(ByVal)传递.NULL 也是一种奇怪的类型.你可以从 VB 中了解到有关它的描述,这里我不去讨论它.按你需要的形式传递它吧,在大多数情况下,可以用 ByVal 0& 或 vbNullString.最后,VOID 是用来指那些没有返回值的函数的.API 中没有 SUBs,这就是
21、它们的标志.只要记住:如果一个函数被声明为 VOID ,你必须在 VB 中把它声明为 SUB.针对 API 初学者的教程第三篇文章来源:vb 大世界Any有些消息的参数声明为 Any.这表示该参数是一种可变的类型(你可以以整型,字符串,用户自定义或其他的类型来传递).这有一个这样的例子:Public Declare Function SendMessage Lib “User32“ Alias “SendMessageA“ ByVal Hwnd as Long, ByVal wMsg as Long, ByVal wParam as Long, lParam as Any) as LonglP
22、aram 声明为 Any 并按引用(ByRef)传递.这里是在这个函数中如果 lParam 是不同类型的值时应遵循的规则:如果该值是 传递形式numeric ByVal(as Long,or as Any)Null ByVal(as Long,or as Any)String ByRef(as String,or as Any)Type ByRef(as Any)array of Type ByRef(as Any)如果你的函数声明同上面的一个而且你想传递一个 Long 型数,你应该这样写:Call SendMessage(Me.Hwnd,WM_XXXX,0&,ByVal LongValue)
23、注意尽管头三个参数也是数值,但它们前边并没有 ByVal.这是因为在函数声明中它们已经被声明为按值传递(ByVal).第四个参数 ,由于是按引用传递(ByRef)(VB 并不知道你要传递参数的类型),因此你必须加上 ByVal 你可以使用别名技术来传递不同类型的参数:Public Declare Function SendMessageLng Lib “User32“ Alias “SendMessageA“(ByVal Hwnd as Long, ByVal wMsg as Long, ByVal wParam as Long, ByVal lParam as Long) as Long或:
24、Public Declare Function SendMessageStr Lib “User32“ Alias “SendMessageA“(ByVal Hwnd as Long, ByVal wMsg as Long, ByVal wParam as Long, lParam as String) as Long注意 API 参数类型本身是不会改变的.例子中的第四个参数总是一个 4 字节的长型数.当你按值(ByVal) 传递一个 Long 或 Null 时,该 4 字节长的数值就直接传递给函数.如果你传递一个 String 或其他的什么,你是按引用(ByRef)传递,VB 传递的实际上是
25、变量的地址,也是 4 个字节.参数传递你已经知道如何传递参数了,只需把他放到调用的函数中即刻.然而,当你使用 API 函数时,在传递参数是有一些你应该注意的 细节. ByVal 还是 ByRef. 通常情况下,你不用为此担心,VB 的 API 浏览器已经为你做好了一切,只需你输入数值它就会照所声明的方式传递.总的来说,ByVal 是把实际的数值传递给函数,而 ByRef 是把地址传给函数.唯一的麻烦就是 Any 类型. 把字符串传递给 API 函数也并不难.API 函数需要的是字符串首字符的地址,然后读取该地址直到遇到一个 Null 字符.听起来很糟糕,但只是 VB 处理字符串的实际方法.你唯
26、一要记住的是一定要按引用传递(ByRef)字符串 当你想得到所需的函数返回值信息时,情况有稍微的一点不同.这里是 GetComputerName 函数的声明:Declare Function GetComputerName Lib “kernel32“ Alias “GetComputerNameA“(ByVal lpBuffer As String, nSize As Long) As Long第一个参数是一个指向字符串的远程指针,第二个参数是字符串的长度.如果你只是简单的声明一个字符串类型的变量并把它传递给函数,就会出现错误.因此,你首先需要初始化字符串.这里是如何得到计算机名字的例子:
27、Dim Buffer As StringBuffer = Space(255)Ret& = GetComputerName(Buffer, Len(Buffer)if Ret& 0 then CompName$ = Left(Buffer, Ret&)在这里,待传递的字符串被初始化为有 255 个空格的字符串.我们把它传递给函数同时还有它的长度.如果出错则返回值为 0.CompName 中将保存计算机名. 有些函数也需要传递数组,这里是一个例子 :Declare Function SetSysColors Lib “user32“ Alias “SetSysColors“ (ByVal nCh
28、anges As Long, lpSysColor As Long, lpColorValues As Long) As Long最后两个参数是 Long 型数组.为了传递数组,你只需传递它的第一个元素.下面是示例代码:Const COLOR_ACTIVECAPTION = 2Const COLOR_INACTIVECAPTION = 3Const COLOR_CAPTIONTEXT = 9Const COLOR_INACTIVECAPTIONTEXT = 19Dim SysColor(3) As LongDim ColorValues(3) As LongDim Ret& SysColor(
29、0) = COLOR_ACTIVECAPTIONSysColor(1) = COLOR_INACTIVECAPTIONSysColor(2) = COLOR_CAPTIONTEXTSysColor(3) = COLOR_INACTIVECAPTIONTEXTColorValues(0) = RGB(58, 158, 58) 深绿ColorValues(1) = RGB(93, 193, 93) 浅绿ColorValues(2) = 0 黑色ColorValues(3) = RGB(126, 126, 126) 灰色Ret& = SetSysColors(4&, SysColor(0), Col
30、orValues(0)该程序将改变所有活动和非活动窗口的标题栏背景和文本的颜色.针对 API 编程初学者的教程第四篇文章来源:vb 大世界回调(CallBacks)所谓回调,就是你自己定义一个函数,并告诉 Windows 何时为何调用.你可以写一个有特定数量和类型参数的函数,然后告诉 Windows 何时调用 ,并传递给它所需的参数.Windows 就会调用你定义的函数,处理参数,并给你返回值.回调的一个典型应用是从 Windows 获得连续的数据流.这里是一个需要回调的函数的声明:Declare Function EnumWindows Lib “User32“ByVal lpEnumFun
31、c As Long, ByVal lParam As Long) As Long第一个参数是你的回调函数的地址,第二个参数是你想传递的的任意数值.该值将被传递到你的函数,于是你就知道了它要调用什么.VB 5.0 已经提供了一个很有用的操作符 AddressOf ,可以得到一个函数的地址.当你调用一个函数时它只能用在参数的前面,下面这种用法是错误的并且会导致出错:FuncP = AddressOf MyFunction因此你必须这样调用 EnumWindows 函数:Success& = EnumWindows(AddressOf cbFunc, 58&)你必须也要自己写回调函数.问题是有很多不
32、同类别的回调并且有各种各样的参数,有关这些参数的描述可以在 SDK 帮助或 MS SDK 文档中找到 .这里是一个回调的声明:Function cbFunc (ByVal Hwnd, ByVal lParam) as Long这里是一个回调的例子:Private Declare Function GetWindowText Lib “user32“ Alias “GetWindowTextA“(ByVal hwnd As Long,ByVal lpString As String,ByVal cch As Long) As LongSuccess& = EnumWindows(AddressO
33、f cbFunc, 58&)Function cbFunc (ByVal Hwnd, ByVal lParam) as LongIf lParam = 58 then enum windowsStr$ = Space(255) Ret& = GetWindowText(Str$, Len(Str$)Debug.Print Left(Str$, Ret&)End IfEnd Function这个例子将列出窗口的标题,(不包含子窗体 )窗口程序Windows 并不知道事件. 这些是 VB 特有的隐藏 Windows 获取你的窗口发生事件的真正方法的一种方式.VB 很像是一个将 Windows 语言
34、翻译成 VB 语言的解释器.但是事实并非如此,你很快就会遇到.设想你想知道用户何时加亮了菜单选项(不是点击,只是加亮即选择了)VB 并不提供这种事件,但你可能见到其他的程序 ,但你浏览它的菜单时状态栏会出现相应的文字.如果他们能,你为何不能?OK,这里是大致的真实情况.每个窗口都有一个特殊的程序叫做窗口程序.它实际上是一个回调函数.该函数将在你的窗口发生事件的任何时间发送消息.这样当用户加亮一个菜单项时就会发送一条消息(WM_COMMAND).那为什么我看不到这条消息呢?这是因为是 VB 创建窗口程序而不是你.当 Windows 发送消息时,该程序将为之分派特定的事件,并将其参数转换为比较容易
35、用的事件的参数.但是在有些情况下,它会忽略有些消息而不能收到真实的输入.如果你真的想得到这些消息,你必须对你的窗体进行子类处理,我们将在另外一个主题中谈到.这里是一个回调窗口程序的声明:Function WindowProc(ByVal Hwnd As Long, ByVal wMsg As Long,ByVal wParam As Long, ByVal lParam As Long) As Long第一个参数指定窗口的句柄,第二个参数是消息的标识符(如 WM_COMMAND 或 WM_MOUSEMOVE),wParam 和 lParam 时两个 32 位的数值,它们的意义依赖于消息的类型.
36、针对 API 编程初学者的教程第五篇文章来源:vb 大世界子类处理当你一最大限度利用了 VB 所给你的并且还想知道更多的东西,或只是想更多地了解你自己的窗口,你将会发现子类处理的优势.子类处理是指用一个新的窗口函数来取代当前活动窗口函数.这个用户自定义函数能处理任何需要的消息,并能调用原来的窗口函数,它将在原来的窗口函数之前收到各种消息.但原来的那个窗口处理函数依然存在,并没有消失.如果你不想处理某条消息,你应该让原来的窗口函数去处理它.子类处理是通过调用 SetWindowLong 函数实现的,该函数将改变指定窗口的特殊属性 .下面是它的声明:Declare Function SetWind
37、owLong Lib “user32“ Alias “SetWindowLongA“(ByVal hwnd As Long, ByVal nIndex As Long,ByVal dwNewLong As Long) As Long第一个参数代表要进行子类处理的窗口,第二个参数应该是 GWL_WNDPROC(-4),第三个参数是新的窗口函数的地址.参见回调和窗口函数一节.此函数将在窗口取得焦点,发生事件,或其他情况下(如其他进程改变了系统的某些参数) 被随时调用.如果发生错误 SetWindowLong 函数将返回 0,否则将返回原来的窗口函数的地址 .这个地址特别重要,你应该把它保存在一个变
38、量中或其他地方.当你不处理某些消息时(实际上,你可能只处理不到 1%的消息,其他的都将由原窗口函数处理),调用原来的窗口函数就需要该地址 .调用原窗口函数将由 CallWindowProc 来完成.这里是它的声明:Declare Function CallWindowProc Lib “user32“ Alias“CallWindowProcA“(ByVal lpPrevWndFunc As Long,ByVal hWnd As Long,ByVal Msg As Long,ByVal wParam As Long, ByVal lParam As Long) As Long第一个参数是原窗口
39、函数的地址,其他的同你接收到的四个参数一样.你可以改变其中的值来控制对消息的处理.例如,当你收到了一条 WM_MOUSEMOVE 消息时,你从 lParam 中得到鼠标所在位置的坐标并将其改成了其他的坐标.那么原窗口函数就会认为鼠标位于其他的位置从而做出一些有趣的事如显示其他控件的 Tooltip.你指定的返回值也是有意义的,它依赖于发送的消息.在结束你的程序时将控制权交回给原窗口函数是很重要的,通常在 Form_Unload 中完成如下:Ret& = SetWindowLong(Me.Hwnd, GWL_WNDPROC, oldWndProcAddress)如果你在 VB 中启动程序时忘掉了
40、这一行,结果将是 VB 崩溃并会丢失尚未保存的数据.千万要小心.这里是子类处理的一个简单示例:Dim oldWndProc As LongPrivate Sub Form_Load()oldWndProc = SetWindowLong(Me.Hwnd, GWL_WNDPROC, AddressOf MyWndProc)End SubPrivate Sub Form_Unload()Ret& = SetWindowLong(Me.Hwnd, GWL_WNDPROC, oldWndProc)End SubFunction MyWndProc(ByVal Hwnd As Long,ByVal wM
41、sg as Long,ByVal wParam As Long,ByVal lParam As Long)Debug.Print wMsg & “ “ & wParam & “ “ & lParamRet& = CallWindowProc(oldWndProc, Hwnd, wMsg, wParam, lParam)End Function处理参数有时函数并不以你所需的方式返回信息.一个典型的例子是将两个代表鼠标位置的整形(2 byte)数合并为一个 4 Byte 的数.还有一个例子是判断一个数的某位是否为 1.你还可能得到一个代表一个结构地址的 Long型数.合并和分离一个数并不需要过多的
42、描述.你能在下面的网站( APIMacro.bas,它包含了你需要的多种函数.可以用一下方法检查一个数的第 N 位是否为 1:If Value and (2N) then .置 1Value = Value Or 2N置 0Value = Value And Not 2N如果你想设定或取得预先知道的某位的信息,用 1024 代替 210 要快的多 .因为这样 VB 无需自己进行计算(VB 憎恨 “ ?).如果你接收到一个类型的指针,你要做的工作将稍多一点.你可以使用 CopyMem 函数来取得信息.下面是它的声明:Declare Sub CopyMem Lib “kernel32“ Alias
43、 “RtlMoveMemory“ (pDest As Any, pSource As Any, ByVal ByteLen As Long)如果你接收到了一个指向 RECT 类型的指针并存在 Long 型变量 Addr 中,可以这样处理:Dim Info As RectCall CopyMem(Info, ByVal Addr, len(Info)注意 ByVal 关键字.现在,如果你想把信息写回,使用:Call CopyMem(ByVal Addr, Info, Len(Info)结束语我希望这份教程能帮助你理解如何控制 API 函数的威力和如何正确使用它们.但是要小心! 就像火,如果你让它失去控制,你就会玩蛋.当然,不要忘了 VB 是进行简单.安全程序设计的语言,而 API 函数则正好相反.如果你想得到更多的控制功能,最好转移到 VC+ 或者 Delphi.(这一点,洞主不敢苟同).祝你在 API 探险中好运!
