Ver Mensaje Individual
  #11  
Antiguo 21-06-2005
Avatar de jachguate
jachguate jachguate is offline
Miembro
 
Registrado: may 2003
Ubicación: Guatemala
Posts: 6.254
Reputación: 28
jachguate Va por buen camino
Cita:
Empezado por roman
Sólo que FindComponent regresa TComponent y no TControl.
cierto... cierto. Por un momento creí que habia un método FindControl..

Cita:
Empezado por roman
Código Delphi [-]
comp:=findcomponent(var1);

// asegúrate de que está la componente o te expones a un AV
if Assigned(comp) then
  TBitBtn(comp).visible := vis;
De igual manera, yo recomendaría un casteo seguro, no sea que al final de cuentas tampoco sea botón. Otra que sigue siendo válida es dejarlo todo apuntado a controles (TControl), así podrás ocultar/mostrar también etiquetas, grids, radio buttons, y muchas cosas mas.

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;

Hasta luego.

__________________
Juan Antonio Castillo Hernández (jachguate)
Guía de Estilo | Etiqueta CODE | Búsca antes de preguntar | blog de jachguate
Responder Con Cita