Функция NewSubMenu Menus
================================================================= Объявление function NewSubMenu(Name: TmenuStr; AHelpCtx: Word; SubMenu: PMenu; Next: PMenuItem): PMenuItem;
Функция Распределяет и возвращает указатель на новую запись TMenuItem, которая представляет подменю (NewStr используется для распределения поля указателя Name).
См. также TApplication.InitMenuBar,TMenuView, NewLine, NewItem.