Скачать: CL | DM;

Как прикрутить 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]

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

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.01 c