On Mon, Sep 23, 2013 at 12:57 PM, Mattias Gaertner < nc-gaert...@netcologne.de> wrote:
> type > TMyClass = class(TPersistent) > private > type > TMyClassVars = record > a,b,c: string; > end; > private > F: TMyClassVars; > public > procedure Assign(Source: TPersistent); > property a: string read F.a write F.a; > end; > ​But in derived classes fields will not assigned​? Best Regards Zaher Dirkey
_______________________________________________ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-pascal
