[roman]

Empezado por jachguate

Código Delphi [-]
comp:=findcomponent(var1);

// asegúrate de que está la componente o te expones a un AV
if Assigned(comp) and (comp is TControl) then
  TControl(comp).visible := vis;

En este caso sobra ya la primera condición: si Comp es nil seguramente no será TControl

// Saludos