main.prg

来自「银河就餐系统辅助软件」· PRG 代码 · 共 18 行

set date to ansi
set cent on

_screen.windowstate=2
_screen.caption="太师庄中学就餐统计系统"
close all
clear all
*set sysmenu off
set escape off
set talk off
*set exact on
set deleted on
set safe off
deactivate windows standard
_Screen.Show
DO  \jctj\menus\jctj_main.mpr
read events
return