如何创建父，子窗体???????

Question

例如：我现在想实现 点击主菜单FILE下拉SALE，然后弹出个子窗体``
前面步骤已经做好，并且分别在父子窗体FormStyle属性设置FSMDIFrom和FSMDIchile，在子窗体的project/options也把子窗体移至可用窗体（Available forms)列表。
请问接下来我要如何设置才能实现“我现在想实现 点击主菜单FILE下拉SALE，然后弹出个子窗体``”

Answer 1

File-New-Other-Projects-MDI Application
看懂它的代码你就会的了
procedure TMainForm.CreateMDIChild(const Name: string);
var
  Child: TMDIChild;
begin
  { create a new MDI child window }
  Child := TMDIChild.Create(Application);
  Child.Caption := Name;
  if FileExists(Name) then Child.Memo1.Lines.LoadFromFile(Name);
end;procedure TMainForm.FileNew1Execute(Sender: TObject);
begin
  CreateMDIChild('NONAME' + IntToStr(MDIChildCount + 1));
end;

Answer 2

File-New-Other-Projects-MDI Application
按2楼步骤，我试着弄下去``可并没有发现有“MDI Application”
我用Delphi8.0````
这是怎么回事呀？？

Answer 3

form1  -----父
form2  -----子form1begin
  if not assigned(form2) then
  form2 := tform2.create(application);
  form2.show;
end;
------------------
form2的close里写begin
  freeandnil(form2);
end;