首页 > 其他 > 详细

利用 StartLoadingStatus 和 FinishLoadingStatus 读取数据特别是大数据时增加渐隐渐显等待特效 - Ehlib学习(三)

时间:2015-02-14 16:09:43      阅读:359      评论:0      收藏:0      [点我收藏+]

代码很简单:

  DBGrideh.StartLoadingStatus(‘ Loading ... ‘);
  Sleep(500);  
  DBGrideh.FinishLoadingStatus;
  

 

做下变动:

  DBGrideh.StartLoadingStatus(‘ Loading ... ‘,1000);  //1000表示显示的速度
  Sleep(500);  
  DBGrideh.FinishLoadingStatus(1000);    //1000表示显示的速度,此处的单位不是毫秒  

 

上一段代码中发现的数值1000单位不是毫秒,原因见代码

  Steps := RenderDuration;  //上一段代码中的数值1000
  i := 1;    //起始数值1;
  Step := 1;    //步长1;
  while i < Steps do
  begin
    DrawAlphaBlend(i, Steps);
    RenDur := GetTickCount - t;
    if RenDur > 0
      then StepSize := Round(RenDur / Step)
      else StepSize := 1;
    if StepSize = 0 then
      StepSize := 1;
    i := i + StepSize;
    Inc(Step);
  end;

 

利用 StartLoadingStatus 和 FinishLoadingStatus 读取数据特别是大数据时增加渐隐渐显等待特效 - Ehlib学习(三)

原文:http://www.cnblogs.com/jupt/p/4291912.html

(0)
(0)
   
举报
评论 一句话评论(0
关于我们 - 联系我们 - 留言反馈 - 联系我们:wmxa8@hotmail.com
© 2014 bubuko.com 版权所有
打开技术之扣,分享程序人生!