BCB怎么实现对文件进行Ctrl+F的功能

BCB如何实现对文件进行Ctrl+F的功能
如题。。之前发了一个帖子，全部都在讨论遍历文件夹，
我很无奈，光遍历，没有根据关键字搜索这就不是Ctrl+F的功能了。

[解决办法]
遍历文件夹的同时，就可以对文件名进行匹配了，如用AnsiString的pos方法，就可以判断。