谈delphi记录类型与vc中的结构转换解决思路

谈delphi记录类型与vc中的结构转换
//delphi    
procedure     TForm1.Button1Click(Sender:     TObject);    
type     TRecord1=record    
      a1:byte;    
      d1:Cardinal;    
end;    
type     TRecord2=packed     record    
      a1:byte;    
      d1:Cardinal;    
end;    
begin    
      showmessage(IntToStr(SizeOf(TRecord1)));//输出值为8    
      showmessage(IntToStr(SizeOf(TRecord2)));//输出值为5    
end;    
//vc    
typedef     struct     tagTStruct1    
{    
                      unsigned     char     a1;            
                      unsigned     int     d1;                                                            
 
}TStruct1,*LStruct1;    
void   Cdialog1::OnBnClickedOk()
{  
            int     value=0;    
            char     value1[100];    
            CString     value2;    
            value2= " ";    
            itoa(sizeof(TStruct1),value1,10);    
            value2.Format( "struct   is     %s ",value1);    
            AfxMessageBox(value2);   //输出值为8
}
以上代码均调试过了，想请问vc中为什么取出的占用大小也是8啊，这样起不是很占用资源吗？（对比与delphi   packed     record类型），本人对vc不太了解，也没用过，只是最近需要看些代码，才弄了下，只是本着相互学习的态度，请大家场所语言，分不够我会加的

[解决办法]
占用内存大小为8：
在DELPHI里，如果不是紧缩型（packed record）的记录类型，对记录类型的内存管理采用的是叫“字对齐”的模式。也就是说
type TRecord1=record
a1:byte; //A1域占用的字节长度，因“字对齐”管理模式，与D1域占用的内存大小一致；
d1:Cardinal; //D1域占用4字节内存；
end;

在VC中，内存管理模式不太清楚了。呵~~，要查查相关的资料才行。