Вопрос № 41189: Мир вам, уважаемые эксперты!
Подскажите как создать ВСПЛЫВАЮЩЕЕ (Popup) меню на winAPI.
С уважением, Лука.
P.S. Пишу на Паскале, но Си-шный код тоже переварю....
Вопрос № 41.189
Мир вам, уважаемые эксперты!
Подскажите как создать ВСПЛЫВАЮЩЕЕ (Popup) меню на winAPI.
С уважением, Лука.
P.S. Пишу на Паскале, но Си-шный код тоже переварю.
Отправлен: 24.04.2006, 21:42
Вопрос задал: Luka (статус: Посетитель)
Всего ответов: 1 Мини-форум вопроса >>> (сообщений: 0)
Отвечает: Решетник Д
Здравствуйте, Luka!
procedure createpopup(p: TPoint);
var menu: HMENU;
begin
menu := createPopupmenu; //создать окно меню
InsertMenu(menu, 1, 0, 1, 'exit'); //добавить пункт меню
TrackPopupMenu(menu, 0, p.x, p.y, 0, mainw, nil); //вызвать меню в позиции P
end;
mainw - дескриптор приложения.
также после вызова меню нужно отослать себе кое-то сообщение для того, чтобы меню пропадало при деактивации (так делают все менюшки "нормальные")
не помню, какое, но можно попробовать SendMessage(mainw, WM_USER, 0, 0);
--------- Жизнь коротка, чтобы писать на ассемблере
Ответ отправил: Решетник Д (статус: 3-ий класс)
Ответ отправлен: 24.04.2006, 23:40 Оценка за ответ: 5 Комментарий оценки: Спасибо.