Q&A

  • text파일 size구하기
text파일로 된 파일의 크기는 어떻게 구하나요 ?

도움말에서 fileSize함수는 텍스트 파일의 크기를 못구한다고 하는데....

실제로도 무조건 0으로 나옵니다.

1  COMMENTS
  • Profile
    최용일 2000.03.11 01:54
    다음과 같이 하시면 구하실수 있습니다. (uses절에 SysUtils를 추가)

    function GetFileSize(Filename: string): Integer;

    var

    SearchRec: TSearchRec;

    begin

    Result := -1;

    if FindFirst('c:Command.Com', faAnyFile, SearchRec) = 0 then

    Result := SearchRec.Size;

    FindClose(SearchRec);

    end;



    cell wrote:

    > text파일로 된 파일의 크기는 어떻게 구하나요 ?

    > 도움말에서 fileSize함수는 텍스트 파일의 크기를 못구한다고 하는데....

    > 실제로도 무조건 0으로 나옵니다.