SET WINDOW TITLE

version 6.0 (Modified)

SET WINDOW TITLE (title{; window})

SET WINDOW TITLE コマンドはwindow に渡した参照番号のウィンドウのタイトルを、titleに渡したテキストに変更します (最大80文字)。

ウィンドウが存在しない場合、SET WINDOW TITLEは何も行いません。

window 引数を省略すると、SET WINDOW TITLEはカレントプロセスの最前面ウィンドウのタイトルを変更します。

Note: デザインモードで4Dはウィンドウタイトルを自動で変更します。例えばデータ入力時には“更新：テーブル”となります。ウィンドウタイトルを変更しても、4Dがそれを上書きしてしまいます。他方、アプリケーションモードでは4Dはウィンドウタイトルの変更を行いません。

フォームでデータ入力を行っている間、長い時間のかかる処理を行うためにボタンをクリックします (例えばプログラムでリレーとするレコードをブラウズするなど)。カレントウィンドウのタイトルを使用して進捗状況を知らせることができます:

      ` bAnalysis button Object Method
   Case of
      : (Form event=On Clicked)
            ` 現在のタイトルを保持
         $vsCurTitle:=Get window title
            ` 時間のかかる処理を開始
         FIRST RECORD([Invoice Line Items])
         For($vlRecord;1;Records in selection([Invoice Line Items]))
            DO SOMETHING
               ` 進捗状況を表示
            SET WINDOW TITLE("Processing Line Item #"+String($vlRecord))
         End for
            ` 元のウィンドウタイトルに戻す
         SET WINDOW TITLE($vsCurTitle)
   End case

Get window title.