单击按钮时如何显示加载对话框

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) 

Answer 1

创建包含一个弹出窗口文本加载...当你按下按钮打开窗口，并在过程结束时关闭。

Answer 2

全局变量：

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="";