On Mon, Sep 23, 2013 at 8:50 AM, Sven Barth <pascaldra...@googlemail.com>wrote:

> You need to add a "Result.Assign(Self)" to your clone call and implement
> a virtually inherited "Assign" method in each class where you copy all
> fields. This is how "TPersistent" and its descendants do it as well.


​Yes I added assign, but as example above, it is crashed when creating it

Result:=TBaseObject(ClassType).Create;

-- 
I am using last revision of Lazarus, FPC 2.6 on Windows XP SP3

Best Regards
Zaher Dirkey
_______________________________________________
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal

Reply via email to