以文本方式查看主题 - 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 --
|
||||
-- 作者:有点甜 -- 发布时间:2015/1/29 12:13:00 --
|
||||
-- 作者:hqy168168 -- 发布时间:2015/1/29 12:22:00 -- 能解决问题,感谢辛勤回答 |