怎样关闭一个MDI窗口，用close好像只能最小化。

[djwdjw]

我想关闭一个MDI窗体，怎样才能正确关闭，不使用hide。

[yuner5]

在close事件中写上
destroywindow(handle);

[liuri璇玑]

FormClose中写:
Action := caFree;
FormDestroy中写：
Form1 := nil;

[readersm68]

procedure TfrmPPlanM.FormClose(Sender: TObject; var Action: TCloseAction);
begin
//if Assigned(frm) then FreeAndNil(frm);
Action := CaFree;
frmPPlanM := nil;
end;
//frmPPlanM为子窗体
//frm为子窗体创建的窗体

[OO_is_just_P]

Onclose事件写：
Action :=caFree;

[alimyso]

同上

[littleflowerfox]

在MDI Form的Close事件中写入：
Action := caFree;

[sailer_shi]

FormClose中写:
Action := caFree;

[djwdjw]

非常感谢大家，问题只有20分，七八个不够分，不过不要紧，我刚学Delphi,问题很多的。

[ManagerMan]

来晚了Action := caFree;

[hotdog911]

来晚了，同上

[toby]

同意 liuri(璇玑: 还不看书去……) 的，更规范些。

[FrameSniper]

璇玑？呵呵呵呵，SQL版的山寨夫人？欢迎欢迎！HOHO！

[FrameSniper]

直接用FreeAndNil（Self）；就可以了

[gytyl]

FormClose中写:
Action := caFree;

[SunKinXing]

同意 liuri(璇玑: 还不看书去……)

DELPHI6.0版本以后的可以直接用FreeAndNil（Self）；就可以了

[angelface]

Action := caFree;