C++ Builder XE扫描读取文件夹内所有子文件夹路径

//读取文件夹中所有子文件夹
  String Dir=RzButtonEdit1->EditText;
  TSearchRec   sr;
  TStringList *Flist =new TStringList;
  Flist->Clear();
  if(FindFirst(Dir+"\\*.*",faDirectory,sr)   ==   0)
  {
      //Oldlist = RzListView1->Items->Count;
      do
      {
         if( !sr.Name.Pos(".")  )  //sr.Name!="." && sr.Name!=".."
         {
            Flist->Append(Dir+"\\"+sr.Name);
         }
      } while(FindNext(sr) == 0);
      FindClose(sr);
  }

标签：Name,TStringList,sr,Builder,C++,Flist,文件夹,Dir
来源： https://blog.csdn.net/lzksword/article/details/120885888