说明.txt

来自「该例子演示了两种方法来遍历文件.采用Delphi编写」· 文本 代码 · 共 28 行

TXT
28
字号
演示两种方法来遍历文件

两个函数:
EnumFileInQueue     队列遍历
EnumFileInRecursion 递归遍历

版本:v1.0
时间:2006.8.20

作者:cenjoy 温校宏
邮箱:cenjoyer@163.com

说明:
看见很多遍历文件的文章都是用递归实现,可是当子目录非常非常多时,就很容易堆栈溢出.
而使用队列的方法就不会出现这种问题.因为发现网上这种方法比较少见,所以把它贡献出来.

使用队列这种方法不是我想出来的,我从书上看到的.原书用的是TStringList来实现队列,我直接使用TQueue.我是第一次使用这个东西.另外用到了StrNew函数,隐约好像有些问题,不过一时间没有察觉.

已知未解决问题:
1.如何统计遍历的时间和搜索结果
(如何知道用CreateThread创建的线程何时结束)

2.你来说吧~~~~

如果你能解决这些问题,希望你能发一份给我~a~
非常欢迎来跟我讨论相关Delphi的问题!!!!
发我Email:cenjoyer@163.com,也可以加我QQ:48932987.
不过这段时间很上Q.9月份开学后就能常上了.

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?