Delphiで特定のイベントを引き起こしたデバイスを特定する方法を教えてください。

Question

どの入力デバイスが特定のGUIイベントをトリガーしたかを簡単に知る方法があるのでしょうか？

たとえば、TButton.OnClickイベントが発生します。ユーザーがキーボードプレス（ショートカット、デフォルトボタンの場合はEnterキー、フォーカスのあるボタンの場合はspaceキーなど）を使用してトリガーしましたか、それともマウスのクリックでトリガーされましたか？簡単な方法はありますか？

私が知りたいのは、ユーザーがマウスを使ってキーボードでも行える操作を開始したときに、キーボードの使用方法のヒントを実装できるということです。ショップフロアにある私たちのシステムはかなり埃が多い/汚れた環境にあり、マウスはあまりうまく機能しません。また、多くの場合、単にマウスを使用する余地はあまりありません。 （いいえ、テンキーパッドのないキーボードは解決策ではありません）。

しかし、私たちのアプリはWindowsで動作するので、ユーザーは自宅のように簡単にプログラムを使用する傾向があります。マウス。特にそれには何も問題はありませんが、入力ワークフローをキーボードフレンドリーに最適化するために努めてきました。それは、マウスをつかむことなく彼らがやっていることをやり遂げる方法があることをユーザに示すために、インパクトの少ない方法があれば、いいだろう。

Answer 1

OnClickの中には通知方法がありません。しかし、マウスをロールオーバーしたときに起動するコントロールにイベントをアタッチすることもできます。これはおそらく、何をしようとしているのかにより適しています。 OnMouseEnterとOnMouseLeaveイベントを見てください。また、マウスをクリックしたときに特定のものが実際に発生するようにしたい場合は、OnMouseUpに添付することができます。