- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 如何灵活显示分区面板？ (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=192765)
-- 发布时间：2024/7/20 10:33:00
-- 如何灵活显示分区面板？
如图：分区面板-上，分区面板-下，
此主题相关图片如下：分区面板显示.png
-- 发布时间：2024/7/20 10:44:00
--
http://www.foxtable.com/webhelp/topics/1918.htm
-- 发布时间：2024/7/20 12:40:00
--
无法实现，请老师在实例上帮纠正，谢谢
-- 发布时间：2024/7/20 13:55:00
--
测试没有任何问题。上面的例子是自己给自己挖了个坑。把不同分区使用不同的背景，放不同的控件测试就明白了
-- 发布时间：2024/7/20 14:57:00
--
问题一：扩张时，分区面板分隔没有变化，需求，面板1扩张占分区面板的80%，分区面板分隔向下把面板2缩小到占分区面板的20%或在底部？实例执行，没有达到其效果，如何处理？
问题二：隐藏，隐藏面板2，分区面板分隔向下在窗口底，面板1占分区面板100%？实例执行，没有达到其效果，如何处理？
-- 发布时间：2024/7/20 15:10:00
--
1、这种不能设置Collapsed，要去设置SplitterDistance：http://www.foxtable.com/webhelp/topics/0819.htm
2、3楼实例测试没有任何问题，原因看4楼
-- 发布时间：2024/7/20 15:27:00
--
问题一：
Dim p As WinForm.SplitPanel = Forms("窗口4").Controls("SplitContainer1").SplitterDistance
p.ExtendSize = New Size(500, 400)
执行错：
无法将类型为“System.Int32”的对象强制转换为类型“Foxtable.WinForm.SplitPanel”。
问题二：
只隐藏面板2，分区面板分隔没有向下在窗口底，面板1占分区面板没有100%？表2也没跟变化？
-- 发布时间：2024/7/20 15:32:00
--
1、基本的对象和对象属性的概念都搞错了
Dim p As WinForm.SplitPanel = Forms("窗口4").Controls("SplitContainer1")
p.SplitterDistance = p.height * 0.8
2、分区面板1肯定有向下。至于表格，那是另外一个控件的设置，和面板有啥关系？
-- 发布时间：2024/7/20 15:55:00
--
2、分区面板1肯定有向下。我浿试没有向下，把您测试上传，我再测试一下，谢谢
-- 发布时间：2024/7/20 16:01:00
--
Dim p As WinForm.SplitPanel = Forms("窗口4").Controls("SplitContainer1")
p.SplitterDistance = p.height * 0.8
报错：SplitterDistance不是WinForm.SplitPanel 成员？