- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- [求助]Tabpag 中添加菜单 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=72508)
-- 发布时间：2015/7/31 10:05:00
-- [求助]Tabpag 中添加菜单
红袍老师，
在窗口中增加菜单通过您的指导实现了，现在想在TabControl 的页面中增加菜单，是否可以直接实现
Dim menuStrip As new System.Windows.Forms.MenuStrip()
Dim pg As WinForm.TabPage= e.Form.Controls("TabControl1").TabPages(1)
希望如下代码成立
pg.add(menuStrip) ‘e.Form.baseform.controls.add(menuStrip)
查看了 baseform 是否只能在TabControl 的页面中 增加Panl 然后将窗口放在上上面才能间接实现呢？
-- 发布时间：2015/7/31 11:12:00
--
红袍老师，
动态菜单能否满屏所在的窗口
Dim menuStrip As new System.Windows.Forms.MenuStrip()
e.Form.baseform.controls.add(menuStrip)
menuStrip.ClientSize=e.Form.baseform.controls.size‘怎么写？
-- 发布时间：2015/7/31 11:21:00
--
不能自动铺满地。
菜单有多少，就添加多少宽度。
-- 发布时间：2015/7/31 11:36:00
--
menuStrip.Dock = 5
铺满整个窗口不是挺难看的吗
-- 发布时间：2015/7/31 11:39:00
--
Dim Ribbon As C1Ribbon.C1Ribbon = BaseMainform.Controls("C1Ribbon1")
e.Form.Panel.Controls.Add(Ribbon ) \'窗口事件
Dim Ribbon As C1Ribbon.C1Ribbon = BaseMainform.Controls("C1Ribbon1")
e.Form.Panel.Controls.Remove(Ribbon ) 退出事件
-- 发布时间：2015/7/31 12:19:00
--
看错了，可以做的，参考代码
Dim menuStrip As new System.Windows.Forms.MenuStrip()
Dim tab = e.Form.Controls("TabControl1").Basecontrol
dim pg = tab.TabPages(1)
pg.Controls.add(menuStrip) \'e.Form.baseform.controls.add(menuStrip)
-- 发布时间：2015/8/4 21:25:00
--
红袍老师，
清除怎么写呢
Dim menuStrip As new System.Windows.Forms.MenuStrip()
Dim tab= Forms("窗口4").Controls("TabControl1").Basecontrol
Dim tpg = tab.TabPages(e.Sender.SelectedIndex)
tpg.Controls.Remove(menuStrip)
-- 发布时间：2015/8/4 21:29:00
--
添加
Dim menuStrip As new System.Windows.Forms.MenuStrip()
Dim tab = e.Form.Controls("TabControl1").Basecontrol
Dim pg = tab.TabPages(1)
pg.Controls.add(menuStrip)
vars("菜单") = menuStrip
移除
Dim tab= e.form.Controls("TabControl1").Basecontrol
Dim tpg = tab.TabPages(1)
tpg.controls.Remove(vars("菜单"))
-- 发布时间：2015/8/4 21:57:00
--
红袍老师，
反复的点击页面1 页面2，为何不停的在增加菜单，已经增加了2个Remove，为何不删除，麻烦老师指点。
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:页面菜单.foxdb |
-- 发布时间：2015/8/4 23:36:00
--
| 下载信息 [文件大小： 下载次数： ] | |
| 点击浏览该文件:页面菜单.foxdb |