Q&A

  • 텍스트 화일 내용만 지우기
1.특정 폴더에 있는 화일은 지우지 않고 그 해당화일의 내용만 지우는 명령이
  있습니까....

2. 내용이 없이 저장된 화일을 찾는 명령어 있습니까.

현재 A.TXT 화일 내용 지우는 방법과 A.TXT로 저장된 화일을 특정 폴더에서
찾아서 내용이 없는경우를 체크하는 것을 프로그래밍 하고 있습니다.
두번째 경우는 SIZE를 체크할 것 같은 데  고수님들의 많은 도움 부탁드립니다.
그럼. 수고하세요.
이 게시물을
3  COMMENTS
  • Profile
    박흥태 • 2003.05.10 01:06

    그냥 쉽게 생각하면요.
    1. 은 TStringList의 File로 저장하는 함수를 이용해서. (당연히 리스트가 없는 TStringList입니다.) 해당화일 이름을 지정해서 저장하면 될것 같구요.

    2. 말씀대로 크기를 체크하면 될것같네요.

    생각해보면 얼마든지 많은 방법이 있을것 같습니다.
  • Profile
    한영관 • 2003.05.10 22:30
    테스트는 안해봤는데여.. 이렇게 한번 해보세요
    var
      FName : string;
      F     : file of Char;
    begin
      FName :='파일경로지정';
      try
        AssignFile(F, FName);
        ReWrite(F);
      finally
        CloseFile(F);
      end;

    두번째...
    var
      size  : integer;
      FName : string;
      F     : file of Char;
    begin
      FName :='C:3.txt'; //경로지정
      try
        AssignFile(F, FName);
        Reset(F);
        size  := filesize(F);
        if size = 0 then
          ShowMessage('파일이 비었습니다'); //수행하고자 하는 코딩..
      finally
        CloseFile(F);
      end;

    /////////// 도움이 되쎴으면 합니다..................



  • Profile
    나눔이 • 2003.05.17 07:01
    감사합니다.

←First Page
661 662 663 664 665 666 667 668 669 670
Last Page→
한델 로그인 하기