if not assigned(frmwarestat) then frmwarestat:=Tfrmwarestat.create(Application); frmwarestat.show;
Application 参数加它也不管用
此窗体的onclose事件里: action:=cafree; frmwarrestar:=nil;打开时: if frmwarrestar=nil then begin frmwarrestar:=Tfrmwarrestar.create(application); frmwarrestar.show; end;
begin
frmwarestat:=Tfrmwarestat.create(Application);
frmwarestat.show;
end;
frmwarestat:=Tfrmwarestat.create(Application);
frmwarestat.show;
action:=cafree;
frmwarrestar:=nil;打开时:
if frmwarrestar=nil then
begin
frmwarrestar:=Tfrmwarrestar.create(application);
frmwarrestar.show;
end;