Speicherplatz ermitteln: Objekt vs. Record

[himitsu]

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).