[問題]要如何找出目錄夾下面的子資料夾

發文回覆瀏覽次數：896

推到 Plurk!

推到 Facebook!

[問題]要如何找出目錄夾下面的子資料夾

尚未結案

plihui
初階會員

發表：88
回覆：96
積分：41
註冊：2003-07-03

發送簡訊給我

#1 引用回覆回覆

發表時間：2004-07-02 00:06:45

IP:218.168.xxx.xxx 未訂閱

請問諸位前輩我現在遇到一個問題要如何知道一個目錄夾底下有幾個子資料夾並且將這些資料夾中的檔案作delete的動作目前我可以處理目錄夾名稱(我自行命名1~N)，但是無法處理未知目錄夾數目和目錄夾名稱非數字名稱請問大大該如何處理和解決

gemi0305
版主

發表：81
回覆：564
積分：629
註冊：2003-05-11

發送簡訊給我

#2 引用回覆回覆

發表時間：2004-07-02 00:28:43

IP:218.168.xxx.xxx 未訂閱

給你一個小工具~ 顯示目錄下的子目錄名稱~

void __fastcall TForm1::Button1Click(TObject *Sender)
{      AnsiString dir = "C:\\*.*";
  WIN32_FIND_DATA Data;
  HANDLE File = FindFirstFile(dir.c_str(), &Data );
  if(File != INVALID_HANDLE_VALUE)
  {
     Memo1->Clear();         do
     {
       if((Data.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY)
           &&(String(Data.cFileName)!="..")
           &&(String(Data.cFileName)!="."))
           Memo1->Lines->Add(Data.cFileName);
     }while(FindNextFile(File, &Data));         FindClose(File);
  }
}

國泰平安

系統時間：2024-05-14 16:01:11

聯絡我們 | Delphi K.Top討論版

本站聲明

1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！