Registriert seit: 12. Jun 2002
3.483 Beiträge
Delphi 10.1 Berlin Professional
|
Re: Define Properties
30. Dez 2007, 00:03
Zuerst musst du die von TPersistent geerbte Methode Assign überschreiben und dort die Daten aus Source in Self kopieren. Danach musst du noch einen Setter für die Header-Eigenschaft schreiben, in diesem Rufst du dann die Assign-Methode auf. Den Rest übernimmt das Streamingsystem. DefineProperties ist nicht notwendig.
|