| どうも、こんにちは
あんまり、スマートでないけど 困った時のタイマー逃避で
編集文字列変更イベント内から タイマーイベントを起動してはどうでしょう
手続き定義開始 t検索項目::編集文字列変更() 代入 &STR = "表示モード" オブジェクト操作 @フォーム.タイマー2="1" オブジェクト操作 @フォーム.タイマー値2="0.01" 手続き定義終了
手続き定義開始 フォーム::タイマー2() オブジェクト操作 @フォーム.タイマー2="0" オブジェクト操作 @フォーム.タイマー値2="0.00" ケース開始 ケース (&STR="表示モード") 代入 &STR = "" メソッド呼び出し @フォーム.更新モード設定(0) 手続き終了 ケース終了 手続き定義終了
|