我在FORM1中 通过BUTTON1的 ONCLICK 事件创建了一个NAME 为 EDI 的edit ,用findcomponent 想向EDI 里写些东西,但是当我单击BUTTON2的时候,没有任何反应,而同样我手动往FORM1中放了个EDIT 控件,就能改变里面的TEXT,这是为什么?我应该怎样实现我想要的效果?还有如果我想从EDI(动态创建的控件)中取走他的里面的TEXT,用什么可以办到?请各位帮帮我啊!谢谢你们了先!以下是我的源码
procedure createedit;
var
edi:Tedit;
begin
edi:=Tedit.Create(application);
edi.Parent:=form1;
edi.Name:='edi';
edi.Text:='edi';
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
createedit;
end;procedure TForm1.Button2Click(Sender: TObject);
begin
(form1.FindComponent('edit') as Tedit).Text:='123' ;
(form1.FindComponent('edit1') as Tedit).Text:='131464';end;