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

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

menu [D6, Win95/98]


Алексей Ким ©   (2002-11-02 10:23:00) 

как сделать сабж?
и может кто знает как убрать заголовок окна?


Arcus   (2002-11-04 11:17:00) [1]

Например, динамическое контекстное меню я делаю так:

var Menu: HMenu;
...
Menu:= CreatePopupMenu;
AppendMenu(Menu, MF_STRING, cm_Edit, "&Edit");
AppendMenu(Menu, MF_STRING, cm_Test, "&Test");
AppendMenu(Menu, MF_STRING, cm_Add, "&Add");
if bTest then
CheckMenuItem(Menu, cm_Test, mf_ByCommand or mf_Checked)
else
CheckMenuItem(Menu, cm_Test, mf_ByCommand or mf_Unchecked);
TrackPopupMenu(Menu, tpm_LeftAlign or tpm_RightButton, X, Y, 0, WndHandle, nil);
DestroyMenu(Menu);


Алексей Ким   (2002-11-02 18:56:00) [2]

эти фции я знаю но после моего криворукого использования у меня вышла ошибка виндавса "системе существенно не хватает ресурсов" можешь примерчик дать?

нет у createwindowsex + ws_ex_appwindow(или другого стиля)


Arcus   (2002-11-02 12:06:00) [3]

>как сделать сабж?
На выбор
HMENU CreateMenu(VOID)
HMENU CreatePopupMenu(VOID)
HMENU LoadMenu(HINSTANCE hInstance, LPCTSTR lpMenuName);
HMENU LoadMenuIndirect(CONST MENUTEMPLATE *lpMenuTemplate);


>и может кто знает как убрать заголовок окна?
У меню?!?!?


Наверх

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