過去の桐井戸端BBS (桐ver.8)
2622 編集文字列変更イベントで絞り込み 森藤 1999/9/8-22:38
いつも拝見させてもらっております。
桐8のイベント処理についてご教授願います。
伝票形式の入着処理用フォームで[型名]を入力するのに
"元帳.tbl"の[型名]を表引きで入力しています。
比較項目,検索項目,値項目ともに[型名]です。
似たような型名が多いので[型名]にイベント処理を書いて入力された文字で
絞り込まれるようにしました。

名札 メイン
変数宣言 文字列{&選択文字列}
表 "元帳.TBL",表番号=10,索引名="型名順"


手続き定義開始 t型名::編集文字列変更()
編集表 10
絞り込み解除 *
メソッド呼び出し @t型名.編集文字列取得 (&選択文字列)
絞り込み [型名]_&選択文字列,文字比較方法=自動,部分一致検索=含む
手続き定義終了

最初はうまく動作するのですが,次行の[型名]に移動したとき何も入力しないで
表引きボタンを押すと前行で表引きされた型名で絞り込まれた状態になります。
これを[型名]すべてから検索できる状態にしたいのです。
もちろんなにか入力すれば問題なく動作するのですが,
何か文字を入れてバックスペースキーを押して表引きボタンを押すと
可能ではあるのですが。
2655 Re: いかすぱげてぃ 1999/9/11-13:30
記事番号2622へのコメント
森藤さんこんにちわ。

>最初はうまく動作するのですが,次行の[型名]に移動したとき何も入力しないで
>表引きボタンを押すと前行で表引きされた型名で絞り込まれた状態になります。
>これを[型名]すべてから検索できる状態にしたいのです。
>もちろんなにか入力すれば問題なく動作するのですが,
>何か文字を入れてバックスペースキーを押して表引きボタンを押すと
>可能ではあるのですが。

行訂正終了イベントと行挿入終了イベントで

編集表 10
解除  *

としてもいいでしょうが、単純なのは「レコード移動」イベントに
同様な処理を書いてみてください。たぶん、それで大丈夫だと思うのですが…
2660 Re: 森藤 1999/9/11-23:47
記事番号2655へのコメント
いかすぱげてぃさんご教授ありがとうございました

レコード移動,行挿入開始,行訂正開始,行挿入終了,行訂正終了の
いずれのイベントでもうまくいきました。
結果,挿入でも訂正でも動作するレコード移動イベントに

編集表 10
絞り込み解除 *

を書きました。
ひとつのイベントの中ですべて処理しようとしていたため
壁に突き当たってしまったのですね。勉強になりました。
ただこの場合,開始イベントと終了イベントどちらが正解なのでしょう?

イベント処理ってなかなか面白くもあり難しくもありですね。

戻る