procedure TForm1.MenuItem2Click(Sender: TObject);begin Form2.Parent:=Panel2; Form2.Visible:=true;end;