[fpc-pascal] Clone a instance of object

[Zaher Dirkey]

On Mon, Sep 23, 2013 at 12:57 PM, Mattias Gaertner <
nc-gaertnma at 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
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.freepascal.org/pipermail/fpc-pascal/attachments/20130923/91012c77/attachment.html>