procedure Assign(Source: TPersistent); override;
Assign(TPersistent * Source);
pngimage
This is function pngimage.Assign.