[Delphi]Packed Record和Record的区别

Record的数据各个字节都是对齐的，数据格式比较完整，所以这种格式相对packed占用的内存比较大，<?xml:namespace prefix = o ns = "urn:schemas-microsoft-com:office:office" />

但是因为格式比较整齐，所以电脑读取这个类型的数据的时候速度比较快。

 

而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