以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  下拉菜单  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=187568)

--  作者:hopestarxia
--  发布时间:2023/7/27 17:40:00
--  下拉菜单
老师请问如何在项目上方做一些功能下拉菜单,我原来一直是将功能放在对应的导航功能模块中,没有使用过下拉菜单,请咅老师如何设置?
--  作者:有点蓝
--  发布时间:2023/7/27 19:51:00
--  
 可以设置系统菜单:http://www.foxtable.com/webhelp/topics/1062.htm


--  作者:hopestarxia
--  发布时间:2023/7/28 9:05:00
--  
谢谢老师,请问老师窗口菜单的字体从哪儿设置?没有找到设置字体的地方。
--  作者:有点蓝
--  发布时间:2023/7/28 9:23:00
--  
只能使用代码设置,比如

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

--  作者:hopestarxia
--  发布时间:2023/7/28 14:10:00
--  
谢谢老师!
--  作者:hopestarxia
--  发布时间: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 块变量。

--  作者:有点蓝
--  发布时间:2023/7/28 14:32:00
--  
说明菜单名称用错了