Author: Misha Moellner

How to right-align a TMenuItem

Answer:

If you have a TMainMenu MainMenu1 and a HelpMenuItem at the end of the Menubar; 
calling the following OnCreate- Eventhandler will right-align the HelpMenuItem

1   uses
2     Windows;
3   
4   procedure TForm1.FormCreate(Sender: TObject);
5   begin
6     ModifyMenu(MainMenu1.Handle, 0, mf_ByPosition or mf_Popup
7       or mf_Help, HelpMenuItem1.Handle, '&Help');
8   end;