MDIForm adn Parent and MdiChild的错误？

Question

project1.dpr
begin
  application.CreateForm(TfmMain, fmMain);
  //Application.CreateForm(TForm2, Form2); 这句去之
  application.Run;
end;main.pas
procedure TMainForm.SystemnumberExecute(Sender: TObject); 
var 
  form2:TFORM2; 
begin 
  form2:=Tform2.Create(Self); 
  form2.show; 
end;
  

Answer 1

project1.dpr
begin
  application.CreateForm(TfmMain, fmMain);
  //Application.CreateForm(TForm2, Form2); 这句去之
  application.Run;
end;main.pas
procedure TMainForm.SystemnumberExecute(Sender: TObject); 
var 
  form2:TFORM2; 
begin 
  form2:=Tform2.Create(Self); 
  form2.show; 
end;