| うにん様 尾形様 まさやん様
皆様たくさんのお返事ありがとうございます。 教えていただいたものを参考に試してみました。
------------------------------- ここから↓ 手続き定義開始 絞り込み() メソッド呼び出し @フォーム.更新モード設定( 0 ) 絞り込み [プレスNO.]{ = "A-1" } 絞り込み [作業日]{ = #DATE } ケース開始
ケース ( #総件数 < 1 ) メッセージボックス "無し","データ無いよ",・・・ 絞り込み解除 * 手続き終了 ケース その他 メソッド呼び出し @フォームの選択隠しボタン.実行() ケース終了 手続き定義終了 ---------------------------------------------- ここまで 教えていただいたもの上記に対して、
イベントを下記のように書いてみました。 はじめは教えていただいたものをそのまま書いてみましたが、 エラー?がでたため、色々さわってみました。
とりあえず下記
コマンドボタン は 2つ設置し、 1つは、機能名登録なし。 1つは、フォームの選択隠しボタン として 機能名-フォームの選択 機能パラメータ-"作業者入力フォームA-1.wfm"
----------------------------------------- 手続き定義開始 A1::マウス左クリック(長整数 &マウス位置[2],長整数 &明細番号,長整数 &フラグ,参照 長整数 &処理中止) 絞り込み [ラインNO.]="A-1" 絞り込み [作業日]=#DATE ケース開始 ケース (#総件数<1) メッセージボックス "結果","該当するデータがありません",アイコン=i,ボタン指定=1,制御文字展開=しない, 絞り込み解除 * ケース その他 メソッド呼び出し @フォームの選択隠しボタン.実行() ケース終了 手続き定義終了 -------------------------------------------------
手続き定義開始 絞り込み() と メソッド呼び出し @フォーム.更新モード設定( 0 ) は書いていませんが、 動きとしては、思っているものになっています。
ただ、手続き定義開始 絞り込み() と メソッド呼び出し @フォーム.更新モード設定( 0 ) ←を書かなくてもOKなのか?が わかりません;;
”動き” だけをみると、自分が思っているようになっていますが、大丈夫でしょうか・・・。
|