主程序.bak

来自「是一个学校的评教评学软件」· BAK 代码 · 共 29 行

_screen.windowstate=2
_screen.caption="武汉武电材料管理系统"
_screen.closable=.f.
_screen.maxbutton=.t.
_screen.minbutton=.t.
_screen.controlbox=.t.
_screen.backcolor=RGB(50,100,128)
set path to c:\武汉武电科技开发公司
close all
clear all
set sysmenu off
set sysmenu to
set date to ansi
set safety off
set talk off
set status  bar off
set exclusive off
set exact on
*set exclusive on
do form 欢迎.scx
read events
set sysmenu to default
set sysmenu on
set status bar on
close all
clear all
clear events
quit