delphi中的文件操作问题，简单：seek的使用？

Question

我定义了一个无类型的文件：var filename：file   然后打开文件，在进行文件指针定位的时候，用seek来进行，seek（filename，MoveByte：longint），按照这个函数的原型，movebyte为longint，应该可以为负值的，但是我设置为负值后，提示有错误，请问是为什么？文件正常打开了！！！

Answer 1

不能是负值，
】procedure Seek(var F; N: Longint);中N表示绝对位置而不是相对于当前的偏移位置。—————————————————————————————————
宠辱不惊，看庭前花开花落，去留无意；毁誉由人，望天上云卷云舒，聚散任风。
—————————————————————————————————

Answer 2

你可以用FilePos和Seek这两个函数来配合使用达到你的目的—————————————————————————————————
宠辱不惊，看庭前花开花落，去留无意；毁誉由人，望天上云卷云舒，聚散任风。
—————————————————————————————————