main.prg

来自「一个汽车修理厂管理系统源码」· PRG 代码 · 共 14 行

public showbegaaa 
_Screen.windowstate=2
_Screen.Caption="汽车修理厂自动化管理系统 VER3.0"
_Screen.Closable=.F. 
_screen.icon="cars.ico"
modi window screen fill file back1.bac
store 0 to showbegaaa
set talk off
set century on
set date to ymd 
set status bar off
do form showbeg
do menu1.mpr