如何得到我的程序在忙时所花的时间？

Question

我编写了一个查找文件夹的小程序（用递归），但有时查找范围太大时会有很长时间无响应，所以我想加装一进度条指示用户还要等多长时间。但如何行到忙时所花的时间呢？
即：
    ProgressBar1.max:=        //不知道将何值赋给进度条
    ProgressBar1.position:=          //不知道将何值赋给进度条
又比如在复制时或安装程序时，进度条是怎么统计出还要等多长时间的？
谢谢！

Answer 1

你不知道文件的具体有多少，他们多大是不好统计时间和进度条的，安装和复制的时候这些信息都是确定的，所以很好统计。你可以做成win启动时候的那种进度条，比如现在你在win下搜索文件也是那种进度条，只是告诉用户软件正在处理某样东西而已。