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

Вниз

Выпадающее меню....   Найти похожие ветки 

 
yarkeyev   (2005-05-19 20:22) [0]

делаю эмуляцию работы аськи 2003
есть кнопка, нужено чтобы при нажатии на нее левой кнопкой мыши появлялось выпадающее меню с пунктами меню, есть варианты?


 
kat ©   (2005-05-19 20:49) [1]

вот исходник на С++ для WinApi (лень переводить) :
//переменные
HMENU men;
const int ID_M1=7130;
const int ID_M2=7131;
//создание меню
men=CreatePopupMenu();
InsertMenu(men, -1, 0, ID_M1, "1");
InsertMenu(men, -1, 0, ID_M2, "Exit");
//в обработчике события
case WM_USER+123:
  TrackPopupMenu(men,0,wParam+stx+265,
                                sty+24+lParam,50,h,0);
  break;
case WM_COMMAND:
  wmId    = LOWORD(wParam);
  wmEvent = HIWORD(wParam);
  // Parse the menu selections:
  switch (wmId)
  {
   case ID_M2:
      SendMessage(h,WM_DESTROY,0,0);
      break;
   case ID_M1:
      MessageBox(h,"=)","=))",MB_OK);    
      break;
   default:
      return DefWindowProc(hWnd, message, wParam, lParam);
  }
  break;

//в данном случае нажатие кнопки отлавливала библиотека с "хуком", и отсылала моей форме сообщение WM_USER+123, а та уже в свою очередь создавала меню и обрабатывала для него события.

Если ничего не ясно, гоу учить винапи и С++



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

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

Наверх




Память: 0.46 MB
Время: 0.038 c
1-1116495457
NOVOURALSK
2005-05-19 13:37
2005.06.06
Help please


1-1116651354
chelovek
2005-05-21 08:55
2005.06.06
Массив и строки.


3-1115107253
salexn
2005-05-03 12:00
2005.06.06
ClientDataSet и проблема фильтрации для WideString полей


10-1093613582
Reflex
2004-08-27 17:33
2005.06.06
вопрос по OleAutomation


1-1116788754
Delcom
2005-05-22 23:05
2005.06.06
Как работать с таймером в Delphi 6???