主程序.prg

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

_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
do form 欢迎.scx
read events
set sysmenu to default
set sysmenu on
set status bar on
close all
clear all
clear events
quit