Vb SetWindowPos功能详解

函数原型　　BOOL SetWindowPos（HWND hWnd，HWND hWndlnsertAfter,int X，int Y,int cx，int cy,Flags）；

函数功能

　　该函数改变一个子窗口，弹出式窗口式顶层窗口的尺寸，位置和Z序。

　　子窗口，弹出式窗口，及顶层窗口根据它们在屏幕上出现的顺序排序、顶层窗口设置的级别最高，并且被设置为Z序的第一个窗口。

参数

hWnd:窗口句柄。

hWndlnsertAfter:在z序中的位于被置位的窗口前的窗口句柄。该参数必须为一个窗口句柄，或下列值之一：

　　 HWND_BOTTOM：将窗口置于Z序的底部。如果参数hWnd标识了一个顶层窗口，则窗口失去顶级位置，并且被置在其他窗口的底部。

　　HWND_NOTOPMOST：将窗口置于所有非顶层窗口之上（即在所有顶层窗口之后）。如果窗口已经是非顶层窗口则该标志不起作用。

　　HWND_TOP:将窗口置于Z序的顶部。

　　HWND_TOPMOST:将窗口置于所有非顶层窗口之上。即使窗口未被激活窗口也将保持顶级位置。

x：以客户坐标指定窗口新位置的左边界。

Y：以客户坐标指定窗口新位置的顶边界。

cx:以像素指定窗口的新的宽度。

cy：以像素指定窗口的新的高度。

Flags:窗口尺寸和定位的标志。该参数可以是下列值的组合：

　　SWP_ASNCWINDOWPOS：如果调用进程不拥有窗口，系统会向拥有窗口的线程发出需求。这就防止调用线程在其他线程处理需求的时候发生死锁。

　　SWP_DEFERERASE：防止产生WM_SYNCPAINT消息。

　　SWP_DRAWFRAME：在窗口周围画一个边框（定义在窗口类描述中）。

　　SWP_FRAMECHANGED：给窗口发送WM_NCCALCSIZE消息，即使窗口尺寸没有改变也会发送该消息。如果未指定这个标志，只有在改变了窗口尺寸时才发送WM_NCCALCSIZE。

　　SWP_HIDEWINDOW;隐藏窗口。

　　SWP_NOACTIVATE：不激活窗口。如果未设置标志，则窗口被激活，并被设置到其他最高级窗口或非最高级组的顶部（根据参数hWndlnsertAfter设置）。

　　SWP_NOCOPYBITS：清除客户区的所有内容。如果未设置该标志，客户区的有效内容被保存并且在窗口尺寸更新和重定位后拷贝回客户区。

　　SWP_NOMOVE：维持当前位置（忽略X和Y参数）。

　　SWP_NOOWNERZORDER：不改变z序中的所有者窗口的位置。

　　SWP_NOREDRAW:不重画改变的内容。如果设置了这个标志，则不发生任何重画动作。适用于客户区和非客户区（包括标题栏和滚动条）和任何由于窗回移动而露出的父窗口的所有部分。如果设置了这个标志，应用程序必须明确地使窗口无效并区重画窗口的任何部分和父窗口需要重画的部分。

　　SWP_NOREPOSITION；与SWP_NOOWNERZORDER标志相同。

　　SWP_NOSENDCHANGING：防止窗口接收WM_WINDOWPOSCHANGING消息。

　　SWP_NOSIZE：维持当前尺寸（忽略cx和Cy参数）。

　　SWP_NOZORDER：维持当前Z序（忽略hWndlnsertAfter参数）。

　　SWP_SHOWWINDOW：显示窗口。

　　返回值：如果函数成功，返回值为非零；如果函数失败，返回值为零。若想获得更多错误消息，请调用GetLastError函数。

使用说明：在VB中使用SetWindowPos()函数先要声明，声明函数直接就在外接程序中找到复制代码就可以了。因为函数中使用了常量，所以必须先要声明

下面是一个使用实例：

Public Declare Function SetWindowPos Lib "user32" (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal X As Long, ByVal Y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long

' SetWindowPos Flags
Public Const SWP_NOSIZE = &H1
Public Const SWP_NOMOVE = &H2
Public Const SWP_NOZORDER = &H4
Public Const SWP_NOREDRAW = &H8
Public Const SWP_NOACTIVATE = &H10
Public Const SWP_FRAMECHANGED = &H20        '  The frame changed: send WM_NCCALCSIZE
Public Const SWP_SHOWWINDOW = &H40
Public Const SWP_HIDEWINDOW = &H80
Public Const SWP_NOCOPYBITS = &H100
Public Const SWP_NOOWNERZORDER = &H200      '  Don't do owner Z ordering

Public Const SWP_DRAWFRAME = SWP_FRAMECHANGED
Public Const SWP_NOREPOSITION = SWP_NOOWNERZORDER

' SetWindowPos() hwndInsertAfter values
Public Const HWND_TOP = 0
Public Const HWND_BOTTOM = 1
Public Const HWND_TOPMOST = -1
Public Const HWND_NOTOPMOST = -2

Private Sub Form_Click()
    SetWindowPos Me.hwnd, HWND_BOTTOM, Me.ScaleLeft, Me.ScaleTop, 800, 600, SWP_NOMOVE
End Sub

上面一段代码是用来设置当前窗口在单击时隐藏在最底层