파일 생성 시간 확인하여 오래된 파일 삭제하는 루틴 작성한 부분에서 참고할 만한 내용 입니다.
File 뿐이아라 폴더도 FindFirst 로 가능하군요.
참고하세욥~

void __fastcall TForm1::Button2Click(TObject *Sender)
{

    AnsiString sSrcPath = "c:\\Temp";
    TSearchRec sr;
    TDateTime  tmFileDateTime;

    // 디렉토리 존재하는지 확인
    if(DirectoryExists(sSrcPath)) {

        if(FindFirst(sSrcPath, faAnyFile, sr) == 0){
            do{
                // 디렉토리.--------------------------
                if((sr.Attr & faDirectory) == faDirectory){

                    FILETIME TempTime;
                    SYSTEMTIME SystemTime;

                    Memo1->Lines->Add("폴더 위치 : " + sr.Name);

                    FileTimeToLocalFileTime( &sr.FindData.ftLastWriteTime, &TempTime );
                    FileTimeToSystemTime( &TempTime, &SystemTime );

                    tmFileDateTime = SystemTimeToDateTime(SystemTime);
                    Memo1->Lines->Add("1. Write 시간 : " + sr.Name + ":" + tmFileDateTime.DateTimeString());


                    FileTimeToLocalFileTime( &sr.FindData.ftLastAccessTime, &TempTime );
                    FileTimeToSystemTime( &TempTime, &SystemTime );

                    tmFileDateTime = SystemTimeToDateTime(SystemTime);
                    Memo1->Lines->Add("2. Access 시간 : " + sr.Name + ":" + tmFileDateTime.DateTimeString());


                    FileTimeToLocalFileTime( &sr.FindData.ftCreationTime, &TempTime );
                    FileTimeToSystemTime( &TempTime, &SystemTime );

                    tmFileDateTime = SystemTimeToDateTime(SystemTime);
                    Memo1->Lines->Add("3. 생성 시간 : " + sr.Name + ":" + tmFileDateTime.DateTimeString());

                }
            }while(FindNext(sr)==0);
        }
    }

    FindClose(sr);

}

왕초보 님이 쓰신 글 :
: Folder의 수정 시간 말고 처음 생성 된 시간을 알려고 하면 어떻게 해야 하나요?
:
: 윈도우 탐색기에 수정한 날짜 말고 만든날짜를 의미 하는 것입니다.
:
: FileAge로 해보니 폴더는 -1만 나오네요 ;