procedure TFormChild.Button1Click(Sender: TObject); begin ChildForm2 := TChildForm2.Create(Owner); end;