delphi字符转控件类型
for i:=0 to 6 do
begin
TLabel('lbl2'+IntToStr(i)).Caption:='abc';
end;
如上面代码,报错 (访问地址非法);
如何将字符串转换成控件类型并对对应的控件进行操作呢?

[解决办法]

TLabel(Self.FindComponent('Label1')).Caption := 'abc';

例如这样改：

var
  I: Integer;
  L: TComponent;
begin
  for I := 1 to 6 do begin
    L := Self.FindComponent('Label'+InttoStr(I));
    if L <> nil then
      if L is TLabel then TLabel(L).Caption := 'abc';
  end;
end;