不用下面代码:
//if assigned(tempform) then
//begin
//tempform.free;
// tempform:=nil;
//end;
在form-> tempform中的onclose中加入
action := caFree;
在form-> tempform中的ondestory中加入
tempform := nill;
我手头没有delphi记不太清了,要是不行把onclose与ondestory代码换一换一定行。
//if assigned(tempform) then
//begin
//tempform.free;
// tempform:=nil;
//end;
在form-> tempform中的onclose中加入
action := caFree;
在form-> tempform中的ondestory中加入
tempform := nill;
我手头没有delphi记不太清了,要是不行把onclose与ondestory代码换一换一定行。
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货