有人会吗

procedure TForm1.Button3Click(Sender: TObject);
begin
  ShowMessage(FindComponent('Button1').ClassName);
end;

// 演示了查找一个叫'Button1'的控件（string类型）
// 并显示他的类名。

恐怕只能遍历了吧？（在FoxPro里可以在字符串前加一个＆符号就使一个变量变为一个表达式或变量名，可惜Delphi没有这样的功能）

procedure TForm1.Button3Click(Sender: TObject);
var
  Button: TButton;
begin
  Button := FindComponent('Button1') as TButton; // 必须确定有Button1名称的控件，而且是TButton类型的。
  // 下面操作找到的这个Button
  Button.Click;  // 执行他的Click事件
end;

你的方法有问题..只保存它的名字的话，,你肯定要便利才能再次找到它..保存指向它的指针.
如果你要保存很多.你可以把他们都保存到一个TList,TObjectList 中去.使用的时候,直接
TButton(List[i]).Click;TButton()是做强制类型转换..换成你自己的类型

procedure TForm1.Button3Click(Sender: TObject);
var
  Button: TButton;
begin
  Button := FindComponent('Button1') as TButton; // 必须确定有Button1名称的控件，而且是TButton类型的。
  // 下面操作找到的这个Button
  Button.Click;  // 执行他的Click事件
end;