Código Delphi [-] FObject := cMyClass.Create; myObject.Copy(FObject);
FObject := cMyClass.Create; myObject.Copy(FObject);