main.prg

java源码

* -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
*  文件名: MAIN.PRG(主文件) <-- 本文件由 UnFoxAll 创建
* -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-


 LCLASTSETTALK = SET('TALK')
 SET TALK OFF
 LCLASTSETPATH = SET('PATH')
 SET PATH TO ;DATA;LIBS;FORMS;IMG;HELP;MENUS;PROGS
 SET DELETED ON
 SET SAFETY OFF
 SET DATE TO long
 SET SECONDS OFF
 CLEAR SCREEN
 CLOSE ALL
 OPEN DATABASE xiyu SHARE
 DO FORM main
 READ EVENTS 
 CLOSE DATABASES 
 SET SYSMENU TO DEFAULT
*