Registriert seit: 12. Jun 2002
3.485 Beiträge
Delphi 10.1 Berlin Professional
|
Re: Define Properties
29. Dez 2007, 23: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.
|