Текущий архив: 2003.05.29;
Скачать: CL | DM;
Вниз
TActionMainMenuBar. Как добавить Item в RunTime? Найти похожие ветки
← →
sergey (2003-05-15 01:19) [0]Хочу сделать список открытых последних файлов. В TMainMenu - нет проблем (уже наверно все напамять знают...). А здесь - не могу понять как добавить пункт меню во время работы. Помагите пожалуйста.
← →
Zergling © (2003-05-19 06:48) [1]procedure TForm1.Action1Execute(Sender: TObject);
begin
Raise Exception.Create("ffff");
end;
ActionMainMenuBar1.ActionManager.ActionBars.Add;
ActionMainMenuBar1.ActionManager.ActionBars[0].ActionBar := ActionMainMenuBar1;
ActionMainMenuBar1.ActionManager.ActionBars[0].Items.Add;
ActionMainMenuBar1.ActionManager.ActionBars[0].Items[0].Action := Action1;
Обязательно присваивай к ActionMainMenuBar1.ActionManager.ActionBars[0].Items[0].Action заранее заготовленный какой нибудь Action1! Иначе Itemsы в ActionMainMenuBar1 отображаться не будут!!!
P.S. Ответ с большой задержкой. Наверно ты и сам уже решил эту задачку.
Страницы: 1 вся ветка
Текущий архив: 2003.05.29;
Скачать: CL | DM;
Память: 0.46 MB
Время: 0.026 c
