Foxtable(狐表)用户栏目专家坐堂 → 如何在菜单中调用已有窗口中的控件


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

主题:如何在菜单中调用已有窗口中的控件

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


加好友 发短信
等级:幼狐 帖子:183 积分:1341 威望:0 精华:0 注册:2015/9/23 20:33:00
  发帖心情 Post By:2015/11/12 22:31:00 [只看该作者]

例如:
图片点击可在新窗口打开查看此主题相关图片如下:qq图片20151112222912.png
图片点击可在新窗口打开查看
替换为
图片点击可在新窗口打开查看此主题相关图片如下:qq图片20151112223007.png
图片点击可在新窗口打开查看

谢谢你

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/11/12 22:32:00 [只看该作者]

以下是引用tjzj_lyl在2015/11/12 22:27:00的发言:
又有个新问题,我怎么能把它停靠在菜单之上呢?谢谢

 

把菜单剪切到窗口里去


Dim a As object = BaseMainForm.controls("C1Ribbon1")
forms("窗口1").controls("panel1").basecontrol.controls.add(a)


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


加好友 发短信
等级:幼狐 帖子:183 积分:1341 威望:0 精华:0 注册:2015/9/23 20:33:00
  发帖心情 Post By:2015/11/12 22:58:00 [只看该作者]

好的 我试试 谢谢

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


加好友 发短信
等级:幼狐 帖子:183 积分:1341 威望:0 精华:0 注册:2015/9/23 20:33:00
  发帖心情 Post By:2015/11/12 23:00:00 [只看该作者]

以上代码写在哪里呢?

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


加好友 发短信
等级:幼狐 帖子:183 积分:1341 威望:0 精华:0 注册:2015/9/23 20:33:00
  发帖心情 Post By:2015/11/12 23:15:00 [只看该作者]

回不到系统菜单中了?
图片点击可在新窗口打开查看此主题相关图片如下:qq图片20151112231446.png
图片点击可在新窗口打开查看

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/11/12 23:19:00 [只看该作者]

以下是引用tjzj_lyl在2015/11/12 23:00:00的发言:
以上代码写在哪里呢?

 

可以写在窗口的afterLoad事件。


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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/11/12 23:19:00 [只看该作者]

以下是引用tjzj_lyl在2015/11/12 23:15:00的发言:
回不到系统菜单中了?
图片点击可在新窗口打开查看此主题相关图片如下:qq图片20151112231446.png

 

重新打开项目即可。


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


加好友 发短信
等级:幼狐 帖子:183 积分:1341 威望:0 精华:0 注册:2015/9/23 20:33:00
  发帖心情 Post By:2015/11/12 23:31:00 [只看该作者]

初步的结果已经出来的,但显示不是我所需要的那个菜单
Dim a As object = BaseMainForm.controls("C1Ribbon1")
forms("窗口1").controls("panel1").basecontrol.controls.add(a)

以上中C1Ribbon1 代表什么意思呢?用快速访问栏设计的传统菜单也是参照以上吗? 怎么操作?谢谢

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/11/13 9:16:00 [只看该作者]

你菜单怎么设计的,剪切后就是怎么的样子啊,有什么问题。


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


加好友 发短信
等级:幼狐 帖子:183 积分:1341 威望:0 精华:0 注册:2015/9/23 20:33:00
  发帖心情 Post By:2015/11/13 10:15:00 [只看该作者]

初步的结果已经出来的,但显示不是我所需要的那个菜单
Dim a As object = BaseMainForm.controls("C1Ribbon1")
forms("窗口1").controls("panel1").basecontrol.controls.add(a)

以上中C1Ribbon1 代表什么意思呢?用快速访问栏设计的传统菜单也是参照以上吗? 怎么操作?谢谢

 

 

以上问题遇到瓶颈,请你帮忙解决,谢谢。


 回到顶部
总数 33 上一页 1 2 3 4 下一页