Question

delphi中 如何统计有多少文件名是相同的,然后输出相同文件名的数量（有几份是相同的就行，不用管内容）

这个程序怎么写代码

Answer 1

你可以这么做：用递归方法把指定路径下的文件全部存放到一个TStringList中，然后调用stringlist.sort方法排序，再遍历每一项内容，判断当前项和下一项内容是否相同，相同则记录下文件名，数量加一。查找文件，你可以在delphi的帮助中查找findfirst，有一个例子。关于递归，还是自己查一下资料吧。

Answer 2

直接用电脑搜索文件名就都出来了。