SET CURSOR

4D v20 R7

SET CURSOR

SET CURSOR コマンドはマウスカーソルを、cursor 引数に渡したID番号のシステムカーソルへと変更します。

このコマンドはOn Mouse Move Form event codeのコンテキスト内で呼び出されなければなりません。

マウスカーソルは標準の矢印に戻すためには、引数を渡さずにコマンドを呼び出します。

以下は、引数 cursor に渡すことのできる基本カーソルです。

注: カーソルが使用可能状況とその見た目はOSによって変化する場合があります。

マウスがフォーム内の変数エリア上に来た際に、カーソルをに表示させたい場合を考えます。この場合、変数のオブジェクトメソッド内に、以下の様に記述します:

 If(Form event code=On Mouse Move)

    SET CURSOR(9019)

 End if