| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 628 人关注过本帖
标题:谁能通俗地告诉我Destroy事件是怎么回事?
取消只看楼主 加入收藏
zmkm
Rank: 1
等 级:新手上路
帖 子:13
专家分:0
注 册:2023-11-2
结帖率:75%
收藏
已结贴  问题点数:10 回复次数:5 
谁能通俗地告诉我Destroy事件是怎么回事?
    Destroy事件,手册上说,当释放一个对象时,发生此事件。后面还有说,一个容器对象的Destroy事件在它所包含的任何一个对象的Destroy事件之前触发;......
    我看不懂这些解释的意思,谁能通俗地,或举个例子,说这个事件到底是干什么的?
搜索更多相关主题的帖子: 对象 事件 例子 触发 干什么 
2023-11-07 19:00
zmkm
Rank: 1
等 级:新手上路
帖 子:13
专家分:0
注 册:2023-11-2
收藏
得分:0 
还是晕。谁给个简单的例子说明一下行吗?
2023-11-07 22:24
zmkm
Rank: 1
等 级:新手上路
帖 子:13
专家分:0
注 册:2023-11-2
收藏
得分:0 
以下是引用laowan001在2023-11-8 07:55:21的发言:


要搬家了,最后再看一眼房子

你看我理解的对不对:
在quit之前,让Destroy执行:
close data
clear all
thisform.lable1.caption="abcd"
上述代码其实也可以写在有quit的那个控件中。两者的效果一样。我写程序时完全可以不用Destroy,只是代码可能又重复而已。
如果理解的不对,请批评。多谢
2023-11-08 09:25
zmkm
Rank: 1
等 级:新手上路
帖 子:13
专家分:0
注 册:2023-11-2
收藏
得分:0 
回复 11楼 zmkm
你看我理解的对不对:
在quit之前,让Destroy执行:
close data
clear all
thisform.lable1.caption="abcd"
上述代码其实也可以写在有quit的那个控件中。两者的效果一样。我写程序时完全可以不用Destroy,只是代码可能又重复而已。
如果理解的不对,请批评。多谢
2023-11-08 09:28
zmkm
Rank: 1
等 级:新手上路
帖 子:13
专家分:0
注 册:2023-11-2
收藏
得分:0 
以下是引用laowan001在2023-11-8 10:02:22的发言:



可以这样测试一下
在控件的Destroy、unload等事件中写个messagebox('每个事件写不同的内容,以示区别'),然后观察显示的顺序
在我实际应用当中,很少用到对Destroy事件编程



我明白了。多谢。
try1108.rar (1.21 KB)
2023-11-08 21:07
zmkm
Rank: 1
等 级:新手上路
帖 子:13
专家分:0
注 册:2023-11-2
收藏(1)
得分:0 
以下是引用gs2536785678在2023-11-8 09:44:43的发言:

楼主提出的问题,说明了可能你没有经历过正规教育
如今的面向对象的程序,你想掌握它,必须要知道
属性,事件,方法
三个基本知识,而这三个基本知识需要你花时间自己
去实践探索。

35年前,我用unix/foxpro和unix/informax写过中型程序,给200多人用,是多用户的。仅仅一个打印模块就1万行,要一个字符一个字符去打,把0换成空格。菜单也写很长@(2,2)say “请输入” get _mark1
以后25年不干了。
现在无聊,找VFP玩玩,防止痴呆。
属性、事件、方法的意思我当然懂。但不是所有方法和事件都用。看别人的代码遇到不明白的方法就查手册。手册文绉绉的弄不懂就到这里问问。如果是做一个要用的程序,很快就能拼凑出来。只是我想知道一件事有很多方式实现,有高明的或和我思路不一样的方法就觉得有趣。
希望各位高手教教我。像“自己去实践探索”之类的教诲用处不大,还浪费你打字的时间。
顺便告诉你,我正规的教育是1981年数学系计算机工程专业,毕业设计是自己做的关系型数据库。
收到的鲜花
  • sam_jiang2023-11-09 01:37 送鲜花  1朵  
2023-11-08 21:37
快速回复:谁能通俗地告诉我Destroy事件是怎么回事?
数据加载中...
 
   



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

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