実行中に現在のカーソルの種類を取得する必要があるアプリケーションを Perl で作成しています。
マウスを定期的にチェックするタイマーを作成する必要があり、マウスが特定のタイプの場合は一時停止するか、何か他のことを行います。カーソルは、必ずしも TK/GTK アプリではなく、別のプログラムで実行されている可能性があります。タイマーの部分は問題ありませんが、現在のカーソルの種類を取得できるものが見つかりませんでした。
誰もこれを行う方法を知っていますか?
実行中に現在のカーソルの種類を取得する必要があるアプリケーションを Perl で作成しています。
マウスを定期的にチェックするタイマーを作成する必要があり、マウスが特定のタイプの場合は一時停止するか、何か他のことを行います。カーソルは、必ずしも TK/GTK アプリではなく、別のプログラムで実行されている可能性があります。タイマーの部分は問題ありませんが、現在のカーソルの種類を取得できるものが見つかりませんでした。
誰もこれを行う方法を知っていますか?
少なくとも、これを実行するオペレーティング システムを指定する必要があります。
マウス カーソルは Perl ではなく OS によって管理されるため、OS からその情報を取得する方法を見つける必要があります。
アプリケーションが Windows 上にある場合は、 Win32::GUIを調べ始めます。
お役に立てれば。
編集:
Windows を使用しているため、その情報を取得するには Windows API 関数を調べる必要があります。 .aspx
次に、Perl からその関数にアクセスする方法を見つけます - Win32::APIはそれを行うための便利なモジュールかもしれません