[dec]

Hola,

Pues algo similar a lo que planteas...

Código Delphi [-]

var
  i: integer;
begin
  for i := 0 to Form1.ControlCount-1 do
  begin
    if (Form1.Controls[i] is TLabel) then
      TLabel(Form1.Controls[i]).Visible := false;
  end;
end;