Delphi-Quellcode:
RInteger = {packed} record
private
FValue : Integer;
FNull : Boolean;
public
procedure SetNull(yes : Boolean = true);
property Value : PInteger read GetValue write SetValue;
property IsNull : Boolean read FNull write SetNull;
end;
Kleiner ist dagegen dann nur noch die Verwendung eines Wertes aus dem Wertebereich des Integers, welchen man dann als NULL ansieht.
Wenn man ein Objekt nur als Datenspeicher nutzt, dann ist der Record immer einen Hauch kleiner, da die Verwaltung des Objektes wegfällt.
Delphi-Quellcode:
type
TRec = record
a, b: Integer;
end;
TCls = class
a, b: Integer;
end;
ShowMessage(Format('%d %d', [SizeOf(TRec), TCls.InstanceSize]));
= 8 12
Die 4 zusätzlichen Byte sind die Referenz auf den Klassentypen,
dazu kommt dann noch ein bissl mehr an
RTTI-Daten (ich denk mal, daß wird sich auch in der neuen
RTTI nicht geändert haben).