以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  SplitContainer我设置窗口改变大小自动设置比例，可是有问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=85519)
--  作者：a937775799
--  发布时间：2016/5/27 10:32:00
--  SplitContainer我设置窗口改变大小自动设置比例，可是有问题
我在主窗口的sizechanged 这样写
Dim sc1 As WinForm.SplitContainer = e.Form.Controls("sc1")
\'sc1.IsSplitterFixed = False
Dim sc1_p1 As WinForm.SplitPanel = sc1.Panel1
Dim sc1_p2 As WinForm.SplitPanel = sc1.Panel2
sc1_p1.ExtendSize = New Size(sc1.Width,sc1.Height/2)
sc1_p2.ExtendSize = New Size(sc1.Width,sc1.Height/2)
窗口变了后这样了
图片点击可在新窗口打开查看
--  作者：大红袍
--  发布时间：2016/5/27 11:47:00
--  
Dim sc1 As WinForm.SplitContainer = e.Form.Controls("SplitContainer1")
sc1.SplitterDistance = sc1.Height / 2