Referenciar componente con un string

jachguate · #10 21-06-2005

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.