[ProDaNTe]

SetFilePointer тоже integer у меня Delphi XE,


Как через TFileStream будет выглядеть?
AssignFile(f,tex);
Reset(f,1);
Seek(f, RestartPos);
BlockWrite(f, fBuf, ReadLen);