搜索指定文件夹（包括子文件夹）里的TXT文档？解决方案

搜索指定文件夹（包括子文件夹）里的TXT文档？
想问下大侠们，有没有什么方法，可以搜索指定文件夹（包括子文件夹）里的TXT文档？要是能将找到的TXT挡的文件路径保存下来就更好了！！谢谢了！~~
不知道这种方法指定的文件夹行不：
AnsiString Dir;
SelectDirectory (AnsiString("选定文件夹？","",Dir));
if (Dir!="")
ShowMessage(Dir);
Memo1->Lines->Text="Dir";







[解决办法]

C/C++ code

void __fastcall TForm1::Button1Click(TObject *Sender){   Memo1->Lines->Clear();  SelectDirectory(AnsiString("Select a Folder"),"",dir);  Memo1->Lines->Add(dir);//这个模块用来选择文件夹；}//---------------------------------------int TForm1::Add(String Path){ TSearchRec F;  int fr=0;  if(FindFirst(Path+"\\*.*",faAnyFile,F)==0)  {      do      {          if(F.Attr==faDirectory&&(F.Name!="."&&F.Name!=".."))          {             Add(Path+"\\"+F.Name);          }          else             Memo1->Lines->Add(Path+"\\"+F.Name);          fr=FindNext(F);      }while(fr==0);      FindClose(F);  }}void __fastcall TForm1::Button2Click(TObject *Sender){    //dir = "E:\\cbTest\\data";    Add(dir);}