Foxtable(狐表)用户栏目专家坐堂 → [求助]如何将独立窗口加入到并列窗口页签中


  共有2554人关注过本帖树形打印复制链接

主题:[求助]如何将独立窗口加入到并列窗口页签中

帅哥哟,离线,有人找我吗?
pcxjxjhkw
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1791 积分:12764 威望:0 精华:1 注册:2013/7/18 15:51:00
[求助]如何将独立窗口加入到并列窗口页签中  发帖心情 Post By:2017/3/21 16:45:00 [只看该作者]

界面有主窗口,并列窗口,单击一菜单,如何实现:

将独立窗口A以并列窗口方式打开

 

谢谢


 回到顶部
帅哥哟,离线,有人找我吗?
有点色
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/3/21 17:30:00 [只看该作者]

 获取并列窗口的tab对象

 

Dim tab = Forms("窗口1").panel.parent.parent

 

 然后,参考 http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=88097&skin=0

 

 


 回到顶部
帅哥哟,离线,有人找我吗?
pcxjxjhkw
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1791 积分:12764 威望:0 精华:1 注册:2013/7/18 15:51:00
  发帖心情 Post By:2017/3/21 20:22:00 [只看该作者]

                        Dim MainTab As C1Command.C1DockingTab = BaseMainform.Controls("MainPages")   '''
                        Dim FormTab As C1Command.C1DockingTab = MainTab.TabPages(0).Controls(0)     '''系统并列窗口页面集合
                        Dim pg As new C1Command.C1DockingTabPage  '''定义新的页面

Forms(frmNM).OPEN(-1000,-1500)
Forms(frmNM).BaseForm.TopLevel = False
Forms(frmNM).BaseForm.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None
Forms(frmNM).BaseForm.Dock = System.Windows.Forms.DockStyle.Fill
Pg.Controls.Clear
Pg.Controls.add(Forms(frmNM).BaseForm)
FormTab.TabPages.Add(pg)  '''

 

以上代码无法实现。

 

如何实现先新增一个页面?

FormTab.TabPages.Add(frmNM,frmNM) 报错

[此贴子已经被作者于2017/3/21 20:23:56编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110592 积分:562856 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/3/21 20:42:00 [只看该作者]

测试没有问题

Dim MainTab As C1Command.C1DockingTab = BaseMainform.Controls("MainPages")   '''
Dim FormTab As C1Command.C1DockingTab = MainTab.TabPages(0).Controls(0)     '''系统并列窗口页面集合
Dim pg As new C1Command.C1DockingTabPage  '''定义新的页面
pg.Text = frmNM
Forms(frmNM).OPEN(-1000,-1500)
Forms(frmNM).BaseForm.TopLevel = False
Forms(frmNM).BaseForm.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None
Forms(frmNM).BaseForm.Dock = System.Windows.Forms.DockStyle.Fill
Pg.Controls.Clear
Pg.Controls.add(Forms(frmNM).BaseForm)
FormTab.TabPages.Add(pg)  '''

 回到顶部
帅哥哟,离线,有人找我吗?
pcxjxjhkw
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1791 积分:12764 威望:0 精华:1 注册:2013/7/18 15:51:00
  发帖心情 Post By:2017/3/21 21:32:00 [只看该作者]

已解决,谢谢

 

跟问:选中不同页签时,如何实现:像窗口一样,先停止绘制,再恢复绘制。

 

 

[此贴子已经被作者于2017/3/21 21:38:59编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110592 积分:562856 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/3/21 21:43:00 [只看该作者]

Dim FormTab As C1Command.C1DockingTab = MainTab.TabPages(0).Controls(0)     '''系统并列窗口页面集合
FormTab.BeginUpdate
‘其它代码
FormTab.EndUpdate

 回到顶部
帅哥哟,离线,有人找我吗?
pcxjxjhkw
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1791 积分:12764 威望:0 精华:1 注册:2013/7/18 15:51:00
  发帖心情 Post By:2017/3/21 21:55:00 [只看该作者]

谢谢。

 

在关闭页签前,如何先销毁窗口?


 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110592 积分:562856 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/3/21 21:56:00 [只看该作者]

直接关闭

Forms(“XXXX”).Close

 回到顶部
帅哥哟,离线,有人找我吗?
pcxjxjhkw
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1791 积分:12764 威望:0 精华:1 注册:2013/7/18 15:51:00
  发帖心情 Post By:2017/3/21 22:48:00 [只看该作者]

怎么无法绑定关闭页签后的事件

AddHandler FormTab.TabPageClosed, AddressOf _TabPageClosed

 

报错,不知是什么原因


 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110592 积分:562856 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/3/22 8:32:00 [只看该作者]

报什么错?

 回到顶部
总数 17 1 2 下一页