Главная страница
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.018 c
1-70219
Top Gun
2003-05-10 23:06
2003.05.22
Вопрос насчет событий, создаваемых Дельфи автоматически


1-70302
mazepa
2003-05-08 12:18
2003.05.22
TEdit


1-70254
Black_phoenix
2003-05-12 10:07
2003.05.22
Как в ListView добавлять Items и SubItems


3-70131
xxxCrazyManxxx
2003-04-30 17:26
2003.05.22
Как в делфи к переменной присвоить значение процедуры


8-70409
Cukcik
2003-02-10 12:31
2003.05.22
как написать часы