Q&A

  • 폴더 내의 모든 화일과 서브폴더 목록 가져오기
그러니까... 특정 폴더 내의 모든 서브폴더와 파일들의 목록을 가져와야 합니다.
그런데 제가 아는 선엔선 별 다른 방법이 없네요.
여기 다 검색을 해 봐도 없구요...
그러나 분명 방법을 알고 계시는 분이 계실거라고 생각합니다.
고수님들 도와주세요... ^^
2  COMMENTS
  • Profile
    sky 2003.04.15 03:30
    피씨의 특정 폴더를 검색하시는걸 말씀하시는건가? ^^
    그렇다면..
    ===============================================================
    var
        i : integer;
        sr : TSearchrec;
    ===============================================================
        i := FindFirst('C:Down*.*', FaAnyfile, sr);

        While i = 0 do
        begin
            if sr.attr = 16 then
                showmessage('디렉토리 : ' + sr.Name)
            else
                showmessage('파일 : ' + sr.Name)
          
            i := FindNext(sr);
        end;

        FindClose(sr);

    ===============================================================
  • Profile
    야단났네~* 2003.04.16 17:44
    감사합니다.
    바로 이거네요.