 |
 |
共有8643人关注过本帖树形打印复制链接主题：进度条(可以在重算中途取消计算)（ylm原创） |
|---|
 喜爱易表 |
小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC | ||
  加好友  发短信
等级：天使 帖子：178 积分：0 威望：0 精华：0 注册：2006/8/11 11:09:00 |
进度条(可以在重算中途取消计算)（ylm原创）  Post By：2006/8/12 0:39:00 [只看该作者]
RSS2.0 | Xhtml无图版 | Xslt无图版
Copyright ©2002 - 2005 egrid2000.com Powered By Dvbbs Version 8.3.0
页面执行时间 0.02344 秒, 5 次数据查询 |
<br><a href=){kind=link}
![](http://www.egrid2000.com/dvbbs/UploadFile/non-cgi/egd/2003112995551191_1155314330.jpg><br>如果你有兴趣,也可以分析一下下面公式,自己定做一个有个性进度条窗口了:<br>参考公式:<p>重算全表按扭公式:<br>SetVariable("%表位置数%",1) And<br>SetVariable("%开始行数%",1) And<br>SetVariable("%字符数%",1) And <br>SetVariable("%总字符数%",0) And<br>SetVariable("%百分%",1)And<br>SetVariable("%总百分%",1)And<br>Loop("[%表位置数%] <= Grids",<br>"SetLabel(""标题@"",""正在重算第""+Text([%表位置数%])+""个表,请稍候…"") And <br>if(Int(Countfor([%表位置数%])/ 20) <= 1,<br>SetVariable(""%结束行数%"",2), <br>SetVariable(""%结束行数%"",Int(Countfor([%表位置数%])/20)+1))And <br>RecalcRow([%表位置数%],[%开始行数%],[%开始行数%]+[%结束行数%]) And<br>SetVariable(""%百分%"", [%字符数%] * 100 / 20)And <br>SetLabel(""表%"",TEXT([%百分%])+""%"") And<br>SetLabel(""总表%"", TEXT(Int([%百分%]/Grids)+Int([%总百分%]))+""%"") And <br>SetLabel(""表@"",Rept(""■"",[%字符数%])) and<br>SetLabel(""总表@"", Rept(""■"", Int([%字符数%]/Grids)+[%总字符数%]))And <br>IF([%字符数%] <= 19, SetVariable(""%开始行数%"",[%开始行数%]+[%结束行数%]) And<br>SetVariable(""%字符数%"",[%字符数%]+1) , <br>SetVariable(""%总字符数%"", 20/Grids*[%表位置数%])And<br>SetVariable(""%总百分%"", 100/Grids*[%表位置数%])And <br>SetVariable(""%开始行数%"",1) And SetVariable(""%字符数%"",1) And <br>SetVariable(""%表位置数%"",[%表位置数%]+1))")And<br>IF([%表位置数%]>=Grids+10,SetLabel("标题@"," 当前计算已停止!"), <br>SetLabel("总表%", TEXT([%总百分%])+"%")And<br>SetLabel("总表@", Rept("■",[%总字符数%]))And<br>SetLabel("标题@"," 重新计算完毕!") And <br>SetLabel("表@","") And <br>SetLabel("表%","")) And <br>SetVariable("%表位置数%",-1)<p><p><br>重算当前表按扭公式:<p>SetVariable("%表位置数%",1)And <br>SetLabel("总表@","")And<br>SetLabel("总表%","") And <br>SetLabel("标题@","正在重算"+GridName+"表,请稍候…")AND<br>SetVariable("%开始行数%",1) And
</div>
</td></tr></table>
<br /></td>
</tr>
<tr>
<td class=){kind=link}