IPB
ЛогинПароль:

> ВНИМАНИЕ!

Прежде чем задать вопрос, смотрите FAQ.
Рекомендуем загрузить DRKB.

Наладить общение поможет, если вы подпишитесь по почте на новые темы в этом форуме.

> Crgsnbt выпадающего меню...
сообщение
Сообщение #1


Пионер
**

Группа: Пользователи
Сообщений: 72
Пол: Мужской

Репутация: -  0  +


Form1.PopupMenu1.Popup(Mouse.CursorPos.x, Mouse.CursorPos.y);



показываю popup menu.... приложение скрыто (ShowWindow(Application.Handle, SW_HIDE);)
как закрыть меню при нажатии мыши...

пробовал:
1. (Как перехватывать события, посланные другим приложениям? - DRKB)

function HookProc(Code: integer; WParam: word; LParam: Longint): Longint; stdcall;
var
msg: PEVENTMSG;
begin
if Code >= 0 then
begin
result := 0;
msg := Pointer(LParam);
with Form1 do
end
else
result := CallNextHookEx(HookHandle, code, WParam, LParam);
end;


вроде заработало, не давно опять проверил, не хочет работать...
сначала не реагировало на мышу совсем, в том числе при выборе пункта меню ноль эмоций,
потом меню сразу же стало закрываться... код не менял...
может это быть от того что кто то ещё хук ставит?
нужно ли эту функцию делать в длл?
и может это можно сделать как-нибудь проще?
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

Сообщений в этой теме


 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 





- Текстовая версия 7.12.2021 16:07
500Gb HDD, 6Gb RAM, 2 Cores, 7 EUR в месяц — такие хостинги правда бывают
Связь с администрацией: bu_gen в домене octagram.name