| ETさん、こんにちは。
ダブルクリックを検出して、グループ値訂正モードにします。
・下の例のダブルクリックを検出するイベントは、うにんさんと悲しげさんの作です。
出典:http://www.fuku3.com/~habata/kbbs/kakov8/18426.htm
ダブルクリックを検出するには、
「フォーカス喪失」と「マウス左クリック」のイベントを組み合わせるか、
「フォーカス喪失」と「マウス左ダウン」を使います。(下例はマウス左ダウン)
・複数のグループオブジェクトをファミリにまとめます。
設定の仕方が通常のイベントと異なるので、必ずヘルプの解説を読んでください。
桐のメニューバー→ヘルプ→トピックの検索→一括処理&イベント処理
→一括処理&イベントリファレンス(IEが表示します)
→入門→イベント処理→ファミリを使用する
・ダブルクリックの間隔をもう少し長めにとりたいとき
たとえば下の行の 3 を 5 にすると、0.3秒未満の間隔が、0.5秒未満になり、
クリックをゆっくりできるようになります。
if( #日時値-&click<i"0:0:0.3" ・・略
**------------
名札 メイン
var 日時{ &click=#日時値 } ,\
文字列{ &focus }
*
手続き定義開始 ファミリ_1::フォーカス喪失(文字列 &取得オブジェクト名)
&focus = ""
手続き定義終了
手続き定義開始 ファミリ_1::マウス左ダウン( ・・略
if( #日時値-&click<i"0:0:0.3" .and &this=&focus )
&click = d"2000-1-1 0:0:0" /* トリプルクリック対策 */
method @フォーム.更新モード設定( 0 ) /* 表示(確定) */
method @フォーム.更新モード設定( 34 ) /* グループ値訂正 */
method &this.フォーカス設定() /* この行を削除しないでください。 */
else
&click = #日時値 ,\
&focus = &this
end
手続き定義終了
**------------
アックン(=^・^=)
|