過去の桐井戸端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
手続き定義終了

戻る