нажатие мыши

← →
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]

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

> Yuri_Smith

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

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