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

Вниз

нажатие мыши   Найти похожие ветки 

← →
Yuri_Smith   (2004-04-07 09:31) [0]

Уважаемые мастера,помогите!Как отловить нажатие левой кнопки мыши в компоненте
MainMenu? На любой строке.Делаю так:
procedure TFormMain.WMMenuSelect(var M: TWMMenuSelect);
var
n:integer;
begin
 inherited;

   n:=M.IDItem;
   StatusBar.Panels.Items[1].Text :=IntToStr(n);

end;
А вот нажатие левой кнопки - вопрос?

---

← →
Agent13 ©   (2004-04-07 10:34) [1]

Дык при нажатии левой кнопки сразу выполняется соответствующая команда: поступает сообщение WM_Command

---

← →
DN ©   (2004-04-07 11:41) [2]

Удалено модератором

---

← →
piople ©   (2004-04-07 11:46) [3]

> Yuri_Smith  

Да и если делать как ты то просто лавить соответствующее сообщение(wm_...)

---

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

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

Наверх

Память: 0.47 MB
Время: 0.026 c