Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.04.11;
Скачать: CL | DM;

Вниз

TrackPopupMenu ?   Найти похожие ветки 

 
frost ©   (2004-02-02 16:29) [0]

Необходимо отобразить всплывающее меню pm в окне с дескриптором HWND.
Пишу
TrackPopupMenu(pm.Handle, TPM_LEFTALIGN or TPM_RIGHTALIGN or TPM_CENTERALIGN, CursorPoint.X,
                 CursorPoint.Y, 0, HWND, 0)
но меню не отображается, что не так?
PS: меню отображается только если в качестве HWND указываю Handle главного окна.
   но мне надо отображать именно на окне с произвольным Handle.


 
DVM ©   (2004-02-02 19:11) [1]

Этот HWND - это то окно, в которое будут приходить WM_COMMAND, указывающие на выбор пункта из меню. К местоположению меню никакого отношения не имеет.

> но меню не отображается, что не так?

А оно (меню) было создано до этого вообще и пункты в него добавлены?

hMenuPopup:=CreatePopupMenu;
 if (hMenuPopup<>0) then
  begin
   AppendMenu(hMenuPopup, MF_STRING, 1000, pchar(RsMessage201));
   AppendMenu(hMenuPopup, MF_STRING, 1001, pchar(RsMessage202));
   AppendMenu(hMenuPopup, MF_STRING, 1002, pchar(RsMessage203));
  end;
...
...
...

WM_RBUTTONDOWN:
 begin
   TrackPopupMenu (hMenuPopup, 0, LoWord(lParam), HiWord(lParam), 0, Wnd, nil);
   Result := DefWindowProc(wnd, msg, wparam, lparam);
 end;



Страницы: 1 вся ветка

Текущий архив: 2004.04.11;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.074 c
1-1082474833
webmaster
2004-04-20 19:27
2004.04.11
Чат со смайликами ?????


1-1081948242
k@rt
2004-04-14 17:10
2004.04.11
Глюк с TPageControl


14-1079709921
S.W.I.N.E.
2004-03-19 18:25
2004.04.11
Помогите подобрать тему к реферату!


3-1081759274
alex123
2004-04-12 12:41
2004.04.11
ExpressQuantumGrid - значение поля в LookupComboBox программно?


4-1076002747
dima_matrix
2004-02-05 20:39
2004.04.11
дочерний процесс