其中FORM1为主界面。在FORM1上有一个panel。我想实现这样的功能:当点击FORM1上的一个按钮时,创建FORM2并让FORM2显示在FORM1的PANEL上。跟随PANEL的大小进行变化。
我是这样写的:
procedure TForm1.RzBitBtn1Click(Sender: TObject);
var
  Form2: TForm2;
begin
  Form2:=TForm2.Create(nil);
  Form2.Parent:=RzPanel1;
  Form2.Align:=alClient;
  Form2.Show;
end;可是我发现有的时候我在操作FORM2上的控件时会提示“has no parent window”错误。
或者我无法让Form2上的Edit控件获得焦点!
请各位帮助!