以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  分区面板  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=131356)

--  作者:实话实说
--  发布时间:2019/2/24 11:11:00
--  分区面板
如何使两个分区宽度保持相等,不受显示屏大小和分辨率影响

图片点击可在新窗口打开查看此主题相关图片如下:snap1.jpg
图片点击可在新窗口打开查看


--  作者:有点甜
--  发布时间:2019/2/24 11:22:00
--  

在sizechanged事件,写代码,如

 

Dim w As Integer = e.Form.width / 2
e.Form.controls("SplitContainer1").width = w
e.Form.controls("SplitContainer2").width = e.form.Width - w


--  作者:实话实说
--  发布时间:2019/2/24 11:42:00
--  
是在1个分区中的2个panel板,panel1和panel2



--  作者:有点甜
--  发布时间:2019/2/24 12:30:00
--  

那你设置 SplitterDistance 属性

 

控件.SplitterDistance = 控件.width / 2


--  作者:实话实说
--  发布时间:2019/2/24 13:18:00
--  
在哪设置?怎么设置?
--  作者:有点甜
--  发布时间:2019/2/24 13:46:00
--  
以下是引用实话实说在2019/2/24 13:18:00的发言:
在哪设置?怎么设置?

 

sizechanged事件写代码。

 

如果不会做,请发一个实例上来测试。


--  作者:实话实说
--  发布时间:2019/2/25 10:30:00
--  
抱歉,昨天外出了。
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:分区面板.foxdb



--  作者:有点甜
--  发布时间:2019/2/25 10:32:00
--  

sizeChanged事件

 

Dim sp2 As WinForm.SplitContainer = e.Form.Controls("SplitContainer2")
sp2.SplitterDistance = sp2.width / 2


--  作者:实话实说
--  发布时间:2019/2/25 11:00:00
--  
谢了