WideStudio Logo
WideStudio
Programming Guide
WideStudio Index
Table of contents


判断鼠标按键

在事件过程或其他场合,时常需要进行鼠标按键的判断。如下例所示, 可以通过全局鼠标实例,判断当前点击的鼠标按键。

#----------------------------------------------------------
# 事件过程对应的处理函数
#----------------------------------------------------------
use mpfc;

sub btn_ep {
  my ($object) = @_:
  $status = mpfc::WSDmouse_getStatus(mpfc::WSGIappMouse());      # A
  if ($status & $mpfc::WS_MOUSE_BTN1){              # B
    # 点击鼠标左键时执行的处理
    #....
  }
  if ($status & $mpfc::WS_MOUSE_BTN2){              # C
    # 点击鼠标中键时执行的处理
    #....
  }
  if ($status & $mpfc::WS_MOUSE_BTN3){              # D
    # 点击鼠标右键时执行的处理
  }
}
1;

首先,如A 所示获得鼠标的点击状态。C、D、E 对鼠标按键进行逐个判断。 由于需要判断是否有多个按键被同时点击、所以需要使用“==”(比较), & (与操作)进行判断。

Document Release 3.70 for WideStudio ver 3.70, Feb 2004


WideStudio documents index | Table of contents

Copyright(C) T. Hirabayashi, 2000-2004 Last modified: Feb 25, 2004