Foxtable(狐表)用户栏目专家坐堂 → 页面集合问题


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

主题:页面集合问题

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


加好友 发短信
等级:三尾狐 帖子:767 积分:6119 威望:0 精华:0 注册:2018/2/1 17:26:00
页面集合问题  发帖心情 Post By:2018/2/22 21:30:00 [只看该作者]

老师你好:
我想打开窗口时,关闭页面集合,点后打开,如何修改下面代码?


'筛选设置左侧停靠-------------------------------
Dim CmdDock As New C1Command.C1CommandDock
CmdDock.Name = "CmdDock"
CmdDock.BackColor = System.Drawing.SystemColors.Control
CmdDock.Dock = Windows.Forms.DockStyle.Left
CmdDock.AutoDockTop = False
CmdDock.AutoDockBottom = False
CmdDock.DockingStyle = C1Command.DockingStyle.VS2005
e.Form.Panel.Controls.Add(CmdDock)

Dim TabCtl As C1Command.C1DockingTab = e.Form.Controls("TabControl").BaseControl
TabCtl.VisualStyle = C1Command.VisualStyle.Office2007Blue
TabCtl.HotTrack = True
TabCtl.ShowCaption = True
TabCtl.ShowTabList = True
TabCtl.CanAutoHide = True
CmdDock.Controls.Add(TabCtl)


图片点击可在新窗口打开查看此主题相关图片如下:fpt4evib5_l_84dc0vig`u2.png
图片点击可在新窗口打开查看


图片点击可在新窗口打开查看此主题相关图片如下:打开窗口时所需样子.png
图片点击可在新窗口打开查看

[此贴子已经被作者于2018/2/22 21:32:05编辑过]

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/2/22 21:36:00 [只看该作者]

'筛选设置左侧停靠-------------------------------
Dim CmdDock As New C1Command.C1CommandDock
CmdDock.Name = "CmdDock"
CmdDock.BackColor = System.Drawing.SystemColors.Control
CmdDock.Dock = Windows.Forms.DockStyle.Left
CmdDock.AutoDockTop = False
CmdDock.AutoDockBottom = False
CmdDock.DockingStyle = C1Command.DockingStyle.VS2005
e.Form.Panel.Controls.Add(CmdDock)


Dim TabCtl As C1Command.C1DockingTab = e.Form.Controls("TabControl1").BaseControl
TabCtl.VisualStyle = C1Command.VisualStyle.Office2007Blue
TabCtl.HotTrack = True
TabCtl.ShowCaption = True
TabCtl.ShowTabList = True
TabCtl.CanAutoHide = True
CmdDock.Controls.Add(TabCtl)
TabCtl.autohiding = True


 回到顶部