![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как прикрутить PopupMenu к одному из пунктов MainMenu? [D5]
lipskiy © (2002-04-22 23:58:00)Условие - оба меню созданы в дизайн-тайме.
Вариант с повесить на N1OnCkick PopupMenu1.Popup(x,y) не предлагать.
lipskiy (2002-04-23 12:01:00) [1]Спасибо, попробую.
Chepel (2002-04-23 02:28:00) [2]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;