对窗口控件操作(在线)

Question

我在窗口上放了12以上的TEdit控件，一个TButton和另两个TEdit控件(x1,x2)。
x1当中用来输入内容，x2用来输入在第几个TEdit控件中输入x1的内容!
请大家告诉我如何来写程序？？？我要用的是，从数据库中x_id中得到一个值，然后根据这个值在哪个TEdit中输入。
比方说，从x_id中得到1，哪么就在TEdit1中输入内容.

Answer 1

注意命名规则：
如Editx(其中x为连续性整数)TEdit.FindComponment('Edit'+IntToStr(x)).Text := '123';

Answer 2

for i:=0 to ComponentCount-1 do
begin
  if (Components[i] is TEdit) then
  begin
    x_id=i;
    (Components[I] as TEdit).setfous;
  end;
end;

Answer 3

procedure TForm1.Button1Click(Sender: TObject);
begin
  TEdit(Form1.FindComponent('Edit' + x2.Text)).Text := x1.Text;
end;