Текущий архив: 2003.02.13;
Скачать: CL | DM;

Вниз

Создание пунктов в меню   Найти похожие ветки 

← →
Andrey___   (2003-02-05 09:08) [0]

Как создать(добавить) пункт в меню на этапе выполнения программы

---

← →
Viktor Kushnir ©   (2003-02-05 09:23) [1]

procedure TMainForm.MultiBufferMenuPopup(PointX,PointY :integer);
var
NewMenu: TMenuItem;
begin
NewMenu := TMenuItem.Create(MultiBufferMenu);
NewMenu.Caption := "Tralalala";
NewMenu.Tag := 1; // 2 иди какой хочешь.
NewMenu.OnClick := NewMenuOnClick; //не забудь этот метод
// создать и описать
MultiBufferMenu.Items.Insert(1,NewMenu); //1 - позиция куда
// воткнуть пункт в меню
end;

---

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

Текущий архив: 2003.02.13;
Скачать: CL | DM;

Наверх

Память: 0.46 MB
Время: 0.018 c