E
evon
Unregistered / Unconfirmed
GUEST, unregistred user!
在 Thread 中所Create的Tdatamodule是否会真正的释放！
procedure Thread.Execute;
var
ThDM:TRDM;{Tdatamodule}
begin
try
ThDM:=TRDM.Create(Application);
......
finally
ThDM:=nil;
ThDM.Free;
end;
却发现执行ThDM.Free并不会触发 TRDM.Destory事件
是不是代表(该Thread的TDatamodule)还没释放出来
待整个程式结束後才会触发。
procedure Thread.Execute;
var
ThDM:TRDM;{Tdatamodule}
begin
try
ThDM:=TRDM.Create(Application);
......
finally
ThDM:=nil;
ThDM.Free;
end;
却发现执行ThDM.Free并不会触发 TRDM.Destory事件
是不是代表(该Thread的TDatamodule)还没释放出来
待整个程式结束後才会触发。