api 入门到精通 是什么.docx

1、api 入门到精通 是什么回复 引用 TOP 杭州元帅 发短消息 加为好友 杭州元帅 当前离线 UID17052帖子1887精华8积分6212威望1852 金钱2677 人气11 阅读权限100在线时间349 小时注册时间2004-2-5最后登录2010-7-26贵宾帖子1887精华8威望1852 擂点0 人气11 注册时间2004-2-54楼 发表于 2004-2-28 12:06 | 只看该作者 第三课窗口函数 一、 关于窗口函数 在上一堂课里，我们已经提出了句柄的概念，并为此进行了较深度的讨论。现在来想，我要补充的是，句柄并非是仅仅是窗口才有的。似乎所有的WINDOWS对象都具有句柄。如

2、，GDI对象中的画笔、刷子等，不久即将要学习的设备场景等也有自己的句柄，等等。但，和一些控件不同，这些对象并不属于窗口。什么是窗口呢?有一句非常有趣的话如果它位于屏幕，那么它肯定是在一个窗口里；如果它不在于屏幕，它仍然可能在一个窗口里。窗体也是窗口；滚动条、列表框，文本框，甚至是桌面上的快捷图表也是窗口。更有趣的是，就连作为背景的桌面也是窗口。 很多控件基本上都提供了hWnd属性，但没有提供的也有。对于这些控件可以用SetFocus方法，将输入焦点设向控件，然后用API函数GetFocus取得当前具有焦点的那个窗口的句柄。当然，这一过程应当写在GoFocus事件中。在我碰到过的问题中有一个有趣

3、的事情是，VB提供的IE控件的hWnd属性不管用。这个问题我一般都采用上述方法来解决的。很多窗口函数都能对系统的任何窗体进行操作。这意味了VB程序可以直接操纵正在运行中的其他窗体。大家知道，如果对VB设计出的程序未做特殊的处理，那么我们可以启动多个该应用程序实例。我们可以利用API窗口函数来判断一个窗体的先例是否在运行当中，从而可以做到如果有先例则停止启动。很多应用程序就是这个样子的。比如四通利方中文平台，在已经启动的情况下再此启动，程序会告诉用户四通利方已经在运行，并停止启动。 窗口函数主要可分为四个类型(也许说为这是为了这次讲课分类出来的更适合一些)1、窗口分级函数；2、窗口位置与大小函数

4、；3、窗口信息函数；4、其他窗口函数。以下我们就一一讲述。但由于窗口函数比较多，在这里就选择性的进行讨论。关于窗口函数有多少，具体的用法如何，您可以注意小雁侠的VB API站点的技术文档，或者本站程序下载栏目中的WinAPI帮助文。由于帮助文其内容来自小雁侠的网站，因此其内容更新比较起来会较晚一些。 二、窗口分级函数 系统中运行的窗口是有级别的高低之分的。谁不知道这样?这当然是废话。很多文章都是采用类似的这种废话来做导语，在这里我只不过也是学学而罢。一、父子关系。每个窗口都可能有自己的父窗口和子窗口。但，系统中运行的窗口是有限的，说明总得有个窗口是没有其父，我们把它叫做顶级窗口。一般把一个应用

5、程序的主窗口就是顶级窗口，VB独立窗体及MDI窗体都是顶级窗口。窗口间的父子关系一般遵循以下规则1、父窗口显示时，所有包容在其中的可见的子窗口会随着父窗口的显示而显示出来。 2、父窗口隐藏时，所有包容在其中的子窗口会随着父窗口的隐藏而隐藏。3、父窗口被卸载时，哈，您已经知道我想说什么了，当然是跟着自动卸载。4、父窗口移动时，跟着移动。二、兄弟关系及Z序列当然，一位父亲有好几个儿女，都是常见的事情。同样，一个父窗口可以拥有多个子窗体。比如，位于一个窗体中的各种控件之间以及MDI窗口的各子窗口之间的关系。父窗口与子窗口的显示、隐藏、卸载及移动，其先后顺序是显而易见的。那么各兄弟窗口之间的情况会是如

