void __fastcall TForm1::FormCreate(TObject *Sender)
{
TMenuItem* mi = new TMenuItem(PopupMenu1);
mi->Caption = "dfdfdf";
PopupMenu1->Items[0].Add(mi);
mi = new TMenuItem(PopupMenu1);
mi->Caption = "ipiiopiuiop";
PopupMenu1->Items[0].Add(mi);
ToolButton1->DropdownMenu = PopupMenu1;
}
PopupMenu
ToolButton Style=tbsDropDown, подвязано контекстное меню.
Как программно заполнить выпадающий список кнопки ToolButton, то есть состав PopupMenu :???:
Как программно заполнить выпадающий список кнопки ToolButton, то есть состав PopupMenu :???:
Цитата:
Originally posted by micle77
ToolButton Style=tbsDropDown, подвязано контекстное меню.
Как программно заполнить выпадающий список кнопки ToolButton, то есть состав PopupMenu :???:
ToolButton Style=tbsDropDown, подвязано контекстное меню.
Как программно заполнить выпадающий список кнопки ToolButton, то есть состав PopupMenu :???:
Подвязать программно...
Код:
Спасибо.
А как удалить нужный пункт:???:
А как удалить нужный пункт:???:
Цитата:
Originally posted by micle77
Спасибо.
А как удалить нужный пункт:???:
Спасибо.
А как удалить нужный пункт:???:
Ни за что не догадаешся:
TMenuItem::Delete(int Index_Need_MenuItem);
В справку то загляни...