Copies the current image to TBaseImage object.
TImagingGraphic Class
public procedure AssignToImage(Image: TBaseImage);