Q&A

  • 텍스트 파일 처리에서 seek?
안녕하세요.

이진파일에선 record헝 단위로 seek로 위치가 이동이 가능하던데

텍스트 한줄씩 입/출력 readln, writeln으로 해서 하는데

읽을때 이진파일에서 처럼 seek를 써서 할려고 했더니 error가

나더군요.



텍스트을 한줄씩 입/출력할때 특정 줄에 내용으로 이동할려면

어떻게 하는건지 궁금합니다.



제가 글 주변이 없어서 두서가 없네요.

답변 부탁드립니다.

^^;



procedure Tform1.textfile_read(curpos: Integer);

var

tfile: TextFile;

tstring: String;

begin

AssignFile(tfile, 'temp.txt');

Reset(tfile);

Seek(tfile, curpos); //이부분에서 에러?

Readln(tfile, tstring);

CloseFile(CatalogFile);

end;



0  COMMENTS