16,742
社区成员
发帖
与我相关
我的任务
分享关于类对象的释放！
问题描述：
在tF类中声明
private
Img:array[1..100] of tImage;
Timer:ttimer;
........
创建一个tF类对象 Fa：tF；
我用Fa.free的时候没有释放掉Img，Timer...；那怎样才能彻底的释放掉tF类的对象Fa呢；
在tF类中声明
private
Img:array[1..100] of tImage;
Timer:ttimer;
........
创建一个tF类对象 Fa：tF；
我用Fa.free的时候没有释放掉Img，Timer...；那怎样才能彻底的释放掉tF类的对象Fa呢；
...全文
请发表友善的回复…
发表回复
Hswinken 2006-05-06
- 打赏
- 举报
明白谢谢各位的帮助 。结帖了噢
ylsl917 2006-05-06
- 打赏
- 举报
我回去研究研究 我还没接触过
yuanguangxing 2006-05-05
- 打赏
- 举报
重写析构函数把那两个你写的释放掉就可以了
yuanguangxing 2006-05-05
- 打赏
- 举报
楼上的各位已经说得很明白了,我也不多讲了
GARNETT2183 2006-05-05
- 打赏
- 举报
procedure tF.destroy;
begin
if Timer <> nil then
FreeAndNil(Timer);
end;
begin
if Timer <> nil then
FreeAndNil(Timer);
end;
ZQshen 2006-05-05
- 打赏
- 举报
在你的类的析构函数中去做这些事情。
好的习惯一定要养成哦。
好的习惯一定要养成哦。
merkey2002 2006-05-05
- 打赏
- 举报
拜托，你要在tF类的destroy方法里把Timer释放掉啊
Hswinken 2006-05-05
- 打赏
- 举报
用了Fa.free后 Img里面还显示有图片，timer还在工作。！算是没释放掉吧
Linux2001 2006-05-05
- 打赏
- 举报
你怎么知道没有释放掉？如果是单个对象你就调用FreeAndNil这个函数来释放，如果是数组对象，据说使用SetLength()把数组的维数设置为0就可以释放，不放心的话，你可以在循环内对每个数组元素调用FreeAndNil来释放
