如何清空类型文件中的数据纪录？

[liang_jimmy]

我创建了一个类型文件用来纪录数据，但是当我要如何才能清空该类型文件中的数据纪录？

const
FName = 'PurchaseFile.Dat';

...

我想用重新写入的方式来请空纪录，如使用write(FName);
但是出错，请问该如何处理？

[chechy]

begin
AssignFile(F, FName);
Rewrite(F);
CloseFile(F);
end;

[liang_jimmy]

我试过该方法了，存在I/O错误103

[liang_jimmy]

procedure TPurchaseFileFrm.Button5Click(Sender: TObject);
var
F: File of TRemoteRec;
begin
AssignFile(F,FName);
Rewrite(F);
CloseFile(F);
end;

我试过了，发生错误。此外，当我使用Reset(F)时，同样会出错？请大虾指点。

[storm999]

chechy(我爱洁洁)的方法應該沒有錯,你再試一試

[storm999]

不好意思,我搞錯了,類型文件確實出現此錯誤,

[lbl20020123]

AssignFile好像只能用于文本文件。
试一下FileOpen,Assign，FileAssgin
我及不太请了，查以下资料。

[liang_jimmy]

急，请大虾指点。

[wylove]

Assignfile(Personfile,文件名);
ReWrite(PersonFile);
try
write(Personfile,Person);//写空内容
finally
Closefile(Personfile);
end;

[liang_jimmy]

还是不行，是不是因为我是类型文件，所以只要Rewrite就出错。

[liang_jimmy]

没有大虾能帮忙一下了吗？

[yyfhz]

类型里面不能有String变量，用ShortString试试看