HMENU = Cardinal

Ссылки: TMenu.Handle, TMenuItem.Handle