首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > .NET > .NET >

手动创建窗体后组件不能使用有关问题

2012-03-05 
手动创建窗体后组件不能使用问题在Form1 中 Button1 OnClick 加入代码:varform2:Tformbeginform2:form2.

手动创建窗体后组件不能使用问题
在 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; 

热点排行