DELPHI在枚举文件夹下文件所有的文件(包含文件夹里面的文件)如何用进度条显示

DELPHI在枚举文件夹下文件所有的文件(包含文件夹里面的文件)如何用进度条显示？

如果不包括子文件夹就可以，你增加一个FileListBox控件，把控件的Mask属性设成 path * fileext然后就可以统计出该路径下指定后缀名的文件的个数 FileListBox1.Items.Count，这样知道了文件个数，再加一个ProgressBar进度条，把ProgressBar.max:=FileListBox1.Items.Count，循环前ProgressBar1.Position:=0 ，在循环内增加这个值就行了。 如果你的版本是2010的话，也可以用下面的方法，