안녕하십니까.
정성훈입니다.

VCL함수에도 C함수에 있던 것과 같은 함수가 있습니다.
F1도움말을 참고하시면 쉽게 사용할 수 있구요.

아래의 코드는 제가만든 샘플 코드입니다.
참고하세요.
주의: 꼭 테스트해보시고 사용하세요.

//------------------------------------------------------------------------
// 검색 파일: 실행파일이 있는 위치아래 log폴더에 있는 *.log파일들
// 삭제 조건: 현재 날짜 기준 30일 이전 파일들.
//------------------------------------------------------------------------

    AnsiString srPath = ExtractFileDir(Application->ExeName) + "\\log\\";
    TSearchRec sr;

    if(FindFirst(srPath + "*.log", faArchive, sr) == 0)
    {
        do{
            if(CompareDate(FileDateToDateTime(sr.Time), Now()-30) == LessThanValue)
            {
                DeleteFile(sr.Name);
            }
        }while(FindNext(sr) == 0);
    }
    FindClose(sr);
//------------------------------------------------------------------------

도움이 되셨기를 바랍니다.

작은 생각이 세상을 바꾼다 - 정성훈.해미 -
//------------------------------------------------------------------------


꿈꾸는빛.영준 님이 쓰신 글 :
: 지정된 폴더 아래에 있는 파일을 전부 검색해서 날짜를 확인 한다음에 설정한 날짜이전 이면
: 그 파일을 지울려고 합니다.
:
: 폴더 아래 파일이 어떤것들이 있는지 알려면 어떻게 해야 하나요?
:
: 그리고 폴더 아래 파일을 하나씩 선택해서 날짜는 어떻게 확인 하나요? ㅎㅎ
:
: