HSPTV!掲示板

input あ,100,20

repeat 128
	title "" + mousew
	await 16
loop

objenable 0,0


repeat
	title "" + mousew
	await 16
loop
*a

とりあえず、このプログラムを実行させてホイールをグリグリしていてください
途中でinputがobjenableで無効化されたあと、ホイールの回転を認識しなくなります
これはバグでしょうか？
途中でダイアログを挟むとホイールの回転は認識されます

バグなら修正をよろしくお願いします

尚、管理人様には報告しました
がしかし私以外の環境で再現性があるかわからないので、
こちらの掲示板に書き込ませて頂きました

あ
*a
は不要ですね
最初buttonがある状態から探してinputが原因ということに気付いたので、
消し忘れていました

Win7 64bit環境で試してみました。

確かに途中で認識しなくなってますね。

バグかなぁ？

私のWindows7 64bitでもそうなりました。
なにかオブジェクトをつくって、それにフォーカスするといいみたいですね。

さてはバグなのか…

私はVista 32bit,7 64bitで確認しました
両方ともHSP3.3です

フォーカスが入力ボックスにあって、ウィンドウ本体にフォーカスがなくなったのが原因かもしれません。
次のようにしてフォーカスを戻すと反応するようになります。

#uselib "user32.dll"

#func SetFocus "SetFocus" int

input あ,100,20

repeat 128
	title "" + mousew
	await 16
loop

objenable 0,0
SetFocus hwnd


repeat
	title "" + mousew
	await 16
loop
*a

読み返してみて解説が不足だと思いましたので、追加で解説させて頂きます。

#uselib "user32.dll"

というのは「user32.dllを使うよ」という宣言です。
dllの中には関数が入っていますので、その中からSetFocus関数を

#func SetFocus "SetFocus" int

で利用可能にしています。#funcの詳しい書式についてはF1で調べるとよいでしょう。 このuser32.dllというのはWindowsにもともと入っていますので、心置きなく使えます。

このSetFocus関数というのは、詳しくは調べて頂きたいですが、ウィンドウにフォーカスを移す関数です。第一引数のhwndというのは簡単にいうと現在のHSPのウィンドウを示すものですので、SetFocusにこれを教えることでHSPのウィンドウをアクティブにしてもらっています。

SetFocusを入れる位置は、じつはobjenableの直前でも直後でも構いません。原因はHSPのウィンドウそのものではなく中の入力ボックスにフォーカスがあたっていたことですので、フォーカスがHSPのウィンドウ本体に戻ってさえいればいいからです。

testさんありがとうございます
ホイールが使えないのはいま作ってるプログラムでは致命的なので、
解決方法を提示して下さってありがとうございます