過去の桐井戸端ＢＢＳ　（桐ver.８）
8867 フォーム上で行移動したい Synapse 2000/12/12-00:42
はじめまして
いつも参考にさせていただいております。
さっそく質問ですが、フォーム(一覧）上で行移動をさせるには、どのようにすればよいのでしょうか？
どなたか御教授下さい。よろしくお願いします。
8887 Re:フォーム上での行移動？ KH 2000/12/12-21:42
記事番号8867へのコメント
>さっそく質問ですが、フォーム(一覧）上で行移動をさせるには、
>どのようにすればよいのでしょうか？

一覧表フォームでの

　　　　表示中？訂正中？行挿入中？行追加中？
　　　　またはグループ移動？のこと

行移動だけでは解らないと思うのですが。
もっと違う事を聞きたいのでしょうか？
8888 Re:フォーム上での行移動？ 悲しげ 2000/12/12-22:03
記事番号8887へのコメント
これは、文字どおり一覧表（または伝票）wfmでの行移動のことだと思います。
で、おそらくはグループ項目も持たない、整列状態でもない、ごく単純な行移動のことだと思います。
以上の前提でコメントさせていただきますと、確かにこんな単純な行移動も、フォーム上からは出来ないんですね。
会話処理上でのメニュー上に（スラッシュでもファンクションでも）行移動処理が出て来ません。
そこで私は次のようなやり方でこれを実現させています。
wfm上には「↑」と「↓」の牡丹を設けています。
以下はその左クリックイベントのハンドラの記述です。
----------------------------------------------------------------------
-
手続き定義開始　b↑::マウス左クリック（長整数　&マウス位置[2]，長整数　&明細
番号,…
　行退避
　行削除　終了状態=&実行リターン
　&明細番号=&明細番号-1
　ジャンプ　行番号=&明細番号
　行挿入　[DATA]=""
　ジャンプ　行番号=-1
　行復旧　破棄=する,終了状態=&実行リターン
手続き定義終了

手続き定義開始　b↓::マウス左クリック（長整数　&マウス位置[2]，長整数　&明細
番号，…
　行退避
　行削除　終了状態=&実行リターン
　&明細番号=&明細番号+1
　ジャンプ　行番号=&明細番号
　行挿入　[DATA]=""
　ジャンプ　行番号=-1
　行復旧　破棄=する,終了状態=&実行リターン
手続き定義終了
----------------------------------------------------------------------
-

なお、フォーム終了時に、確か表整理を実行させていたと思います。
もちろん、もっとうまいやり方があるでしょうけど、ま、一例ということで。

これが整列状態での行移動と云うことなら、話は別になりますので、それはまた別な機会にでも。
8889 Re:フォーム上での行移動？ 悲しげ 2000/12/12-22:11
記事番号8888へのコメント
補足します。
↑牡丹の機能として　　実行条件　#行番号>1 .and .not #EOF
↓牡丹の機能として　　実行条件　#行番号<#総件数
としてあります。
こうしておくと、１行目だと↑牡丹が、最終行だと↓牡丹が使用不可表示となって、押せなくなります。(^^)v
8904 Re:フォーム上での行移動？ Synapse 2000/12/13-17:32
記事番号8889へのコメント
悲しげさんありがとうございました。
さっそく試してみようと思います。
それから.. 今度から質問する時は、もう少し詳しく書くようにします。（反省）
ＫＨさんすいませんでした。


戻る