[Delphi]Packed Record和Record的区别

Record的数据各个字节都是对齐的，数据格式比较完整，所以这种格式相对packed占用的内存比较大， 但是因为格式比较整齐，所以电脑读取这个类型的数据的时候速度比较快。 而Packed Record对数据进行了压缩，节省了内存空间，当然他的速度也变的慢了。

type

   //Declare an unpacked record

   TDefaultRecord = Record

       name1 : string[4];

       floater : single;

       name2 : char;

       int : Integer;

   end;

   //Declare a packed record

   TPackedRecord = Packed Record

      name1 : string[4];

      floater : single;

      name2 : char;

      int : Integer;

   end;

 

   var defaultRec : TDefaultRecord;

         packedRec : TPackedRecord;

   begin

       ShowMessage('Default record size = '+IntToStr(SizeOf(defaultRec)));

       ShowMessage('Packed record size = '+IntToStr(SizeOf(packedRec)));

   end;

 

   Default record size = 20

   Packed record size = 14

 

不过，对于现在的操作系统来，packed Record 节省的那些空间已不用考虑他了。除了做DLL（不用packed容易造成内存混乱）和做硬件 编程时（比如串口）编程时必须用到packed Record，其它情况都可以用Record