Private 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 Private Const SWP_NOSIZE As Long = &H1Private Sub Form_Load() SetWindowPos Me.hwnd, 0, -1000, -1000, 0, 0, SWP_NOSIZE End Sub
试试 setparent me.hwnd,gamewindow.hwnd
me.hide
...
这个方法有点。。
(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
Private Const SWP_NOSIZE As Long = &H1Private Sub Form_Load()
SetWindowPos Me.hwnd, 0, -1000, -1000, 0, 0, SWP_NOSIZE
End Sub
把位置设在你看不到地方,不就是隐藏吗?
SetWindowPos Me.hwnd, -1, -1000, -1000, 0, 0, SWP_NOSIZE 这样可以把窗体置顶
把-1换成0是不会隐藏窗体的
showwindow,setwindowpos这样的函数都无法实现隐藏,游戏窗口的句柄还是有效的,真迷糊了