Record als Property

[nebukadnezzar]

also ich hab sagen wir mal folgenden record

Delphi-Quellcode:

TRec = Record
     Feld1,Feld2:integer;
end

und

Delphi-Quellcode:

Tmyclass = Class
   private
    procedure setdata(D:TRec);
    Function GetData:TRec;
   .
   .
   public
    property Data:Trec read GetData Write SetData;
    .
   end;

so. wie kann ich es nun schaffen das wenn ich

Code:

MyObj.Data:=Rec;

das mittels SetData geschreiben wird
aber bei

Code:

MyOnj.Data.Feld1:=2;

das auch gespeichert wird (ohne setdata!)