TMainMenu

//隐藏与显示菜单
Self.Menu := nil; {隐藏菜单}

Self.Menu := MainMenu1; {显示菜单}