如何中断一个在开始的FindFirst?

Question

选择一个路径开始查询，但时间太长，想中断，如何操作
就像Windows自己的“搜索”一个，在搜索的过程中停止
这是如何实现的？

Answer 1

FindNext之前判断我觉得不是很好，特别是文件比较多的情况时，每遍历一个文件都判断一次是否继续遍历的话，效率暂且不管他，操作者烦就已经是一定的事了。

Answer 2

只有多线程了，在此过程中CPU全速去干查找的活了，UI的响应很慢，用多线程也EASY啊

Answer 3

设置一个全局变量，循环查找时看这个变量是否为TRUE，否就退出查找。
设置一个“取消”按钮，当按钮被按下时将前面的变量设置为FALSE。
为了让该按钮能够相应用户的按键，要在循环查找中用Application.PostMessage；我一般把它写在FindNext之前。