modules/win95.mouse-input.lisp

   1
   2 (cl:in-package w32apimod)
   3
   4 (define-w32api-module win95.mouse-input :win95.mouse-input)
   5
   6 (cl:in-package cl-w32api.module.win95.mouse-input)
   7
   8 (defcfunex-exported ("DragDetect" DragDetect :convention :stdcall) :int
   9   (arg0 :pointer)
  10   (arg1 POINT))
  11
  12 (defcfunex-exported ("GetCapture" GetCapture :convention :stdcall) :pointer)
  13
  14 (defcfunex-exported ("GetDoubleClickTime" GetDoubleClickTime :convention :stdcall) :unsigned-int)
  15
  16 (defcfunex-exported ("mouse_event" mouse_event :convention :stdcall) :void
  17   (arg0 :unsigned-long)
  18   (arg1 :unsigned-long)
  19   (arg2 :unsigned-long)
  20   (arg3 :unsigned-long)
  21   (arg4 :unsigned-long))
  22
  23 (defcfunex-exported ("ReleaseCapture" ReleaseCapture :convention :stdcall) :int)
  24
  25 (defcfunex-exported ("SetCapture" SetCapture :convention :stdcall) :pointer
  26   (hWnd :pointer))
  27
  28 (defcfunex-exported ("SetDoubleClickTime" SetDoubleClickTime :convention :stdcall) :int
  29   (arg0 :unsigned-int))
  30
  31 (defcfunex-exported ("SwapMouseButton" SwapMouseButton :convention :stdcall) :int
  32   (arg0 :int))
  33
  34 (defcfunex-exported ("TrackMouseEvent" TrackMouseEvent :convention :stdcall) :int
  35   (arg0 :pointer))
  36