请教，如何把字符串转换成控件的标识符，急急急急！！！

Question

请教，如何把字符串转换成控件的标识符，急急急急！！！
procedure TForm1.Button1Click(Sender: TObject);
var
   a1:array[1..5] of TEdit;
   i:integer;
begin   for i:=1 to 5 do
      begin
        a1[i]:=tedit.Create(form1);
        a1[i].Text:=inttostr(i);
        'edit'+inttostr(i)   //把该字符串转换成如EDIT1,EDIT2之类的控件名
      end;end;end.

Answer 1

需要用 FindComponent函数比如if (FindComponent('edit' + IntToStr(i)) is TEdit) then //确定是Tedit类型
begin
  FindComponent('edit' + IntToStr(i)) as TEdit).Text := 'aaa';
  // 找到后就可以直接操作...
end;当然了 上面的代码可以优化一下。