设计以窗口为主的界面
下图是基于Foxtable设计的一个仓管软件,和Foxtable本身以表为中心的界面不同,此软件的界面以窗口为中心。
设计这样的界面很简单:
1、设计窗口的时候,将窗口类型设为主窗口。
2、在项目事件AfterOpenProject中设置代码:
If
User.Type
<>
UserTypeEnum.Developer
TableCaptionVisible =
False
End
If
这样普通用户登录后,会隐藏显示下图所示的表标题,但开发者登录后,表标题则正常可见,不会影响开发工作:
TableCaptionVisible是一个逻辑型的全局变量,用于设置是否显示表标题。
为便于调试,你可以在菜单栏中加一个按钮,将按钮的Click事件代码设置为:
TableCaptionVisible = Not TableCaptionVisible
这样单击此按钮,可以切换表标题的显示状态。
3、在AfterOpenProject事件中,还应该设置代码,打开第一个表的主窗口:
Forms("主窗口名").Open()
这样的系统,通常每个表都会有自己的主窗口,建议默认不要打开其他表的窗口,需要切换到某个表的时候,再打开此表的主窗口即可。
例如希望单击某个按钮,能够切换到表B,并显示其主窗口,按钮代码可以设置为:
Forms("表B主窗口").Open()
MainTable = Tables(
上面的代码是先打开表B的主窗口,再切换到表B,这样的顺序不能乱,否则屏幕会闪动。
设置主窗口样式
Foxtable的主窗口默认是最大化的,在项目属性设置窗口,通过下面一组属性,可以对主窗口就行设置,这些属性不是即时生效的,设置完成后,需要重新打开项目:
提示:
1、只有在最大化属性为False的时候,宽度、高度、最大化按钮、最小化按钮、允许调整大小这五个属性的设置才会有效。
2、为了不影响正常开发,建议你在开发完成,准备发布或交付给用户使用的时候,才设置上述属性。