6、何呢? 显然，两个互相重叠的两个子窗体不能都同时显示出它的全貌，自然有个显示的顺序规则。这个顺序规则叫做Z序列。有个解释为，如果把屏幕坐标看层X和Y轴组成的平面(事实上正是如此)，那么作为三维坐标系统Z轴可看做是垂直于屏幕的坐标轴。这样，可以认为屏幕上的所有窗口是垂直于这个Z轴的。在Z轴上，谁在前，谁在后，就产生了一个Z序列。很生动！可用WINDOWS API函数和Visual Basic Z序列方法对Z序列进行控制。 有了以上简单的知识以后，我们就不难应用API窗口分级函数，主要有以下及个窗口分级函数 函数名 说 明FindWindow 按类名或窗口名(Caption)查找一个窗口FindW

7、indowEx 类似于FindWindow提供了更多的功能GetLastActivePopup针对指定的窗口，取回上一个活动的弹出式窗口的句柄GetParent 获得指定窗口父窗口的句柄GetTopWindow 获得指定窗口的第一个子窗口的句柄GetWindow 如给定一个窗口句柄，该函数能取回具有特定关系的另一个窗口 的句柄。如，第一个子窗口、父窗口或窗口列表内的上一个或下一个窗口。SetParent 改变任何窗口的父窗口。从我个人的经验来看，我最常用的是GetWindow和SetParent函数。 三、窗口位置与大小函数 Windows API函数基本上都是(尤其是USER32.DLL动态

8、连接库内的函数)以屏幕像素为度量单位的。这一点很重要，必须牢记。为此，在使用API函数的时候，我们经常把窗体或图片框控件的ScaleMode属性设置为3，即vbPixels(像素)。理解窗口位置及大小函数的关键在于分清屏幕坐标、窗口坐标及客户坐标这三个概念。以下图展示了这三个坐标系统之间的关系。 屏目、窗口与客户区坐标系统 只要对这些坐标有了明确的概念，对使用窗口位置及大小函数就不难了。关于窗口的位置，有些函数返回的是上一堂课学习到的RECT结构。有关窗口位置及大小函数如下表所列窗口位置及大小函数 函数名 说 明BringWindowToTop 使指定的窗口进入可见窗口列表的顶部，如它被部分或

9、全部隐藏，则令其全部可见。同时，该窗口成为当前活动窗口。只有从前台线程调用时，才生效。ChildWindowFromPoint 在规定的坐标取得某子窗口的句柄(如果有的话)，这儿的坐标是指相对于父窗口的客户区坐标。ChildWindowFromPointEx与 ChildWindowFromPoint相同，功能更强。ClientToScreen 判断指定点在窗口客户区内的屏幕坐标。GetClientRect 获得对窗口客户区进行表述的一个矩形(RECT)。这是以像素为单位判断客户区大小的一个简便的方法。GetWindowPlacement 获得指定窗口的一个WINDOWPLACEMENT结构。

10、该结构说明了窗口的状态。GetWindowRect 用于获得一个矩形(RECT)结构，它描述了窗体在屏幕坐标系统中的位置。MapWindowPoints 对某窗口客户区坐标内的一个或多个点进行转换，用另一窗口的客户区坐标表示。MoveWindow 移动指定窗口的位置，并能改变它的大小。OpenIcon 将一个最小化窗口恢复为原始状态。ScreenToClient 针对屏幕内一个指定的点，用某个特定窗口内的客户区坐标表示它。SetWindowsPos 更改窗口的位置和大小，并能修改它在内部窗口列表内的位置(这个列表起着控制窗口先是顺序)。SetWindowPlacement 在一个WINDOWP

