- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 页面关闭时出错 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=118544)
-- 发布时间：2018/5/5 11:41:00
-- 页面关闭时出错
此主题相关图片如下：11.png
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:生管控制.zip |
-- 发布时间：2018/5/5 13:39:00
--
把test1窗口的BeforeClose代码去掉
-- 发布时间：2018/5/6 22:31:00
--
谢谢蓝老师的指点，但又有个问题，烦请老师指点：为什么代码添加的页面里面，用 e.form 引用不了啊。这是什么原因啊？应该怎么解决呢？
-- 发布时间：2018/5/6 22:54:00
--
| 下载信息 [文件大小： 下载次数： ] | |
| 点击浏览该文件:生管控制.zip |
-- 发布时间：2018/5/7 1:53:00
--
谢谢甜老师，但不太明白添加页面的代码里面那个OPEN(-1000,-1500)是什么意思 ？还有，我想把窗口剪切过页面集合中后，如何才能让尺寸自适应容器大小？并且继承容器的样式呢？
[此贴子已经被作者于2018/5/7 7:57:25编辑过]
-- 发布时间：2018/5/7 10:14:00
--
把整个窗口放入tabpage中，不要使用原来那种把窗口的tabpage剪切过来的用法。
自适应看里面的dock的用法。
-- 发布时间：2018/5/7 11:08:00
--
If Forms("Test1").Opened = False Then
Forms("Test1").Open
Dim page As C1.Win.C1Command.C1DockingTabPage = Forms("Test1").Controls("PageFormTab").TabPages(0)
Dim Tab As C1.Win.C1Command.C1DockingTab = CType(_MainTab.BaseControl,C1.Win.C1Command.C1DockingTab)
page.DockTo(Tab)
Tab.TabPages.Insert(Tab.TabPages.Count - 1,page)
Tab.SelectedTab = page
End If
还是要用以上代码吗？但这个会出现3楼的问题 ，这个怎么解决？
-- 发布时间：2018/5/7 11:57:00
--
看4楼项目添加页面测试按钮的用法。另外这种用法不是官方支持的用法，如果需要使用，请自行研究