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);
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);
if Assigned(comp) and (comp is TControl) then
TControl(comp).visible := vis;
Hasta luego.