Foxtable(狐表)用户栏目专家坐堂 → 下拉菜单


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

主题:下拉菜单

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


加好友 发短信
等级:四尾狐 帖子:934 积分:6733 威望:0 精华:0 注册:2013/8/10 18:33:00
下拉菜单  发帖心情 Post By:2023/7/27 17:40:00 [只看该作者]

老师请问如何在项目上方做一些功能下拉菜单,我原来一直是将功能放在对应的导航功能模块中,没有使用过下拉菜单,请咅老师如何设置?

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


加好友 发短信
等级:超级版主 帖子:111393 积分:567029 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/7/27 19:51:00 [只看该作者]


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


加好友 发短信
等级:四尾狐 帖子:934 积分:6733 威望:0 精华:0 注册:2013/8/10 18:33:00
  发帖心情 Post By:2023/7/28 9:05:00 [只看该作者]

谢谢老师,请问老师窗口菜单的字体从哪儿设置?没有找到设置字体的地方。

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


加好友 发短信
等级:超级版主 帖子:111393 积分:567029 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/7/28 9:23:00 [只看该作者]

只能使用代码设置,比如

Dim sit As WinForm.StripItem = Forms("窗口1").Strips("工具栏1").Items("项目1")
sit.BaseControl.font = New Font("宋体", 50)

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


加好友 发短信
等级:四尾狐 帖子:934 积分:6733 威望:0 精华:0 注册:2013/8/10 18:33:00
  发帖心情 Post By:2023/7/28 14:10:00 [只看该作者]

谢谢老师!

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


加好友 发短信
等级:四尾狐 帖子:934 积分:6733 威望:0 精华:0 注册:2013/8/10 18:33:00
  发帖心情 Post By:2023/7/28 14:15:00 [只看该作者]

老师,我照着设置,例如:
Dim sit As WinForm.StripItem = Forms("系统主窗口").Strips("主菜单A").Items("系统管理")
sit.BaseControl.font = New Font("宋体", 50)

运行窗口提示:
.NET Framework 版本:4.0.30319.42000
Foxtable 版本:2021.12.16.888
错误所在事件:窗口,系统主窗口,AfterLoad
详细错误信息:
未设置对象变量或 With 块变量。

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


加好友 发短信
等级:超级版主 帖子:111393 积分:567029 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/7/28 14:32:00 [只看该作者]

说明菜单名称用错了

 回到顶部