| 過去の桐井戸端ＢＢＳ （桐ver.９） |
| 17959 | メイン&サブフォームでサブフォームへ移動してＥＳＣを押してもメインのデータが残ってしまう | 守田寿一 | 2002/11/17-00:12 |
| メインフォームで入力し、サブフォームへ移動した時点で、 [ESC]を押した場合の処理ですが、 サブフォームはデータが削除されますがメインは残ってしまいます。 どうすればメインを削除することができるでしょうか？ よろしくご指導ください。 | |||
| 17961 | Re:メインサブフォーム | 悲しげ | 2002/11/17-01:03 |
| 記事番号17959へのコメント どもっ、守田寿一さん #17958 >メインのコマンドボタンはマウス左クリックのイベントを定義して そうですね、「マウス左クリック」イベントからもできますし、 コマンドボタンの中の「手続き実行」からもkevの手続き定義の 処理を実行させることができます。 #17958 >メインフォームで入力し、サブフォームへ移動した時点で、 >[ESC]を押した場合の処理ですが、 >サブフォームはデータが削除されますが >メインは残ってしまいます。 どうして、[ESC]を押した場合にサブフォームのデータが削除されるのかは不明ですが、 それはさておき、メイン&サブフォームにおいては、一般的に云って、サブのレコードを全削除しても メインのレコードは残存したままだと思います （その逆なら「参照整合性」の設定如何では連動削除可能ですが）。 そのため、私は類似のことを、次のような結構まだるっこしい 記述でやっています。(^^;) if(&仮想キーコード=27) /*[Esc]キー*/ &処理中止=1 確認 "伝票入力を終了しますわ",&確認 if(&確認=1) 編集表 "メイン表.tbl" ジャンプ 行番号=1 繰り返し(.not #EOF) 編集表 "サブ表.tbl" &件数=#総件数 編集表 "メイン表.tbl" if(&件数<1) 確認 "明細部が空の伝票があるのでこれを削除します。" 行削除 終了状態=&終了 /*行削除すると自動的に次レコードにジャンプしている*/ else ジャンプ 行番号=+1 end 繰り返し終了 method @b終了.実行() end else if(&仮想キーコード=33) /*[Up]キー*/ ・・・・ | |||