以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  分区面板嵌套问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=63796)

--  作者:hqy168168
--  发布时间:2015/1/29 0:43:00
--  分区面板嵌套问题
有分区面板SplitContainer1,垂直分割,窗口form中fill
在右分区嵌套分区面板SplitContainer2,垂直分割,fill

目的:希望3个分区根据电脑分比率自动调整宽度,使得每个分区各占SysInfo.WorkingAreaWidth的三分之一
窗口中的afterload事件为:
Dim sc1 As WinForm.SplitContainer = e.Form.Controls("SplitContainer1")
Dim sc2 As WinForm.SplitContainer = e.Form.Controls("SplitContainer2")
sc1.SplitterWidth = 1
sc2.SplitterWidth = 1
sc1.IsSplitterFixed = True
sc2.IsSplitterFixed = True
sc1.SplitterDistance = (SysInfo.WorkingAreaWidth - sc1.SplitterWidth - sc2.SplitterWidth)/3
sc2.SplitterDistance = (SysInfo.WorkingAreaWidth - sc1.SplitterWidth - sc2.SplitterWidth) * 2/3

问题:结果最左边的分区符合要求,但是中间和最右边的分区没有任何变化
请问代码问题是什么呢,怎么调整?非常感谢大家帮助解决


--  作者:Bin
--  发布时间:2015/1/29 8:04:00
--  
你减去 sc1.SplitterWidth 没有什么意义啊.  

你上例子我看看你是什么分法

--  作者:Bin
--  发布时间:2015/1/29 8:04:00
--  
减就应该减去整体才对的
--  作者:hqy168168
--  发布时间:2015/1/29 11:59:00
--  
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:新项目.foxdb



--  作者:有点甜
--  发布时间:2015/1/29 12:13:00
--  
    
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:新项目.foxdb


--  作者:hqy168168
--  发布时间:2015/1/29 12:22:00
--  
能解决问题,感谢辛勤回答