Delphi:

public procedure Assign(Source: TPersistent); override;

C++:

void public: virtual __fastcall Assign(TPersistent * Source);