请问如何判断动态生成的控件是否被free(50分)

  • 主题发起人 主题发起人 lichengjun
  • 开始时间 开始时间
L

lichengjun

Unregistered / Unconfirmed
GUEST, unregistred user!
我现在正在做一个实时监控的系统,我在程序中设置了两个timer,其中timer1定时执行查询数据库的操作,而timer2定时检测与数据库服务器的网络连接,如果网络正常,而timer1未存在,则创建timer1,如果已存在则不管;而网络不正常时,如timer1存在则将timer1.free,如timer1不存在则不管,希望各位大侠给点意见,附上举例源码更好。
 
if timer1<>nil then
timer1.free;
 
if timer1=nil then ......
注意在timer1.free;之后应加上一句timer1:=nil;否则即使timer1被free但仍不会为nil
 
在timer1.free; 之后加上一句:
timer1 := nil;

检查时用 if Assigned(timer1) then
 
不用吧,

我用button試,可以阿
 
教父说得对
 
多人接受答案了。
 
再问一句,我在线程中动态调用这两个timer好像不发挥作用,我是在在主form中调用了一个线程,该线程永远不会down,除非application down,但在线程的execute中一执行完就down了,两个timer根本无法发挥作用。
 
后退
顶部