| WideStudio Programming Guide | WideStudio Index 目次

> ## マウスのボタンを判定するには

> イベントプロシージャ等で、押されているマウスのボタンを判定したい場合が あります。下記の例のようにグローバルマウスインスタンスからの情報取得に よって、現在押されているマウスのボタンが判定することガできます。

>     #----------------------------------------------------------
>     # Function for the event procedure
>     #----------------------------------------------------------
>     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 で、マウスの押下状態を取得します。B,C,D で、 それぞれ、調べたいボタンの判定を行います。== (比較)ではなく、& (アン ド)で判定するのは、複数のボタンが同時に押されている場合があるからです。

Document Release 3.70 for WideStudio ver 3.70, May 2004

WideStudio documents index | 目次

Copyright(C) WideStudio Development Team, 1999-2004 | Last modified: May 25, 2004