Var i: integer;begin for i:=0 to Form1.ComponentCount-1 do begin if Components[i] is TWinControl then TWinControl(Components[i]).Visible := False; end; end;
