diff --git a/mdl/m_fileio.pas b/mdl/m_fileio.pas index d348d1f..fe38574 100644 --- a/mdl/m_fileio.pas +++ b/mdl/m_fileio.pas @@ -688,6 +688,8 @@ Begin Seek (RecNum); + FillBuffer; + FreeMem (TempBuf, RecordSize); End; @@ -715,6 +717,8 @@ Begin Seek (RecNum); + FillBuffer; + FreeMem (TempBuf, RecordSize); End;