Código Delphi [-] for i:=0 to 10 do begin nombre:='F1_' ; butaca:=FindComponent(nombre + InttoStr(i)); ... ...
for i:=0 to 10 do begin nombre:='F1_' ; butaca:=FindComponent(nombre + InttoStr(i)); ... ...