Q&A

  • 파일 사이즈 알아오기..
Open dialog를 사용해서 file size를 알려고 합니다..

dialog box에서 파일을 지정하면

그파일의 이름과 size를 따로 저장하려고 하는데요..

이름저장은 filename프로퍼티 사용해서 할 수 있는데 size는

어떻게 얻을수 있나요?

2  COMMENTS
  • Profile
    nilriri 2000.07.11 03:43
    델파이 팁모아에 있는 내용입니다.

    아래는 링크입니다.



    http://board.member.cgiserver.net/CrazyWWWBoard.cgi?mode=read&num=712&db=cozykyd02b&fval=%C6%C4%C0%CF&backdepth=1



    이진수 wrote:

    > Open dialog를 사용해서 file size를 알려고 합니다..

    > dialog box에서 파일을 지정하면

    > 그파일의 이름과 size를 따로 저장하려고 하는데요..

    > 이름저장은 filename프로퍼티 사용해서 할 수 있는데 size는

    > 어떻게 얻을수 있나요?

  • Profile
    최용일 2000.07.11 03:42
    안녕하세요. 최용일입니다.



    FileSize함수나 FindFirst함수를 사용하시면 얻을 수 있습니다.



    // FileSize함수 이용...

    var

    F: File of Byte;

    begin

    if OpenDialog1.Execute then

    begin

    AssignFile(F, OpenDialog1.FileName);

    Reset(F);

    // FileSize(F) = 파일의 크기

    ShowMessage('파일의 크기는 ' + IntToStr(FileSize(F)) + '입니다.');

    CloseFile(F);

    end;

    end;



    // FindFirst함수 이용...

    var

    SearchRec: TSearchRec;

    Re: integer;

    begin

    if OpenDialog1.Execute then

    if FindFirst(OpenDialog1.FileName, faAnyFile, SearchRec) = 0 then

    begin

    ShowMessage('파일의 크기는 ' + IntToStr(SearchRec.Size) + '입니다.');

    FindClose(SearchRec);

    end;

    end;



    ^^ 항상 즐코하세요.



    이진수 wrote:

    > Open dialog를 사용해서 file size를 알려고 합니다..

    > dialog box에서 파일을 지정하면

    > 그파일의 이름과 size를 따로 저장하려고 하는데요..

    > 이름저장은 filename프로퍼티 사용해서 할 수 있는데 size는

    > 어떻게 얻을수 있나요?