過去の桐井戸端BBS (桐ver.8) |
2295 | メイン・サブフォームにおいてイベント処理について | su | 1999/7/28-18:20 |
桐V8を使用しています。 一覧表形式のメインフォームを作り、そのフッタに一覧表形式のサブフォームを 作っています。 メインフォームの最終オブジェクト("t入金日付")でリターンをしたら、 サブフォーム("サブフォーム_19")の入力したいオブジェクト("サブ") にカーソルを訂正モードで移したいのです。 下記のイベントを実行すると、すでに入力済みのレコードに関してはよいのです が、新規にレコードを追加していくとサブフォームのレコードが追加されず、 行挿入をしなければなりません。 オブジェクト("サブ")が未定義であるならば、行挿入をして、 オブジェクト("サブ")にカーソルを移動する記述を教えていただきたいのです。 まだ、イベント処理に関してはちんぷんかんぷんの初心者です。よろしくお願いします。 手続き定義開始 フォーム::キーダウン(長整数 &仮想キーコード,長整数 &スキャン コード,長整数 &フラグ,参照 長整数 &処理中止) if(&仮想キーコード=13) 変数宣言 文字列{&focus,&sub} メソッド呼び出し @フォーム.フォーカスオブジェクト取得( &focus ) if(&focus="t入金日付") メソッド呼び出し @サブフォーム_19.@サブ.フォーカス設定() &処理中止=1 end end 手続き定義終了 |