안녕하세요! 여러분
델파이에서 함수로 지원하는 FileSize가 있지요.
그런데 이것은 Binary화일에만 적용이 되더군요.
어떻게하면 TextFile의 크기를 알수가 있지요.
물론 File을 열고 EOF까지 읽으면 그 크기를 알 수가 있지만, 지금 제가 하는 작업의
TextFile크기는 보통 1MByte가 넘씁니다. 그러니 끝까지 읽기에도 너무 많은 시간이
걸리는군요.
고수님들 좋은 방법이 없을까요?
부탁드립니다. . .
그럼 좋은 하루되세요 ^_^
> 안녕하세요! 여러분
>
> 델파이에서 함수로 지원하는 FileSize가 있지요.
>
> 그런데 이것은 Binary화일에만 적용이 되더군요.
>
> 어떻게하면 TextFile의 크기를 알수가 있지요.
>
> 물론 File을 열고 EOF까지 읽으면 그 크기를 알 수가 있지만, 지금 제가 하는 작업의
>
> TextFile크기는 보통 1MByte가 넘씁니다. 그러니 끝까지 읽기에도 너무 많은 시간이
>
> 걸리는군요.
>
> 고수님들 좋은 방법이 없을까요?
>
> 부탁드립니다. . .
>
> 그럼 좋은 하루되세요 ^_^
박종성님 안녕하세요?
아래는 제가 사용하는 파일의 크기를 구하는
간단한 방법입니다.
구한 파일의 크기는 바이트 크기로 반환됩니다.
참조하시고, 즐거운 프로그래밍 되시길..
procedure TForm1.Button1Click(Sender: TObject);
var SearchRec: TSearchRec;
Re: integer;
begin
Re := Sysutils.FindFirst('c:Command.Com', faAnyFile, SearchRec);
if Re = 0 then ShowMessage(IntToStr(SearchRec.Size));
end;
PS: 질문은 하나만 올려주십시오.
같은 질문 두개는 제가 삭제했습니다.