请教：如果用delphi编程序去批量修改文件名？

假设有一个A目录，这个目录里面有很多文件，它们的文件名都有一个特性，全部包含一个共有的字符串（假设是“aaa.bbb”）

请问，如何编程，使得每次运行这个程序，都将这个目录里面的含有“aaa.bbb”字符串的文件名修改成没有“aaa.bbb”，并且在这个程序里面显示这个A目录的所有文件，类似资源管理器。