[Ama]

Добры вечер знатоки! Вопрос таков как мне убрать с экрана показ PopUp меню при потере фокуса? При вызове этого меню главная форма скрыта и должна быть скрыта и при скрытии меню. Я смотрел в FAQ но там тока при отображенной форме показано скрытие меню.
З.Ы. PopUp меню вызывается из traybara. (где часы)

[SCrat.ORS]

Код:

...
Var
CursorPos: TPOINT;
...

TRAYICON: begin GetCursorPos(CursorPos);
                   if lParam = WM_RBUTTONUP then begin
                   SetForegroundWindow(HandleWnd);
                   TrackPopupMenu(PopupMenu1, TPM_LEFTALIGN or TPM_LEFTBUTTON or TPM_RIGHTBUTTON, CursorPos.X, CursorPos.Y, 0, HandleWnd, nil);
                   EndMenu;
                   SendMessage(HandleWnd,WM_NULL,0,0);
                end;
...

HandleWnd - Хендл главного окна\
PopupMenu1 - Менюха