Q&A

  • I/O error 103...
var
   txt : TextFile;
을 써서 file I/O를 하는데요...
제목처럼 I/O error 103...이 뜨네요...
뭐가 잘못된거지 아시나요??~~
5  COMMENTS
  • Profile
    최용일 2003.04.17 22:34
    안녕하세요. 최용일입니다.

    File Not Open 파일을 열지 않았다는 뜻인데... 파일을 가지고 뭔가 작업하실려면 먼저 열어야죠... 쓴뒤에는 닫아야 하구요...

    var
        F: TextFile;
    begin
      AssignFile(F, FileName);
      Reset(F);
      WriteLn('aaaaa');
      CloseFile(F);
    end;

    ^^ 항상 즐코하세요...

  • Profile
    전원이 2003.04.17 23:29
    우선 항상 답변해주시는 님께 감사드리고요...
    책보면 Reset(), Rewrite(), Append() 세가지 모드로 열수 있다고 했는데요..
    그래서 Rewrite()로 열었거든요...
    글구 Reset()로 열어도 에러가 나네요...
    uses 절에 뭘 포함시켜야 되나요???
    책에는 그런말 없던데...아리송~~~

    procedure TForm1.Button1Click(Sender: TObject);
    var
        txt : TextFile;
        buf : string;
    begin
        AssignFile(txt,'c:my.txt');
        Rewrite(txt);
        buf:='qqq';
        writeln(buf);
        CloseFile(txt);
    end;
    이것이 소스입니다...
    확인해보기위한 간단한 소스....

  • Profile
    최용일 2003.04.17 23:44
    안녕하세요. 최용일입니다.

    쩝~ WriteLn이 부분이 잘못됬네요... 제가 잘못가르켜 드렸군요...

    WriteLn(txt, buf);

    위와 같이 하셔야 합니다.

    Reset은 이미 있는 파일을 가지고 작업하실때, Rewrite은 파일을 새로만들어서 작업하실때, Append는 기존파일의 맨 뒤에 추가해서 작업하실때 쓰시면 됩니다...

    ^^ 항상 즐코하세요...

  • Profile
    전원이 2003.04.17 23:49
    .
  • Profile
    최용일 2003.04.18 02:04
    안녕하세요. 최용일입니다.

    제가 책을 보지 않아서 확실히 말씀드릴수는 없겠지만 책도 맞을거 같네요...

    Write(텍스트);

    위와 같은 식으로 하는것은 콘솔어플(도스창)만들때 하는거거든요...

    콘솔어플에서 기본아웃풋(Standard OutPut)은 항상 열려있으니까요...

    ^^ 항상 즐코하세요...