将所有窗口最小化
一些应用软件提供了一种方便的功能,只需要一个操作就可以将Windows桌面上的
所有窗口最小化。首先,我们要遍历桌面上的所有窗口;其次,要判断窗口类型,
桌面上的很多窗口无法最小化,或者窗口是不可见的,如中文Win 95中的输入法窗
口。最后,将类型符合的窗口最小化。下面通过程序来介绍如何实现这种功能。
首先,在Project中加入一个Module文件;然后,在Module中加入以下代码:
Public Declare Function EnumWindows Lib "user32" _
(ByVal lpEnumFunc As Long, ByVal lParam _
As Long) As Long
Declare Function GetWindowLong Lib "user32" Alias _
"GetWindowLongA" (ByVal hwnd As Long, _
ByVal nIndex As Long) As Long
Declare Function ShowWindow Lib "user32" (ByVal _
hwnd As Long, ByVal nCmdShow As Long) As Long
Public Const WS_MINIMIZEBOX = &H20000
本内容试读结束,登录后可阅读更多
下载后可阅读完整内容,剩余1页未读,立即下载