主程序.prg

一种全新的仓库管理系统

SET TALK off
set sysmenu off        
set cent on           
_screen.windowstate=2
_screen.icon="icons\happy.ico"   
_screen.maxbutton=0
_screen.minbutton=1
_screen.closable=.f.
modify window screen noclose
MODIFY WINDOW SCREEN TITLE " 仓库管理信息系统  "
ZOOM WINDOW SCREEN MAX 
set default to data
do form 登录表单
read events
clear
close all
return
endif