Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.05.22;
Скачать: CL | DM;

Вниз

Popup menu   Найти похожие ветки 

 
Kruger ©   (2003-03-23 18:10) [0]

Всем ку. Все это делается в С++, но разницы почти никакой, потому не пугайтесь.

В процессе работы, прога берет записи из БД и создает popup menu из n элементов (n=количеству записей в БД). Все бы ничего, но мне нужно бы еще что-бы создавались под-меню. А этого я не умею. Кто поможет - биг спасибо.
Вот кусок кода, создания меню:
//------------------------------------------------
int num_items, index;

p_menu->Items->Clear();
num_items=FData->Base->RecordCount;
FData->Base->First();
for (index = 0; index < num_items; ++index)
{
TMenuItem *NewItem = new TMenuItem(p_menu); // Создаем меню
p_menu->Items->Add(NewItem);// Добавляем в пупоп
NewItem->Caption = FData->Base->FieldByName("Name")->AsString;
FData->Base->Next();
NewItem->Tag = index;
NewItem->OnClick = PopupMenuItemsClick;
}
tray->Visible=true;
tray->Minimize();
//------------------------------------------------


 
jack128 ©   (2003-03-23 22:59) [1]

подменю это то что делается с помощью Ctrl+Left в IDE&?

Все это делается в Delphi, но разницы почти никакой, потому не пугайтесь. :-))))

PopupMenu.Items[0].Add(TMenuItem.Create(PopupMenu));
Создает подменю в первом пункте меню





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

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

Наверх




Память: 0.46 MB
Время: 0.011 c
1-70347
Dimderol
2003-05-08 18:35
2003.05.22
Проблема с формой внутри package


14-70470
.::D.e.M.o.N.i.X::.
2003-05-03 18:49
2003.05.22
Есть ли пример или компонент для восстановления Zip ов?


4-70562
Kruger
2003-03-23 18:10
2003.05.22
Popup menu


3-70119
Evgeny
2003-04-29 12:41
2003.05.22
addindex, детский вопрос


11-70200
Sam Stone
2002-08-18 14:21
2003.05.22
KOLMemo