Идёт загрузка страницы...

htp://aptem.net.ru





Delphi 2

Проблема Reset текстового файла

Имеется известная ошибка в Reset: если вы используете это в открытом текстовом файле, поля буфера файла _не_ сбрасываются в начало буфера. Вы можете обойти это, используя CloseFile, AssignFile и Reset вместо использования только Reset или "вручную" сбрасывая буфер:


   
Reset( filevar );
with TTextRec(filevar) do SetTextBuf(filevar, BufPtr^, BufSize);

- Peter Below [000961]