Вниз
Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.012 c
14-70440
Dimaz-z
2003-05-01 19:32
2003.05.22
Где скачать RxLib для Delphi 7?


14-70514
Hacker.
2003-05-03 08:29
2003.05.22
Сохранение иконок.


1-70391
Seldon
2003-05-09 18:29
2003.05.22
Подсветка синтаксиса в RichEdit


1-70267
Cherepovets
2003-05-12 12:10
2003.05.22
Возведение в степень


3-70178
Любовь
2003-05-01 22:36
2003.05.22
Paradox




   Наверх