main.prg

书店图书的信息管理

set safety off
set talk off
set delete on
set sysmenu off
clear
close all
with _screen
 .width=886
 .height=550
 .maxbutton=.F.
 .windowstate=0
 .visible=.T.
 .borderstyle=2
 .picture="picture.jpg"
 .caption="书店"
 .icon="face.ico"
endwith
public shy
do form 程序入口.scx
on shutdown do quitall.prg
  
read events