手动创建窗体后组件不能使用问题
在 Form1 中 Button1 OnClick 加入代码：

var

form2:Tform;

begin

form2:=form2.create(Application); // form2:=form2.create(self);
form2.Show;
form2.Parent:=form1.Panel1;

end;

结果，运行后，点击 form1 后，出来 form2。但是 form2上的Edit1 不能编辑。Edit1属性 Enabled .

请各位大侠帮忙看看!谢谢!



[解决办法]

Delphi(Pascal) code

procedure TForm1.Button2Click(Sender: TObject);var  form2:Tform2;  //你的原来是TFORMbegin  form2:= tform2.create(nil);  // 你的原来 form2.create  form2.Parent:=form1.Panel1;  form2.Align:= alclient;  form2.BorderStyle:= bsnone;  form2.Show;end;