Rubyでキーボードの値を取得(getkeyboardstate)

Question

＜環境＞
Ruby 1.9.3
Windows8

お世話になっています。

Rubyでキーボードの状態の取得を行いたいと思っています。
ほぼキー全体の状態を得たいのでgetkeyboardstateを使用したいと思い
以下のプログラムを作成しました。

    @getkeyboardstate = Win32API.new('user32', 'GetKeyboardState', 'i', 'i')
    @getkey = []
    @getkey.fill(0, 0..255) #256バイト分0で埋める
    p @getkeyboardstate.call(@getkey[0]) # =>0
    p @getkey # =>[0,0,0,0,0,0,0..

エラー自体は出ないのですが、４行目の
@getkeyboardstate.call(@getkey[0])　の返り値が０で(正常な場合は０以外の値が返るとの記述を見た)
且つ@getkeyも値の変化が全くない為、
恐らく正常に取得できていないのではないかと考えています。

＜試してみた事＞
①Win32API の送り値の数を変更。
⇒ArgumentError 1 of 4 のエラーがが出たので、４つで合っていると思われる。
②GetKey**boardState を GetKeyB**oardState にする
⇒そんなものはない、とエラーを返される
③@getkeyboardstate.call(@getkey[0])を@getkeyboardstate.call(@getkey)に
⇒タイプエラー(can't convert Array into String)
④Win32API.new('user32', 'GetKeyboardState', 'i', 'i')の『'』を『"』にする
⇒特に変化なし

そもそもdllの呼び出し方の書き方がおかしいのかと思い、別途GetKeyStateでも試してみました。

    @getkeystate = Win32API.new("user32", "GetKeyState", "i", "i")
    while true
      p @getkeystate.call(90) # =>0 か 1 か -127 か -128
    end

これは(恐らくですが)正常に取得できました。
『ｚ』キー(キーコード:90)を押したり離したりすると、値が変わります。

.
ここからどう手を付ければいいのかわからず、質問に至りました。
Rubyの GetKeyboardState でのキーボードの状態の取得方法、または
別途いい案がありましたら教えて頂けると嬉しいです。

尚、GetKeyStateをループしてゴリ押し、も出来るとは思いますが、なるべく処理を早くしたいため、
GetKeyboardStateのような一括で結果を返す送り値で行えればと思います。

以上、よろしくお願いいたします。

---

追記：2019/01/24 11:28
ＶＢ６で上記と同様と思われるプログラムを作成しました。
こちらは正常に動作します。(返り値に１が返る)

Private Declare Function GetKeyboardState Lib "user32" (pbKeyState As Byte) As Long

Private Sub Form_Activate()
    Dim state(255) As Byte
    Label1.Caption = GetKeyboardState(state(0)) 'GetKeyboardStateの返り値(1 固定)
    Label2.Caption = state(90) 'zキーを押した結果(0=>129=>1=>128=>0...)
End Sub

Comments

[dodox86]

「Win32 API」タグをつけると回答を得やすくなるはずのご質問です。GetKeyboardStateが使える状況は、アプリの形態に依存します。ウィンドウ(フォーム)ではなく、コンソールアプリでしょうか。

[torisan]

RPGツクールVxAceのスクリプトコマンドに記述しているので、ウィンドウアプリになると思います。

Answer 1

1.9.3環境が手元にないので動確できていませんが

@getkeyboardstate = Win32API.new('user32', 'GetKeyboardState', 'p', 'i')
@getkey = "\0" * 256
@getkeyboardstate.call(@getkey)
@getkey = @getkey.unpack('C*')

Comments

[torisan]

提示のプログラムを試した所、値が返ってきました、ありがとうございます！

Answer 2

WinAPI32 に詳しくなく、単なる思いつきなのですが、GetKeybordState の説明がされているサイト（例えば、ここ）を見ると、

BYTE key[256];
GetKeyboardState( key );

となっていて、引数が配列になっています。そこで、試しに
@getkeyboardstate.call(@getkey[0])
を
@getkeyboardstate.call(@getkey)
にして、引数を配列の先頭の要素にするのではなく、配列そのものにしたらどんなもんでしょうか？
——-
例えば、引数のバッファに書き込む関数を呼び出すには以下のようにします。

api = Win32API.new('foo.dll', 'foo', 'p', 'v')
buf = "\0" * 256
api.call(buf)

ポインタの配列を渡す場合は以下のようにします。

api = Win32API.new('foo.dll', 'foo', 'p', 'v')
args = ["\0" * 256, "\0" * 256, "\0" * 256]
api.call(args.pack("p3"))

Comments

[torisan]

質問文には特に変化なしと書きましたが、今行った所TypeErrorとなりました。
can't convert Array into Stringとあるので配列を送り値にする事自体不可能のようです。

[kts_h]

すみません、確認不足でした。代わりと言ってはなんですが、ruby のドキュメントでこんなのを見つけました。

詳しくは、回答の追記で。

[torisan]

追記に関しても試してみましたが、残念ながら特に変化はありませんでした。