为什么出错???(50分)

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

lkf

Unregistered / Unconfirmed
GUEST, unregistred user!
。。。
uses FormHelper;

procedure TMainForm.FormCreate(Sender: TObject);
begin
HelperForm:=THelperForm.Create(Application);
end;

procedure TMainForm.FormDestroy(Sender: TObject);
begin
HelperForm.Free;
end;
 
你的mainform是不是主form啊?
 
若在MainFrom关闭前HelperForm就被关闭就会出错.
你应该在HelperForm的Onclose设置HelperForm:=nil.
在MainForm关闭前检查HelperForm是否为Nil,若不是.则HelperForm.Free;
 
你把HelperForm.Free;改为self.free;
helpherform.free本身虽然行的通 ,但并不规范!
 
难道没人要分?
 
多人接受答案了。
 
后退
顶部