功能区图问题 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 功能区图问题

共有5432人关注过本帖树形打印复制链接主题：功能区图问题

Jaime

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：幼狐帖子：197 积分：1351 威望：0 精华：0 注册：2019/3/31 11:25:00

功能区图问题 发帖心情

Post By：2019/9/12 9:11:00 [显示全部帖子]

此主题相关图片如下：123456709.jpg

老师好！在功能区标准按钮放了个图，请您给指点以下3个问题：

1、配置栏的OpenQQ能移到左侧公用导航栏里吗，或者还有其它合适地方能安置吗？

1、图边能去掉吗，那个边是功能组名称的位置？

2、窗口里点击向下还原按钮，图就不显示了，能把图锁住不受影响吗？

[此贴子已经被作者于2019/9/12 9:27:10编辑过]

Jaime

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：幼狐帖子：197 积分：1351 威望：0 精华：0 注册：2019/3/31 11:25:00

Post By：2019/9/12 9:28:00 [显示全部帖子]

下载信息 [文件大小：下载次数： ]
点击浏览该文件:功能区图片.zip

请老师指导！

Jaime

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：幼狐帖子：197 积分：1351 威望：0 精华：0 注册：2019/3/31 11:25:00

Post By：2019/9/12 10:40:00 [显示全部帖子]

1、在AfterOpenProject事件写入：

Dim C1Ribbon1 As C1Ribbon.C1Ribbon = Ctype(BaseMainForm.controls("C1Ribbon1"),C1Ribbon.C1Ribbon )

Dim a As New Windows.Forms.picturebox

a.BackgroundImage = getimage("F:\Images\Me\cover300px.gif") ’ 按此目录存放了gif格式图片

a.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch

Dim b As New C1Ribbon.RibbonControlHost(a)

b.name = "自定义项1"

b.width = basemainform.width-100

b.height = 120

C1Ribbon1.tabs("Table").Groups("Style").Items.Insert(0,b)

2、

在菜单设计那里，把【功能组】的标题清空。

测试出错

Index was out of range. Must be non-negative and less than the size of the collection.

Parameter name: index

[此贴子已经被作者于2019/9/12 10:42:38编辑过]

Jaime

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：幼狐帖子：197 积分：1351 威望：0 精华：0 注册：2019/3/31 11:25:00

Post By：2019/9/12 11:20:00 [显示全部帖子]

老师，我没太理解以下几个地方

Dim C1Ribbon1 As C1Ribbon.C1Ribbon = Ctype(BaseMainForm.controls("C1Ribbon1"),C1Ribbon.C1Ribbon )

Dim a As New Windows.Forms.picturebox

a.BackgroundImage = getimage("F:\Images\Me\cover300px.gif") ‘是按照目录放GIF格式图片在这吗，还是项目本身的Images ？

a.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch

Dim b As New C1Ribbon.RibbonControlHost(a)

b.name = "自定义项1" ‘这个自定义项目1是要改吗？指的什么？

b.width = 300

b.height = 120

'C1Ribbon1.tabs("功能区1").Groups("功能组1").Items.Insert(0,b) ‘这个功能区1和功能组1是自动生成的吧，那就直接用下面一句是吗?

C1Ribbon1.tabs("Table").Groups("Style").Items.Insert(0,b)

[此贴子已经被作者于2019/9/12 11:22:56编辑过]

Jaime

小大 5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：幼狐帖子：197 积分：1351 威望：0 精华：0 注册：2019/3/31 11:25:00

Post By：2019/9/13 12:58:00 [显示全部帖子]

祝老师们中秋节快乐！

在功能区加图试了，只是图边的细节不太好处理，所以我选用了共用窗口在上部停靠加图。现在遇到个小问题，上部停靠放图窗和左侧停靠导航窗干扰，导航窗向上出头把放图窗拦截了，我希望上停靠的放图窗左边优先顶到头，请问老师如何调整固定？？

[此贴子已经被作者于2019/9/15 10:49:42编辑过]

Jaime

小大 6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：幼狐帖子：197 积分：1351 威望：0 精华：0 注册：2019/3/31 11:25:00

Post By：2019/9/15 11:00:00 [显示全部帖子]

祝老师们中秋节快乐！

此主题相关图片如下：123456.png

Jaime

小大 7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：幼狐帖子：197 积分：1351 威望：0 精华：0 注册：2019/3/31 11:25:00

Post By：2019/9/15 11:51:00 [显示全部帖子]

此主题相关图片如下：123.png

自动打开都是False,我刚把Bin删除了又试了，还是左边占了上面的边

此主题相关图片如下：456.png

forms("上边窗口").open

forms("左边窗口").open

Jaime

小大 8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：幼狐帖子：197 积分：1351 威望：0 精华：0 注册：2019/3/31 11:25:00

Post By：2019/9/16 8:32:00 [显示全部帖子]

谢谢蓝老师，改为共有就好了！

下一主题 >> << 上一主题

主题：功能区图问题