acc,bcc各是个Tedit控件,我想用一个变量字符串name1表示a和b,那带变量name1的话怎么表示出acc和abb呢,请看内容?

Question

这个怎么表示：acc,bcc各是个Tedit控件
var name1:string
if 条件1 then
name1:='a';if 条件2 then
name1:='b';
我怎么用name1表示出acc和bcc呢？
我这样表示：'+name1+'cc.text:='';
通不过，正确的怎么表示？

Answer 1

showmessage((self.FindComponent(name1) as tedit).Text )

Answer 2

想了一个有些烦的方法
 for i:=0 to Componentcount-1 do
 begin
  if Components[i].ClassType = tedit then
   if TEdit(Components[i]).Name=　name1+'cc‘ then
    TEdit(Components[i]).text := '';
 end;

Answer 3

不错，使用FindComponentif 条件1 then
  name1:='a';if 条件2 then
  name1:='b';(Self.FindComponent(name1+'cc') as TEdit).Text := 'ok';