procedure TForm1.AddSubMenuItem;
var
MainMenuItem, SubMenuItem: TMenuItem;
begin
// Предположим, что у вас уже есть главное меню и пункт меню
MainMenuItem := File1; // Например, пункт меню "File1"
// Создаем новый пункт меню для подменю
SubMenuItem := TMenuItem.Create(Self);
SubMenuItem.Caption := 'New SubMenu Item'; // Название пункта подменю
SubMenuItem.OnClick := SubMenuItemClick; // Обработчик события клика
// Добавляем новый пункт меню к главному пункту меню
MainMenuItem.Add(SubMenuItem);
end;
procedure TForm1.SubMenuItemClick(Sender: TObject);
begin
// Обработчик события клика по пункту подменю
ShowMessage('SubMenu Item Clicked!'
end; Вот что пишет deepseek
Есть общие сведения о формировании главного меню в Delphi.
Для создания главного меню в Delphi используется компонент MainMenu. Обычно на форму помещается один такой компонент, но можно разместить и несколько — с разными наборами разделов, соответствующими различным режимам работы приложения.
Основное свойство компонента — Items. Его заполнение происходит с помощью Конструктора Меню. Его вызывают двойным щелчком на компоненте MainMenu или нажатием кнопки с многоточием рядом со свойством Items в окне Инспектора Объектов.
Каждый раздел меню (элемент свойства Items) является объектом типа TMenuItem, который обладает своими свойствами, методами и событиями. Свойство Caption обозначает надпись раздела.
Более подробную информацию о работе с меню в Delphi можно найти на сайтах interface.ru, mf.grsu.by, bdrc.ru.
Просто открываете файл и читаете из него строки по одной за раз.
Для каждой прочитанной строки создаете TMenuItem с этой строкой в качестве надписи и пихаете его дочерним элементом для одного из существующих пунктов меню.
Делфи под рукой не имею, поэтому конкретный код подсказать затрудняюсь.