Как прикрутить PopupMenu к одному из пунктов MainMenu?

← →
lipskiy (2002-04-22 23:58) [0]

Условие - оба меню созданы в дизайн-тайме.
Вариант с повесить на N1OnCkick PopupMenu1.Popup(x,y) не предлагать.

← →
Chepel (2002-04-23 02:28) [1]

Files1 - submenu куда добавлять (у меня это первый пункт mainmenu "Files")
0 - в какую позицию в submenu добавить (те - в дизаин тайме под айтем место не забивается)

Естественно, любые изменения PopupMenu1 автоматически отражаются и в основном меню...

procedure TfrmMain.FormCreate(Sender: TObject); begin PopupMenu1.Items.Caption := "My new pop-up item"; Files1.Insert( 0, PopupMenu1.Items); end;

← →
lipskiy (2002-04-23 12:01) [2]

Спасибо, попробую.

Как прикрутить PopupMenu к одному из пунктов MainMenu? Найти похожие ветки