本帖最后由 zerozha 于 2012-2-17 08:52 编辑 $StatusBar1 = _GUICtrlStatusBar_Create($Main)
Dim $StatusBar1_PartsWidth[2] = [500, -1]
_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
|