TMouseEvent = procedure (Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer)
Событие кнопки мыши.
Параметры:
Ссылки: TControl.OnMouseDown, TControl.OnMouseUp, TTrayIcon.OnMouseDown, TTrayIcon.OnMouseUp