Forum: Object-Pascal / Delphi-Language
by DeddyH,
12. Okt 2016
Ganz ehrlich: keine Ahnung. Du könntest es aber mal mit GetFields etc. versuchen.
Forum: Object-Pascal / Delphi-Language
by DeddyH,
12. Okt 2016
Geht es hiermit?
uses System.Rtti;
...
procedure TDeineKlasse.AssignProps(Source: TObject);
var
ctxSrc: TRttiContext;
ctxDest: TRttiContext;
rtSrc: TRttiType;
Forum: Object-Pascal / Delphi-Language
by DeddyH,
12. Okt 2016
Das mit dem inherited wird aber so nicht funktionieren, zumindest in neueren Delphi-Versionen. Da ruft TPersistent.Assign intern TPersistent.AssignTo auf, welches nur einen Fehler wirft und sonst nichts tut. Daraus folgt, dass man inherited nur dann aufruft, wenn die beiden Klassen nicht kompatibel sind.