[Snaked]

otra posible opcion si andas copiando desde un Tgraphic a un canvas, para que no te de el error de Picture must contain a Bitmap seria:

Image1.Picture := nil;

y en C++:

Image1->Picture = NULL;