Copies the image contained in Source to this graphic object.
TImagingGraphic Class
public procedure Assign(Source: TPersistent); override;
Supports also TBaseImage descendants from ImagingClasses unit.