以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  新增TablControl一个页面,则加载固定格式控件  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=119070)

--  作者:桃花笑
--  发布时间:2018/5/17 9:55:00
--  新增TablControl一个页面,则加载固定格式控件
新增TablControl一个页面,则加载固定格式控件

如下图:点击增加页面 ,则增加一个【页面2】,同时能够加载一个固定格式的控件,类似窗口中许多控件格式已经排版好的。
新增【页面3】时,在加载另外的一个已经排版好的窗口进来
这种功能怎么做

我目前是试用版,开发版的模板看不了哦

 图片点击可在新窗口打开查看


--  作者:有点甜
--  发布时间:2018/5/17 10:02:00
--  

参考

 

http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=116278&skin=0

 


--  作者:有点甜
--  发布时间:2018/5/17 10:43:00
--  

http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=118544&skin=0

 


--  作者:桃花笑
--  发布时间:2018/5/17 13:11:00
--  
 我是商业版,连接是开发版才能打开的,有没有测试版也能看的
--  作者:有点甜
--  发布时间:2018/5/17 14:38:00
--  

做一个独立窗口2,然后执行代码

 

Dim tab As WinForm.TabControl = Forms("窗口1").Controls("TabControl1")
Dim Name As String = "窗口2"

tab.TabPages.Add(name,name)
Dim pb = tab.BaseControl
Forms(Name).OPEN(-1000,-1500)
Forms(Name).BaseForm.TopLevel = False
Forms(Name).BaseForm.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None
Forms(Name).BaseForm.Dock = System.Windows.Forms.DockStyle.Fill
PB.TabPages(name).Controls.Clear
PB.TabPages(name).Controls.add(Forms(Name).BaseForm)
tab.SelectedPage = tab.TabPages(name)