0

VFP9 には、定義済みの一連の操作を実行してから終了するアプリケーションがあります。実行中に、進行状況をユーザーに報告する必要があります (「トランザクション ファイルの読み取り中」、「123 レコードの読み取り中」、「ファイル abc.txt が見つかりません」など)。

VFP 開発環境でプログラムを実行すると、問題なく動作します。プログラムを.EXEとしてスタンドアロンで使用するために、VBコンソールウィンドウに相当するものを作成し、メッセージを表示して、ウィンドウがいっぱいになったらスクロールアップして画面の下部に書き込みます。

私は VFP でウィンドウを使用したことがないので (私のプログラムは常に単なるバッチ プロセスであるため)、何をすべきかわかりません。

このサンプルコードを教えてください。または、どこにあるか教えてください。

4

1 に答える 1

0

私が通常この種の要件に対処する方法は、フォームを作成し、その上に編集ボックスをドロップし、フォームに合わせて編集ボックスのサイズを変更することです。ユーザーがフォームのサイズを変更できる場合は、編集ボックスのアンカーを設定して、フォームのサイズを維持します。

次に、情報を追加する必要があるたびに、編集ボックスの値に追加します。編集ボックスの SelStart が現在のテキストの最後に設定されていることを確認することで、リストの下部を表示し続けることができます。通常、次のようなコードを含むカスタム メソッドを使用して、これらすべてを行います。

* Assuming this is a method of the editbox:
LPARAMETERS cNewMessage

This.Value = This.Value + CHR(13) + CHR(10) + m.cNewMessage
This.SelStart = LEN(This.Value)

タマル

于 2013-04-09T21:17:57.373 に答える