Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]菜单编辑器如何让选中的item特殊显示


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

主题：[求助]菜单编辑器如何让选中的item特殊显示
帅哥哟，离线，有人找我吗？
chnfo
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：九尾狐 帖子：2239 积分：18446 威望：0 精华：0 注册：2011/11/26 20:21:00 		[求助]菜单编辑器如何让选中的item特殊显示  发帖心情 Post By：2019/10/9 19:18:00 [只看该作者]

菜单编辑器还可以用于导航功能。比如菜单时，可以加载不同的页面。

问题：
菜单编辑器里增加了比如5项，在窗口的itemclick中添加菜单的切换事件。
但是，现在没办法知道点的是哪一个项，当前点选的项如果能特殊显示就好了。比如让这个item凹下去（其它的全正常-----感觉这个似乎要简单点儿），或者让这个item的底色或字体明显不同。

这个东东要咋做呢
 回到顶部
帅哥哟，离线，有人找我吗？
chnfo
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：九尾狐 帖子：2239 积分：18446 威望：0 精华：0 注册：2011/11/26 20:21:00 		  发帖心情 Post By：2019/10/9 19:33:00 [只看该作者]

For Each x As WinForm.StripItem In e.Strip.Items
    x.Checked = False
Next

e.StripItem.Checked = True

貌似可以。

但这个用于工具栏可以，用于菜单就不行。有用于菜单的方法吗？
[此贴子已经被作者于2019/10/9 19:45:09编辑过]
 回到顶部
帅哥，在线噢！
有点蓝
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110572 积分：562750 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2019/10/10 8:47:00 [只看该作者]


 回到顶部
帅哥哟，离线，有人找我吗？
chnfo
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：九尾狐 帖子：2239 积分：18446 威望：0 精华：0 注册：2011/11/26 20:21:00 		  发帖心情 Post By：2019/10/10 9:47:00 [只看该作者]

似乎增加的项没有togglebutton选项呀

 回到顶部
帅哥，在线噢！
有点蓝
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110572 积分：562750 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2019/10/10 9:55:00 [只看该作者]


 回到顶部
帅哥哟，离线，有人找我吗？
chnfo
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：九尾狐 帖子：2239 积分：18446 威望：0 精华：0 注册：2011/11/26 20:21:00 		  发帖心情 Post By：2019/10/10 9:59:00 [只看该作者]

是的。我是想把窗口中的菜单当成导航菜单用，所以想知道现在是在操作什么业务。 因为鼠标从菜单上移开，所有菜单外观一样，都不知现在在做啥
[此贴子已经被作者于2019/10/10 10:00:26编辑过]
 回到顶部
帅哥，在线噢！
有点蓝
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110572 积分：562750 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2019/10/10 10:19:00 [只看该作者]

看5楼，设置勾选

 回到顶部
帅哥哟，离线，有人找我吗？
chnfo
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：九尾狐 帖子：2239 积分：18446 威望：0 精华：0 注册：2011/11/26 20:21:00 		  发帖心情 Post By：2019/10/10 10:35:00 [只看该作者]

是希望主菜单的项作为导航菜单使用哦。
 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:菜单使用.zip
 回到顶部
帅哥，在线噢！
有点蓝
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110572 积分：562750 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2019/10/10 10:57:00 [只看该作者]

菜单第一层是没有状态的。换个方式，添加一个图片，如：

Dim Strip As WinForm.Strip = Forms("X").Strips("主菜单")
Strip.Items(0).Image = getimage("001.ico")

点击事件里清空菜单第一层所有项目的图片，然后给当前项目添加一个图片
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.13672 秒, 5 次数据查询