Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

popup menu не на delphi, а на API [D5, WinME, Win2k, WinXP]


с - - + + - ©   (2002-12-15 11:56:00) 

Здрасте всем!

Да скажете, прищёл тут ещё один и говорит: давайте падавайте мне мне меню, да ешё и на API!!

А хо-хо не хо-хо ответят многие.

Ну всё равно осмелюсь просить у вас пример popup menu (причём сложного т.е у нас есть popup menu , а в popup menu есть подменю, а в подменю есть ещё одно ..... хотябы 2-3 вложенности.

Заранее благодарен за примеры или за ссылки.


asmith   (2002-12-15 16:05:00) [1]

var
menu : HMENU;
menu := CreatePopupMenu();
const
IDM_START = 20;
IDM_EXIT = 21;
IDM_ABOUT = 22;
IDM_STOP = 23;
...
AppendMenu(menu, MF_STRING, IDM_START, "Start");
AppendMenu(menu, MF_STRING, IDM_STOP, "Stop");
AppendMenu(menu, MF_SEPARATOR, 0, nil);
AppendMenu(menu, MF_STRING, IDM_EXIT, "Exit");
AppendMenu(menu, MF_STRING, IDM_ABOUT, "About");


Слесарь Матерящийся   (2002-12-15 12:38:00) [2]

Win32 Programmer"s Reference, статья "Menu Functions"


Наверх

Титульная страница Поиск, карта сайта Написать письмо