Property mit Record als Typ in Klasse verwenden

[DieDolly]

Ich habe das jetzt so gemacht

Delphi-Quellcode:

  TMyRecord = Record
    Changed : Boolean;
    TotalWidth : Integer;
    WidthCol1 : Integer;
    WidthCol2 : Integer;
    WidthCol3 : Integer;
   end;

type
 TMyWasAuchImmer = record // ja ich weiß es ist keine Class und sollte es auch nicht so nennen. Daher nun "WasAuchImmer"
 private
 public
  MyRecord: TMyRecord;

  procedure Bla;
 end;

procedure TMyWasAuchImmer.Blub;
begin
 MyRecord.TotalWidth := 42;
end;


// von außen aufrufen
showmessage(TMyWasAuchImmer.MyRecord.TotalWidth.ToString);

Für alle anderen einfachen Datentypen verwende ich weiterhin getter, setter, read, write, property und all das.