Show/hide TMainMenu items depending on there sub menus items visibility
procedure RefreshMenuItemsVisibility(const Menu: TMainMenu)