powerbuilder - ボタンクリック時に読み込みダイアログを表示する方法

Question

ウィンドウのボタンを押したときに「読み込み中...」と表示する必要があります。どうすれば作れますか？ストリーミングだと、ドットが混ざったような感じで、もっといいですよね。

関数として「読み込み中...」という単語を含む.txtファイルを試してみましたが、FileOpenex()機能しません..

integer li_FileNum
string ls_Emp_Input
li_FileNum = FileOpen("C:\Users\Exactus\Desktop\New.txt", &
TextMode!)
FileReadEx(li_FileNum, ls_Emp_Input)

score 1 · Accepted Answer

グローバル変数:

integer  gi_max_dots=7;
string  gs_dots;

ウィンドウで定義済みtimer()のイベントを使用できます。これを開始したいときは、

timer(1); //This will trigger timer  after each second interval 
          //so try changing the loading text there.

timer()イベントでこのコードを使用するとうまくいくはずです：

if  gi_max_dots > len(gs_dots)  then 
    gs_dots=gs_dots+".";
else
    gs_dots="";
end if

ここでは、このステータスを示す静的テキストコントロールを想定しています。

st_1.text="Loading"+gs_dots;

タイマーイベントを停止する必要がある場合

Timer(0);
st_1.text="";

score 0 · Accepted Answer

Loading ... というテキストを含むポップアップウィンドウを作成します。ボタンを押すとウィンドウが開き、プロセスの最後に閉じます。

2 に答える 2