WideStudio/MWT Programming Guide	WideStudio/MWT Index Table of contents

---

마우스의 단추를 판정하기에는

이벤트 프로시저등에서 눌린 마우스의 단추를 판정할 경우가 있습니다. 다음 예처럼 전역 마우스 인스턴스에서의 정보 취득에의해서 현재 눌리우는 마우스의 단추가 판정할수있습니다.

#----------------------------------------------------------
# Function for the event procedure
#----------------------------------------------------------
use mwt;

sub btn_ep {
  my ($object) = @_:
  $status = mwt::WSDmouse_getStatus(mwt::WSGIappMouse());      # A
  if ($status & $mwt::WS_MOUSE_BTN1){              # B
    # 왼쪽 마우스 단추가 눌린 경우의 처리
    #....
  }
  if ($status & $mwt::WS_MOUSE_BTN2){              # C
    # 가운데 마우스 단추가 눌린 경우의 처리
    #....
  }
  if ($status & $mwt::WS_MOUSE_BTN3){              # D
    # 오른쪽 마우스 단추가 눌린 경우의 처리
    #....
  }
}
1;

A 에서 마우스의 눌린 상태를 취득합니다. B,C,D 에서 각각 알려는 단추의 판정을 합니다. == (비교)가 아니라 & (앤드)로 판정하는것은 복수의 단추가 동시에 눌리우는 경우가 있기때문입니다.