Q&A

  • Text File에서 문자열 읽기
"

AssignFile(fpIn, OpenDialog1.FileName);

Reset(fpIn);

......

while not(EOF(fpIn)) do begin



// ReadLn(fpIn, sTemp);

Read(fpIn, sTemp);

end;

"

라는 Source에서 EOF를 만날때까지 계속 한 줄씩 읽기를 원하는데, 한 줄만 읽고, EOF로 끝나 버려요.

"ReadLn()" 함수를 써도 한 줄만 읽고 끝내요.

몇십만건이 되는 Data라서 Excel 작업도 불가합니다.

1  COMMENTS
  • Profile
    바람개비 2000.12.26 19:49
    음... 혹시 텍스트데이타가 한줄짜리가 아닌가 싶네요.

    readln은 cr(아스키 13번) 을 찾아서 한문장으로 인식을 하게되는데

    혹시 라인피드(아스키10번)만 들어간 데이타 아닌가요?

    그리고 한줄씩읽기를 원하신다면 당연히 readln을 사용하셔야겠지요?



    확인해보십시오.



    바라미~~



    안녕 wrote:

    > "

    > AssignFile(fpIn, OpenDialog1.FileName);

    > Reset(fpIn);

    > ......

    > while not(EOF(fpIn)) do begin

    >

    > // ReadLn(fpIn, sTemp);

    > Read(fpIn, sTemp);

    > end;

    > "

    > 라는 Source에서 EOF를 만날때까지 계속 한 줄씩 읽기를 원하는데, 한 줄만 읽고, EOF로 끝나 버려요.

    > "ReadLn()" 함수를 써도 한 줄만 읽고 끝내요.

    > 몇십만건이 되는 Data라서 Excel 작업도 불가합니다.