控制窗口大小例子

风行者 · 发表于 2012-1-17 14:38:19

;功能：控制窗口最小尺寸100 x 100,最大尺寸400 x 400
Global Const $WM_GETMINMAXINFO = 0x0024
$Gui = GUICreate("控制窗口大小", 300, 300, -1, -1, 0x00040000) ;$WS_SIZEBOX
GUISetState()
GUIRegisterMsg($WM_GETMINMAXINFO, "WM_GETMINMAXINFO")

Do
Until GUIGetMsg() = -3

Func WM_GETMINMAXINFO($hwnd, $Msg, $wparam, $lparam)
        Local $tagMINMAXINFO = "int;int;int;int;int;int;int;int;int;int"
        $MINMAXINFO = DllStructCreate($tagMINMAXINFO, $lparam)
        DllStructSetData($MINMAXINFO,7,100) ;minx
        DllStructSetData($MINMAXINFO,8,100) ;miny
        DllStructSetData($MINMAXINFO,9,400) ;maxx
        DllStructSetData($MINMAXINFO,10,400) ;maxy
EndFunc   ;==>WM_GETMINMAXINFO

Ycxw2008 · 发表于 2012-1-17 15:00:43

回复 3# 风行者

恩,谢谢

Ycxw2008 · 发表于 2012-1-17 14:41:24

回复 1# 风行者

哈喽,帅哥,你停靠边栏触发研究的咋样了?
能否分享点经验

风行者 · 发表于 2012-1-17 14:45:37

回复 2# Ycxw2008

你说这个么？窗口收缩

$hForm = GUICreate('My GUI',250,600)
GUISetState()

While GUIGetMsg() <> -3
        _WinHide($hForm)
        Sleep(10)
WEnd

Func _WinHide($Hwnd)
        $Wp = WinGetPos($hForm)
        $Mp = MouseGetPos()
        Select
                Case $Wp[1] <=3
                        If ($Mp[0]<$Wp[0] Or $Mp[0] > $Wp[0]+$Wp[2] or $Mp[1] > $Wp[1]+$Wp[3]) Then
                                WinMove($Hwnd,"",$Wp[0],3-$Wp[3],$Wp[2],$Wp[3],1)
                        Else
                                WinMove($Hwnd,"",$Wp[0],3,$Wp[2],$Wp[3],1)
                        EndIf
                Case $Wp[0] >= (@DesktopWidth - $Wp[2]+3)
                        If ($Mp[0]<$Wp[0] Or $Mp[1] < $Wp[1] Or $Mp[1] > $Wp[1]+$Wp[3]) Then
                                WinMove($Hwnd,"",@DesktopWidth - 3,$Wp[1],$Wp[2],$Wp[3],1)
                        Else
                                WinMove($Hwnd,"",@DesktopWidth - $Wp[2]+3,$Wp[1],$Wp[2],$Wp[3],1)
                        EndIf
        EndSelect
EndFunc

qq271859852 · 发表于 2012-1-17 17:39:13

谢谢分享经验！

jtw · 发表于 2012-1-17 20:04:43

收藏备用，哈

Chinacat · 发表于 2012-1-17 20:13:01

嗯嗯，不错，两天就搞定，呵呵

seniors · 发表于 2012-1-17 20:13:23

谢谢提供,不错
不过查了一下结构,注释有点问题
typedef struct tagMINMAXINFO {
  POINT ptReserved;
  POINT ptMaxSize;
  POINT ptMaxPosition;
  POINT ptMinTrackSize;
  POINT ptMaxTrackSize;
} MINMAXINFO, *PMINMAXINFO, *LPMINMAXINFO;
7,8,9,10不是minx,miny,maxx,maxy
应该是
MinTrackSize,MaxTrackSize
即鼠标拖动的最小最大尺寸

zldfsz · 发表于 2012-1-17 22:34:39

不错，收下了

xiehuahere · 发表于 2012-1-29 21:20:44

回复 3# 风行者

不错。
不过同时靠右和靠上的情况（即右上角）还可以再处理下。

ferelove · 发表于 2012-2-20 08:14:59

回复 3# 风行者

强大，我测试左边和下边不行呢？请指教。谢谢！

lxzan · 发表于 2012-2-24 08:17:09

学习学习......

sun777222 · 发表于 2012-3-2 12:06:01

谢谢分享！学习了...

chzj589 · 发表于 2012-7-22 23:09:51

谢谢分享

鸟人 · 发表于 2012-7-31 17:39:22

这个不错，谢谢提供，

		自动登录	找回密码
密码			加入

[交流] 控制窗口大小例子

评分