カーソルをキーボードからの変更するには?

解決


宮古  2005-08-11 21:26:42  No: 17014  IP: 192.*.*.*

KeyDownイベントのないコントロール上で、特定のキーを押した場合に
カーソルを変更させたいのですが、なかなかうまくいきません。
例えば、Form1にPaintBox1を置いて、Form1のOnKeyDownに
if key = VK_SPACE then Form1.Cursor := crHandPoint;
OnKeyUpに
Form1.Cursor := crDefault;
とした場合、Form1では即座にカーソルは反映されるのですが、PaintBox1では
一度クリックしたりカーソルを動かさなければ変更が反映されません。
ローカルフックでキーボードイベントを捕まえても同様です。

どなたか解決策をご存じありませんか?
こちらの環境はdel6+win2000です。

編集 削除
メラトニン  2005-08-11 21:46:28  No: 17015  IP: 192.*.*.*

これDelphiMLで出てましたね。
http://leed.issp.u-tokyo.ac.jp/~takeuchi/delphi/article/013/013641.html
http://leed.issp.u-tokyo.ac.jp/~takeuchi/delphi/article/013/013644.html
http://leed.issp.u-tokyo.ac.jp/~takeuchi/delphi/article/013/013662.html
http://leed.issp.u-tokyo.ac.jp/~takeuchi/delphi/article/013/013702.html

編集 削除
宮古  2005-08-11 22:59:11  No: 17016  IP: 192.*.*.*

MLも検索したんですが、ありましたか……。
ともあれ感謝。
今度からはもう少し粘ってみます。

編集 削除