record mit dynamischem objekt

[Fritzew]

In etwa so:
Als Variante records

Delphi-Quellcode:

THitObject = record
    Coordinates: array [0 .. 0] of Integer;
    Offset: Integer;
    case HitObjectType: THitObjectType of
      hDot: (Dot: TDot);
      hSlider: (Slider: TSlider);
      hSpinner: (Spinner: TSpinner);
  end;

Warum verwendest Du packed records? Die sind im Zugriff eher langsamer;

[Pixel]

Zitat von Fritzew:

In etwa so:
Als Variante records

Delphi-Quellcode:

THitObject = record
    Coordinates: array [0 .. 0] of Integer;
    Offset: Integer;
    case HitObjectType: THitObjectType of
      hDot: (Dot: TDot);
      hSlider: (Slider: TSlider);
      hSpinner: (Spinner: TSpinner);
  end;

Warum verwendest Du packed records? Die sind im Zugriff eher langsamer;

Das war genau das was ich gesucht hatte! Vielen Dank! Ich hatte sogar irgendetwas mit case im Kopf, aber dachte dann dass ich das nur aus c++ gekannt habe oder so. Naja.

Und warum packed records? Naja ich hatte anfangs auf den Speicher direkt zugegriffen und wollte dann kein alignment haben, habs aber wieder zu record geändert jetzt!