以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  分区面板分割线居中  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=52712)
--  作者：htlk25
--  发布时间：2014/6/20 22:15:00
--  分区面板分割线居中
版主，请问分区面板分割线可以用代码实现始终处于整个分区面板的垂直或水平居中的位置吗！多谢了！
也就是说把整个分区始终对半分!
再次感谢！
--  作者：Bin
--  发布时间：2014/6/21 8:39:00
--  
自己居中对半分好, 然后在空间属性里 设置分割图固定属性=True
--  作者：blackzhu
--  发布时间：2014/6/21 16:43:00
--  
有个属性的,                   然后用代码写宽度等于窗口的一般 试试
--  作者：逛逛
--  发布时间：2014/6/21 19:32:00
--  

窗口  AfterLoad

Dim sc As WinForm.SplitContainer = e.Form.Controls("SplitContainer1")
sc.IsSplitterFixed = True
sc.SplitterDistance = (sc.width - sc.SplitterWidth)/2

 

窗口 SizeChanged

 

Dim sc As WinForm.SplitContainer = e.Form.Controls("SplitContainer1")
sc.SplitterDistance = (sc.width - sc.SplitterWidth)/2
--  作者：htlk25
--  发布时间：2014/6/21 21:07:00
--  
这个方法太棒了，原来没留意，十分感谢！！