Question

delphi tedit???

for i := 0 to form1.ComponentCount - 1 do
begin
if form1.Components[i].ClassName = 'TEdit' then
begin
((form1.Components [i]) as tedit).Text:= form1.Components [i].Name +inttostr(i);//正常。
tedit('Edit'+inttostr(i) ).Visible := str[i] = '1';//出错
end;
end;

-----------------------------------------------------------------
tedit('Edit'+inttostr(i) ).Visible := str[i] = '1';//出错
如何强制转换，必须是类类转换么？

出错。。。

Answer 1

'edit' + inttostr(i) 的结果是一个string
string不可能强制转换成tedit的
delphi不是动态语言