type TEmptyRecord = record end; // 占位 THeadRcd = packed record RecordType: Byte; // 标识的记录类型 RecordLen: Word; // 紧跟着的记录大小(如Datatype在文件中占的大小为: SizeOf(TDatatype) + TDatatype.voltageLen + TDatatype.angleLen) end; // 保存到文件的 TDatatype = packed record dot: Integer; voltageLen: Integer; angleLen: Integer; end; // 你自己定义的读取结构 Datatype = packed record dot: Integer; voltageLen: Integer; angleLen: Integer; voltage: TEmptyRecord; angle: TEmptyRecord; end;每次写入一个结构之前先写入一个, 记录头 THeadRcd,即记录保存 THeadRcd,TDatatype 之后 if TDatatype.voltageLen > 0 then 接着保存 voltage;if TDatatype.angleLen> 0 then 接着保存 angle;读取时, 根据你自己的保存规则去读就行了.其实没什么,你自己定好保存和读取规则就行了, 至于读到那个结构去,随便你了~