11、LACEMENT结构的基础上，设置某窗口的特征。该结构描述了窗口的状态，以及它在最小化、最大化或正常显示时的位置。WindowFromPoint 根据屏幕上一个指定的点，判断哪个窗口正位于它的下面。以上函数的具体用法均可在WinAPI帮助文中找到。在这些函数当中，SetWindowsPos函数的使用率比较高，现在很多人都是用这个函数来实现窗口总在前面的效果，即通过HWND_TOPMOST常数把窗口置于列表顶部。如果想把From1置于列表顶部，方法如下SetWindowPos Form1.hWnd, HWND_TOPMOST, Form1.Left / Screen.TwipsPerPixelX

12、, Fo rm1.Top Screen.TwipsPerPixelY, Form1.Width Screen.TwipsPerPixelX, Form1.Height Screen.TwipsPerPixelY, 0 您可以把这行代码放在Paint事件中。另外，GetWindowRect函数、MoveWindow函数以及下一课堂即将要学到的GetCursorPos函数的相互配合能够实现一个拖动无标题栏的窗口。这是您必须掌握的技巧之一。感兴趣的朋友，可以到前线的源码解析栏目，下载第4号演示程序。以下是其主要的代码部分Private MyRect As RECTPrivate MyPoint As

13、 POINTAPIPrivate Movex As Long, Movey As Long Private Sub Image1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) Dim dl&dl& = GetWindowRect(Form1.hwnd, MyRect)dl& = GetCursorPos(MyPoint)If Button = 1 ThenMovex = MyPoint.X - MyRect.LeftMovey = MyPoint.Y - MyRect.TopEnd IfEnd

14、Sub Private Sub Image1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)Dim dl&dl& = GetCursorPos(MyPoint)If Button = 1 Thendl& = MoveWindow(Form1.hwnd, MyPoint.X - Movex, MyPoint.Y - Movey, _ MyRect.Right - MyRect.Left, MyRect.Bottom - MyRect.Top, -1)End IfEnd Sub在MouseDown事件

15、中，程序首先用 GetWindowRect 函数确定窗口在屏幕中的位置。再次是通过GetCursorPos函数确鼠标在屏幕中的位置。从而可通过计算获得鼠标位置与窗口左上角之间的横向与纵向距离(Movex与Movey)。在紧接着发生的MouseMove事件中程序不断地用GetCursorPos函数获得鼠标当前的位置，并按前面已经求得的Movex与Movey判断窗口所应处的位置，而这在MoveWindow函数调用中直接完成。MoveWindow函数将窗体移动到新的位置。 四、窗口信息函数 所谓窗口信息函数就是用来获取有关窗口当前状态信息的函数。这类函数主要有 函 数 说 明GetClassInfo

16、 取得指定窗口的类信息结构GetClassInfoEx 效果类似于GetClassInfo,但增加了一些功能GetClassLong,GetClassWord用于获取窗口类信息SetClassLong,SetClassWord用于设置窗口类信息GetClassName 获取窗口类名GetDesktopWindow 获取整个桌面(屏幕)的窗口句柄GetWindowLong,GetWindowWord 获取与窗口有关的信息SetWindowLong,SetWindowWord 设置与窗口有关的信息GetWindowText获得窗口文本。它的效果大致等价于窗体或控件的Text属性GetWindowT

17、extLength获得窗口文本的长度，用字符数表示。IsChild 判断某窗口是否为另一窗口的子窗口或从属窗口。IsIconic 判断某窗口是否处于最小化状态IsWindow 判断指定的句柄是否为窗口句柄。IsWindowEnabled 判断指定的窗口是否处于活动状态。IsWindowVisible 判断某窗口是否可见。IsZoomed 判断窗口是否处于最大化状态。SetWindowText 设置窗口文本。大致等价于窗体或控件的Text属性。大部分窗口信息函数是非常好理解的，按照有关手册中进行的函数说明，按指定数据类型进行调用即可。有必要说明的是，关于类和窗口的样式位。Windows是用一个长

