zerozha 发表于 2012-2-16 22:01:35

【已解决】GUI中StatusBar如何跟着窗口一起放大缩小?

本帖最后由 zerozha 于 2012-2-17 08:52 编辑

        $StatusBar1 = _GUICtrlStatusBar_Create($Main)
        Dim $StatusBar1_PartsWidth =
        _GUICtrlStatusBar_SetParts($StatusBar1, $StatusBar1_PartsWidth)
        _GUICtrlStatusBar_SetText($StatusBar1, "数据库:" & $adSource, 0)
        _GUICtrlStatusBar_SetText($StatusBar1, @TAB & "共有条记录", 1)
窗口中所有的控件都可以在窗体最大化后,自动伸展,就只有StatusBar不行,请问,该如何处理呢?

呵呵,感谢各位,已解决。代码如下:       
;注册Windows消息函数
GUIRegisterMsg($WM_SIZE, "WM_SIZE")

;根据窗口大小,调整状态栏
Func WM_SIZE($hWnd, $iMsg, $iwParam, $ilParam)
        #forceref $hWnd, $iMsg, $iwParam, $ilParam
        _GUICtrlStatusBar_Resize($StatusBar1)
        Return $GUI_RUNDEFMSG
EndFunc   ;==>WM_SIZE

nmgwddj 发表于 2012-2-16 22:15:45

这个没研究过,一直都是在做固定大小的窗口,可以先判断窗口宽度,然后根据宽度比例设置控件宽度。

afan 发表于 2012-2-16 22:33:35

本帖最后由 afan 于 2012-2-16 22:35 编辑

注册 $WM_SIZE 消息,在该消息中 设置 $StatusBar1_PartsWidth 数组的值
_GUICtrlStatusBar_SetParts($StatusBar1, $StatusBar1_PartsWidth)

如果状态栏简单,_GUICtrlStatusBar_Resize() 即可

mybkc 发表于 2014-9-17 09:23:07

学习了!!!!!!!!!!!!
页: [1]
查看完整版本: 【已解决】GUI中StatusBar如何跟着窗口一起放大缩小?