Hola
Segun entiendo un componente puede ser tratado como un objeto, entonces trate de ejecutar este procedimiento:
Código:
procedure Tprincipal.habilitarItems (item: TMenuItem);
begin
if (item.HasParent ) then
habilitarItems (item.Parent);
item.Visible:=true;
end;
Solo que al momento de ejecutarse me sale errores de que el item no ha sido creado, lo cual esta bien. Como puedo realizar referencias a los componentes.