18、整形的数据的位设置方式来记录类和窗口的样式的。其中，窗口样式由一个32位样式以及另一个32位扩展样式来构成。类样式操作由上述列表中的GetClassLong以及GetClassLong来进行，窗口样式操作由GetWindowLong 以及SetWindowLong来进行。由于样式位的内容较多，我无法在此给出，您可以参考有关手册。这里有必要提醒大家的是，您想改变或获取当前窗口或类的样式，绝大多数情况可以考虑样式位操作。下面，就这个问题举一个简单了例子来说明。 下面是用BS_LEFTTEXT样式位将VB复选框或选项按钮的文本在左边和右边之间相互移动来、移动去的程序(是附带的Program1.vbp

19、的部分内容)。程序的原理很简单。首先用GetWindowLong函数获得当前样式位的信息，然后通过位操作来准备新的样式位信息，最后用SetWindowLong实际地去更改。如下Dim f&, dl&f& = GetWindowLong(Option1.hWnd, GWL_STYLE) 获得当前样式位的信息If Index = 0 Thenf& = f& Or BS_LEFTTEXT Elsef& = f& And Not BS_LEFTTEXTEnd Ifdl& = SetWindowLong(Option1.hWnd, GWL_STYLE, f&) 设置新的样式位Option1.Refres

20、h(对Or和And位操作不熟悉的朋友，请参考有关技术资料)在这里，对样式位不进行更详细讨论，主要有这样一个原因。用SetWindowLong函数改变一个样式位之后，不会导致窗口发生相应的变化(至少不会立即变化)。有些样式位可能在运行时候才会成功变化，而大多数都只在窗口创建时才生效。因为，用API方式创建一个窗体已经超出了本教程的范围，就算我在这里对样式位谈得再多，您可能也没有多大用处。同时，微软公司没有告诉我们哪些样式位在运行期间安全地改变，因此对具体的情况，只好靠自己进行具体试验。而从我个人的实际编程经验来看，没有特别的要求，我们不大会涉及到这些样式位操作，很多都可在VB中很方便地实现。 本

21、教程还附带了一个Program2.vbp的演示程序。是我本人随便编写的，没什么特别希罕之处。想看就看看好了。最后，想简单提一提的是，使用SetWindowLong函数的时候，改变GWL_WNDPROC数据是非常危险的(系统或VB经常挂死)，即更改窗口函数的位置。一般，这种更改在需要进行子类处理的地方应用到。每次试运行程序，都应当习惯性地进行存盘。 五、其他窗口函数API中还有以下本教程未列出的窗口函数，以供大家参考。 函数名 说 明AnyPopup 判断是否存在可见的弹出式窗口CascadeWindows 令窗口在一个父窗口内层叠显示CloseWindow 对指定的窗口进行最小化处理(如果它是

22、个钉级窗口)对弹出式及子窗口无效DestroyWindow 清除指定的窗口以及下属所有子窗口与包容窗口DrawAnimatedRects 获得窗口打开或关闭的动画效果EnableWindow 激活或屏蔽(禁用)指定窗口FlashWindow 令指定窗口的标题闪烁显示GetUpdateRect 判断需要更新的那个窗口的位置GetWindowContextHelpId取得与窗口关联在一起的帮助场景InvalidateRect 指定窗口内需要更新的全部或部分客户区IsWindowUnicode 判断一个窗口是否期望文本消息采用Unicode格式LockWindowUpdate 允许或禁止描绘指定的窗

23、口RedrawWindow 一个功能强大的函数，用于控制全部或部分窗口重画ScrollWindow,ScrollWindowEx滚动显示窗口的全部或部分客户区SetWindowContextHelpId设置与窗口关联在一起的帮助场景ShowOwnedPopups 隐藏或显示从属于指定窗口的所有保容弹出窗口ShowWindow 用于设置窗口的状态，其中包括窗口的隐藏、显示、最小化、最大化以及激活等ShowWindowAsync 类似于ShowWindow，增加了对其他进程内的窗口进行操作的能力TileWindows 令窗口在一个父窗口内平铺显示UpdateWindow 立即更新窗口内需要更新的任何部分ValidateRect 指出全部或部分矩形已经更新，毋需再更新其中，FlashWindow函数非常有趣，不妨大家试一试。 VBGood论坛 新手发帖必读