Código Delphi
[-]
for i:=componentcount-1 downto 0 do begin
if (Components[i] is TLabel) and (TLabel(Components[i]).Tag in [1..50]) then begin
TLabel(Components[i]).Enabled:= True;
end; end;
Buena idea la de usar el tag...
creo que sería algo así, ¿o no?