| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1683 人关注过本帖
标题:一个顶层表单加上一个菜单再+上几个普通表单, 部分代码疑问
只看楼主 加入收藏
ljlhpop
Rank: 2
等 级:论坛游民
帖 子:151
专家分:49
注 册:2015-10-11
结帖率:100%
收藏
已结贴  问题点数:20 回复次数:12 
一个顶层表单加上一个菜单再+上几个普通表单, 部分代码疑问
请问各位老师傅,,下面是最简单的案例,一个顶层表单加上一个菜单再+上几个普通表单,
代码这么写可以吗? 主要是顶层表单MAIN里面Destroy 和 Unload 里面都有 clear events ,,这样是否可以?

启动PRG 文
clear all
set sysmenu off
set date to ansi
set century on
_screen.visible=.f.
do form MAIN
read events
ON SHUTDOWN do quitall.prg
set sysmenu on
clear
close all

Quitall.prg 文件
IF MESSAGEBOX("确实要退出FOXPRO 吗",4+32,"提示")=6
    CLEAR EVENTS
    QUIT
ENDIF

顶层表单
MAIN-- Load
do renshi.mpr with this,.t.
application.visible=.f.

MAIN-- Destroy
application.visible=.t.
clear events

MAIN -Unload
clear events
quit
搜索更多相关主题的帖子: 表单 代码 set clear 菜单 
2022-05-15 20:08
laowan001
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:66
帖 子:1089
专家分:2682
注 册:2015-12-30
收藏
得分:7 
代码都有了,试下不就清楚了

我是在Destroy 里clear events
2022-05-15 20:15
ljlhpop
Rank: 2
等 级:论坛游民
帖 子:151
专家分:49
注 册:2015-10-11
收藏
得分:0 
回复 2楼 laowan001
请问您在UNLOAD 里面不用写代码? 我这个目前正常,就怕遇到奇怪的时候
2022-05-15 20:26
laowan001
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:66
帖 子:1089
专家分:2682
注 册:2015-12-30
收藏
得分:0 
以下是引用ljlhpop在2022-5-15 20:26:36的发言:

请问您在UNLOAD 里面不用写代码? 我这个目前正常,就怕遇到奇怪的时候

我的UNLOAD 是空的,没有代码
“怕遇到奇怪的时候”,是遇到过什么奇怪的时候吗?
2022-05-15 21:31
zhken
Rank: 7Rank: 7Rank: 7
等 级:贵宾
威 望:11
帖 子:284
专家分:616
注 册:2012-9-21
收藏
得分:7 
主表单的话在Unload 事件里面写clear events ,按事件顺序的话,当load事件不成功时就直接unload了,这时如写在destory会引起迟出异常
2022-05-15 22:09
hu9jj
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:红土地
等 级:贵宾
威 望:400
帖 子:11857
专家分:43421
注 册:2006-5-13
收藏
得分:7 
我的clear events代码是写在主表单的ubload事件中的。

活到老,学到老!http://www.(该域名已经被ISP盗卖了)E-mail:hu-jj@
2022-05-16 07:58
ljlhpop
Rank: 2
等 级:论坛游民
帖 子:151
专家分:49
注 册:2015-10-11
收藏
得分:0 
回复 4楼 laowan001
怕遇到软件不能正常退出....
2022-05-16 17:34
ljlhpop
Rank: 2
等 级:论坛游民
帖 子:151
专家分:49
注 册:2015-10-11
收藏
得分:0 
回复 6楼 hu9jj
这么说写在UNLOAD 就行了? 比写在DESTORY 好?
2022-05-16 17:35
laowan001
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:66
帖 子:1089
专家分:2682
注 册:2015-12-30
收藏
得分:0 
以下是引用ljlhpop在2022-5-16 17:34:35的发言:

怕遇到软件不能正常退出....

试下不就行了,能正常退出就对了,不行就换种方式,不必纠结
2022-05-16 18:17
zhken
Rank: 7Rank: 7Rank: 7
等 级:贵宾
威 望:11
帖 子:284
专家分:616
注 册:2012-9-21
收藏
得分:0 
回复 8楼 ljlhpop
不能说放在那里好,要根据事件顺序来,LOAD成功后-INI事件,退出时 先 DESTORY 再UNLOAD事件。如何LOAD事件出错时 程序就UNLOAD退出了,此时就不能经过DESTORY 事件。没有执行CLEA EVEN,退出也就异常了
2022-05-16 20:25
快速回复:一个顶层表单加上一个菜单再+上几个普通表单, 部分代码疑问
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.043423 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved