08-02-2015, 11:40 PM
الفر بين Record العادي و Packed Record أن الأخير حجمه بالبايت أقل من الأول حتى لو قمت بحجز نفس أنواع البيانات ونفس عدد المتغيرات فملا
هي نفس المتغيرات وأنواع البيانات والكن عندما تقوم بالاستفسار عن الحجم تجده مختلف
سيعطيك 12 و 9 بايت
كود :
type c = Packed Record
a : Integer;
b : String[4];
End;
type x = Record
a : Integer;
b : String[4];
End;كود :
procedure TForm8.Button1Click(Sender: TObject);
var s : c;
s1 :x;
begin
ShowMessage(IntToStr(SizeOf(s))+' - '+IntToStr(SizeOf(s1)))
end;