Текущий архив: 2003.07.03;
Скачать: CL | DM;
Вниз
Popupmenu Найти похожие ветки
← →
Miramax © (2003-06-20 12:58) [0]Добрый день, уважаемые мастера! Пожалуйста подскажите как реализовать после нажатия кнопки создание еще одного подпункта меню?
Заранее благодарен!
P.S. Извиняюсь за тупой вопрос, но очень надо.
← →
Darrin © (2003-06-20 13:06) [1]procedure TForm1.Button4Click(Sender: TObject);
var N2: TMenuItem;
begin
N2:=TMenuItem.Create(MainMenu1);
N2.Visible:=true;
N2.Caption:="11111";
MainMenu1.Items[0].Add(N2);
end;
← →
Miramax © (2003-06-20 13:25) [2]procedure TForm1.Button4Click(Sender: TObject);
var N2: TMenuItem;
begin
N2:=TMenuItem.Create(MainMenu1);
N2.Visible:=true;
N2.Caption:="11111";
MainMenu1.Items[0].Add(N2);
end;
Спасибо, конечно за коб, но мне нужно, чтобы пункт добавлялся в Popupmenu, а не в MainMenu
← →
Centronix (2003-06-20 14:19) [3]
> Спасибо, конечно за коб, но мне нужно, чтобы пункт добавлялся
> вPopupmenu, а не в MainMenu
Хорошо пошутил :)
PopupMenu1.Items[0].Add(N2);
Страницы: 1 вся ветка
Текущий архив: 2003.07.03;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.021 c
