Creates identical copy of image data.

function CloneImage(const Image: TImageData; 
                    var Clone: TImageData): Boolean;

Imaging (at line 157)

Clone should be initialized by InitImage or it should be vaild image which will be freed by CloneImage.