Foxtable(狐表)用户栏目专家坐堂 → 关于窗口菜单的问题请进


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

主题:关于窗口菜单的问题请进

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


加好友 发短信
等级:四尾狐 帖子:928 积分:7769 威望:0 精华:13 注册:2008/9/1 11:58:00
关于窗口菜单的问题请进  发帖心情 Post By:2017/9/7 11:06:00 [只看该作者]

窗口通过代码添加了一个工具栏ToolBar1,并通过代码增加一个命令按钮Button1
另在窗口增加一个winform.button按钮Button1,希望通过点击此按钮,来模拟点击ToolBar1中的Button1
但是发现,如果ToolBar1中的命令按钮Button1如果处于隐藏状态,则不会被索引到。

Dim m As WinForm.Strip = e.Form.Strips("ToolBar1")
If m.Items.Contains(e.Sender.Name) Then
    m.Items(e.Sender.Name).PerformClick()
End If

为防止是代码存在问题,又重新在窗口设计器里面手工添加上述控件并设置代码,发现依旧报错。提示:给定关键字不在字典中。
当前使用版本20170819
请帮忙看下是否存在此问题?

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


加好友 发短信
等级:四尾狐 帖子:928 积分:7769 威望:0 精华:13 注册:2008/9/1 11:58:00
  发帖心情 Post By:2017/9/7 11:08:00 [只看该作者]

Demo见附件
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目9.rar

[此贴子已经被作者于2017/9/7 11:08:59编辑过]

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


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

 

Dim m As WinForm.Strip = e.Form.Strips("工具栏1")
If m.Items.Contains(e.Sender.Name) Then
    m.Items(e.Sender.Name).PerformClick()
End If

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


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

2、不要隐藏

 

Dim b = e.Form.Strips("工具栏1").basecontrol
'b.CanOverFlow = False
b.LayoutStyle = 3


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


加好友 发短信
等级:四尾狐 帖子:928 积分:7769 威望:0 精华:13 注册:2008/9/1 11:58:00
  发帖心情 Post By:2017/9/7 11:19:00 [只看该作者]

这个demo是后做的,前面用代码生成并隐藏的为啥出错呢

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


加好友 发短信
等级:四尾狐 帖子:928 积分:7769 威望:0 精华:13 注册:2008/9/1 11:58:00
  发帖心情 Post By:2017/9/7 11:20:00 [只看该作者]

我只是隐藏了菜单中的Button1

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


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

Demo测试没问题。做具体例子发上来测试。

 

如果是菜单按钮太多溢出的问题,看4楼代码。


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


加好友 发短信
等级:四尾狐 帖子:928 积分:7769 威望:0 精华:13 注册:2008/9/1 11:58:00
  发帖心情 Post By:2017/9/7 12:02:00 [只看该作者]

感谢提醒,是代码问题,已解决

 回到顶部