Кнопка в TMainMenu с правой стороны

ModifyMenu(MainMenu.Handle, 3 { индекс меню, начиная слева с нуля}, 
    mf_ByPosition or mf_Popup or mf_Help, mnuHelp.Handle, 
    PChar('Help'));

Автор: Smike

Взято из https://forum.sources.ru