Cita:
|
Empezado por JefeNet
Código:
TLabel(Etiqueta).Visible := True;
me da un error dice: constant expression expected. |
¿Estás seguro de que es en esta línea? No veo razón alguna por la cual te de ese error.
Por otro lado, contrario a lo que dice la documentación, al menos en Delphi 7 no te va a servir FindChildControl, pues sólo busca descendientes de TWinControl y no de TControl como lo es un TLabel. En su lugar puedes usar FindComponent:
Código Delphi
[-]
var
Component: TComponent;
begin
Component := Form1.FindComponent('Etiqueta1');
if Component is TLabel then
TLabel(Component).Visible := true;
end;
// Saludos