急急急急急！！！！求连编生成应用程序时可执行文件不一闪而过的代码！！！！1

[cxfirefox]

求连编生成应用程序时可执行文件不一闪而过的代码

[chlr]

原因是缺少事件循环read event。连编生成应用程序时程序入口应是.prg文件，该文件最后一句应是read event。

[cxfirefox]

能不能具体点，把.prg文件的源代码写给我，我是菜鸟，不好意思！呵呵！

[chlr]

程序入口的.prg文件，应设定文件的路径、日期格式、紧接着要运行的菜单文件或表单文件，后一句应是read event。

[落单枫叶]

在“命令”窗口中键入如下命令： （VFP6）
MODIFY PROJECT (HOME(2) + 'tastrade\tastrade')
看看代码里的main程序（主文件），再看看它调用的类库中的类的过程，自己好好研究一下吧！！！

[heartbreakin1990]

是这样的，在你的主程序中如下来写：
。。。。。。
do form **** &&或其他你第一个要执行的表单
read event &&开始事件循环，没有这一句你的程序编译后一运行就一闪而过了


此外在你的菜单的“退出”按纽上写入:clear event

[落单枫叶]

示例：
close all
ON SHUTDOWN quit
PUBLIC lcD,lu &&lcD为起动路径，lu为直协调变量。
lcd=sys(2003)
lu=0
DO lcd+'\MainMENU.mpr'
_screen.show
_screen.windowstate=2
_screen.caption="程序名"
_screen.Picture=lcd+'\back.gif'
set path to &lcd
DO form lcd+'\login.scx'
read event

我建议别用什么 clear event要退出程序直接quit!!!

[落单枫叶]

最好在主文件中包含以下set 语句：SET SAFETY OFF
SET PROCEDURE TO UTILITY.PRG
SET CLASSLIB TO ……
SET MEMOWIDTH TO ……
SET MULTILOCKS ON && For table buffering
SET HELP TO ……
SET DELETED ON
SET EXCLUSIVE OFF
SET NOTIFY OFF
SET BELL OFF
SET NEAR OFF
SET EXACT OFF
SET INTENSITY OFF
SET CONFIRM ON
SET COMPATIBLE OFF
IF !DEBUGMODE
SET ESCAPE OFF
ELSE
SET ESCAPE ON
ENDIF

[flyingpigs]

用READ EVENTS

[newfang]

老问题了，看看原来相关的帖子。