HSPポータル
サイトマップ お問い合わせ


HSPTV!掲示板


未解決 解決 停止 削除要請

2009
0619
26℃右クリック7未解決


26℃

リンク

2009/6/19(Fri) 04:33:57|NO.25836

OSビスタ、HSP3.2β3、intuos3のタブレットを使用しています。
getkeyでテストしたのですが、ペンのサイドスイッチ(設定は右クリック)が反応しませんorz
右クリックしたままぺんを少し動かすと反応します。

HSP以外での動作だと正常のようなので、HSPが問題ではないかと・・・

同じ環境のひとは試していただけないでしょうか?



この記事に返信する


inovia

リンク

2009/6/19(Fri) 06:58:38|NO.25837

以下のコードで実験してみましたが、特に問題はありませんでした。
ペンタブの設定のような気がします。

repeat getkey k,2 if k:title "!":else:title"" wait 5 loop

HSP: Ver 3.1
OS: Windows XP SP3
PenTab: WACOM BAMBOO MTE-450



hspail

リンク

2009/6/19(Fri) 08:45:51|NO.25838

私も Windows Vista + Intuos3(PTZ-631W) ですが、getkey では反応しませんでした。


#define WM_RBUTTONDOWN 0x0201 oncmd gosub *ON_WM_RBUTTONDOWN, WM_RBUTTONDOWN stop *ON_WM_RBUTTONDOWN dialog return
ただ、このようにすると右クリックを取得できました。
本格的なペンタブアプリケーションを作るならば、wintab32.dll を利用するとよいと思います。



loc

リンク

2009/6/19(Fri) 12:52:19|NO.25839

VISTA>コントロールパネル>ペンと入力デバイス
ペンのオプションという設定があるのですが
ペンボタンのチェックを2つともオンにする事で
右クリツクが反応するようになるようです



inovia

リンク

2009/6/19(Fri) 17:39:23|NO.25841

早朝No.25837で投降したスクリプトをVistaで実行してみたところ
26℃さんやhspailさんと同じくgetkeyでは反応しませんでした。

Vistaが原因?なのかもしれません。



loc

リンク

2009/6/19(Fri) 19:00:58|NO.25844

hspailさんのスクリプトは
定数を間違っているようですね



26℃

リンク

2009/6/19(Fri) 22:01:01|NO.25848

報告ありがとうございます、どうやら
ビスタ、HSP3、タブレットを使うとクリック判定に不具合があるようですね。

>locさん
初めてビスタを使った時に、この設定が分からず苦労しました。
チェックを2つともオンにしてますが、この問題とは関係ないようです。

wintab32.dll を利用してみます。



26℃

リンク

2009/6/20(Sat) 00:45:39|NO.25852

サイトThe Realm of Reveryで公開されている、タブレットのプログラムを使っていてきづきました
ttp://r-revery.hp.infoseek.co.jp/index2.html
ttp://r-revery.hp.infoseek.co.jp/hsp/pentab.html

#uselib "wintab32.dll"

#const TRUE 1

#func global WTInfoA "WTInfoA" int,int,var

#func global WTOpenA "WTOpenA" int,var,int
#const WTI_DEFSYSCTX 4

dim LogContext ,43
WTInfoA WTI_DEFSYSCTX,0,LogContext

WTOpenA hwnd,LogContext,TRUE

repeat
getkey k,2
if k:title "!":else:title""
wait 5
loop

inoviaさんのソースに加えてみまたのですが右クリックが機能しました。
動きましたが、なぜ動くか理解できてないのですが
#uselib "wintab32.dll"

#const TRUE 1

#func global WTInfoA "WTInfoA" int,int,var

#func global WTOpenA "WTOpenA" int,var,int
#const WTI_DEFSYSCTX 4

dim LogContext ,43
WTInfoA WTI_DEFSYSCTX,0,LogContext

WTOpenA hwnd,LogContext,TRUE

これはタブレットを初期化してるんでしょうか?



ONION software Copyright 1997-2023(c) All rights reserved.