连编后运行,一闪而过!
不知道READ EVENTS应该加在什么位置？
我加上READ EVENTS后，到是不一闪而过，但主界面却无法关闭了，点关闭也不关，是不是READ EVENTS加错位置了，我也不知道READ EVENTS应该加在什么位置？是不是加了READ EVENTS还要在程序的什么位置加什么语句呀？请问各位高手如何解决？谢谢！

请参考：
set talk off    &&关闭对话模式
set safe off
set stat off   
set dele on     &&不处理已删除的记录
set cent on
set date to ansi
close all
RELEASE WINDOW 常用   &&关闭常用工具栏
if mod(day(date()),2)=0  &&偶数日期
_SCREEN.backcolor=rgb(80,180,150)  &&窗口背景颜色
MODIFY WINDOW SCREEN TITLE "  应用软件 ver 2.1           为齐;
                  今天是："+dtoc(date())+"  "+cdow(date())
else  &&奇数日期
_SCREEN.backcolor=rgb(80,150,180)  &&窗口背景颜色
MODIFY WINDOW SCREEN TITLE " 应用软件 ver 2.1            ;
             今天是："+dtoc(date())+"  "+cdow(date())
endif
ZOOM WINDOW SCREEN MAX   &&主窗口最大化
_SCREEN.controlbox=.f.   &&去掉主窗口控制按钮
deactivate window "项目管理器"   &&关闭项目管理器
mypath=left(sys(16),rat("\",sys(16)))   &&确定程序所在的位置
set defa to (mypath)  &&设置当前路径
set path to data;form;pic   &&指明路径
open database kfgl  &&打开数据库
do form logo   &&运行表单logo
read events
quit

谢谢，我回去试试

关闭时要清除事件啥.
clear events

谢谢！

编写一个顶层菜单文件，一个顶层表单文件，几个表单文件，几个表文件都装入在一个项目文件中，在项目文件中进行编译成可执行文件，运行该文件时一闪而过，不停留。我加了READ EVENTS之后，倒是停留了但是关闭不了，加CLEAR EVENTS或QUIT也不能关闭

READ EVENTS
CLEAR EVENTS
RETURN

QUIT

以上几行命令不知道输入在顶层表单文件中哪个事件中，或者输入在其它文件中，或者是输入其它命令？