main.bak

来自「不俄方体会人挺好同一话题依然教育局天涯海角天涯教育局」· BAK 代码 · 共 32 行

SET TALK OFF 					&&关闭对话
SET ESCAPE OFF 					&&关闭ESCAPE键
SET EXACT ON  					&&打开完全匹配
SET EXCLUSIVE ON 				&&打开独占
SET CONSOLE ON  				&&将输出结果到发送到Visual FoxPro主窗口或当前的活动窗口
SET DATE TO SHORT 				&&设置长日期
SET SCORE OFF 					&&关闭分值栏
SET SAFETY OFF 					&&关闭安全提示
SET STATUS BAR OFF 				&&关闭系统提示栏
SET CENTURY ON 					&&打开世纪开关
SET DELETED ON 					&&屏闭删除项
SET SYSMENU OFF 				&&关闭系统菜单
SET NOTIFY OFF 					&&关闭提示
&&设置系统窗口属性
_SCREEN.MaxButton = .F.					&&取消最大化按钮
_SCREEN.MaxWidth = 780					&&设置最大宽度
_SCREEN.MaxHeight = 600					&&设置最大高度
_SCREEN.Caption = "家庭理财系统"	 	&&设置窗口标题
_SCREEN.Picture = 'img\family.bmp'     	&&设置窗口背景图片
_SCREEN.AutoCenter = .T.				&&指定表单初次显示时，自动位于主窗口中央
&&公共变量
Public FindRecordNo
&&打开菜单
Do [menu\MyMenu.mpr]
&&打开登录表单
Do Form [Forms\登录.scx]

READ EVENTS
quit