从记录文件中删除特定记录

Delete specific record from file of records

我有下一个数据结构:

 Type
 TMyRecord=Record
                 Num:String[50];
                 ID:String[50];
   
 End;

我有一个记录文件就像​​下一个一样:

Var
F:File of TMyRecord;

该文件将包含许多记录,如何从文件中删除一条特定记录。

提前致谢。

如果记录在文件的末尾,您可以简单地截断文件的大小以省略记录。

否则,从文件的 beginning/middle 中删除记录的唯一方法是创建一个新文件,将旧文件中的现有记录复制到新文件中,省略要删除的记录, 然后用新文件替换旧文件。