Q&A

  • 특정 파일에 해당하는 정보 (파일크기 등)를 알아내는 방법좀??

안녕하세요 .

다름이 아니라 파일크기 알아내는 방법을 찾아 보았는데 대게 파일을 경로를 정해주던지

아니면 특정파일을 다이얼로그를 이용해서 파일크기를 알아보는 소스들이 주류로던군요

제가 알고 싶은것은 특정파일에 위치를 않정해줘도 제가 원하는 파일을 찾아서 경로 및

파일크기를 알아보고 싶습니다. 많은 지도 부탁드립
1  COMMENTS
  • Profile
    마이크로김 2007.06.29 19:02

    function Get_FileSize (asFName: string): integer;
    var
            hFile: THandle;
    begin
            result := -1;

            if not FileExists (asFName) then
                    exit;

                    hFile := FileOpen (asFName, fmOpenRead);
            try
                    result := GetFileSize (hFile, nil);
            finally
                    FileClose (hFile);
            end;

            if result = 0 then
                    result := -1;
    end;