Главная страница
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.048 c
6-1111521808
DEMON XXX
2005-03-22 23:03
2005.06.06
Как вставить сохранённую HTML страницу в форму вDelphi?


14-1116630531
Lobs
2005-05-21 03:08
2005.06.06
установrf компонент на delphi 8


1-1116514312
Cat
2005-05-19 18:51
2005.06.06
число сделать наибольшим числом кратным 10.


9-1110485805
Игнатенков Станислав
2005-03-10 23:16
2005.06.06
Игровой цикл


14-1116391973
Жук
2005-05-18 08:52
2005.06.06
Трансляция финала кубка УЕФА