Foxtable(狐表)用户栏目专家坐堂 → [求助]关于功能区最小化


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

主题:[求助]关于功能区最小化

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


加好友 发短信
等级:四尾狐 帖子:995 积分:6712 威望:0 精华:0 注册:2015/1/12 22:12:00
  发帖心情 Post By:2016/6/14 14:09:00 [显示全部帖子]

在功能区显示的时候,双击功能区标题马上就可以最小化了,但在最小化的情况下,想让功能区显示,双击功能区标题能否稳定显示出来就要靠运气了,有时双击后再单击就显示了,有时马上就又最小化了。

记得以前好象在快速访问栏边上有一个按钮,打开后可以选择功能区最小化的,现在怎么也找不到在什么地方了

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


加好友 发短信
等级:四尾狐 帖子:995 积分:6712 威望:0 精华:0 注册:2015/1/12 22:12:00
  发帖心情 Post By:2016/6/15 11:21:00 [显示全部帖子]

谢谢老师,在快速访问栏加了个按钮,用以下代码实现了要求

RibbonTabs.AllowMinimize = True
If RibbonTabs.Minimized = True Then
    RibbonTabs.Minimized = False
    e.Button.SmallImage = GetImage("Upcd.ico")
    e.Button.ToolTip = "功能区最小化"
Else
    RibbonTabs.Minimized = True
    e.Button.SmallImage = GetImage("Downcd.ico")
    e.Button.ToolTip = "功能区最大化"
End If

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


加好友 发短信
等级:四尾狐 帖子:995 积分:6712 威望:0 精华:0 注册:2015/1/12 22:12:00
  发帖心情 Post By:2016/6/16 11:50:00 [显示全部帖子]

RibbonTabs.AllowMinimize = True
RibbonTabs.Minimized = True

将上面代码放在菜单的load事件中,为什么功能区还是最大化显示了?

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


加好友 发短信
等级:四尾狐 帖子:995 积分:6712 威望:0 精华:0 注册:2015/1/12 22:12:00
  发帖心情 Post By:2016/6/16 12:01:00 [显示全部帖子]

写到afteropenproject里面一样不能最小化

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


加好友 发短信
等级:四尾狐 帖子:995 积分:6712 威望:0 精华:0 注册:2015/1/12 22:12:00
  发帖心情 Post By:2016/6/16 12:51:00 [显示全部帖子]

加上BaseMainForm.Visible = True就可以控制了

 回到顶部