Cerrar un TImage

[fasthorse]

Ahora no me da ningun error, pero sigo viendo la imagen después de darle a la opción de cerrar imagen, mirad tengo este código:


void __fastcall TForm1::ToolButton_CerrarImagen(TObject *Sender)
{
int resp;
resp = MessageDlg("¿Desea guardar " + Caption + " primero?",
mtConfirmation, TMsgDlgButtons() << mbYes << mbNo << mbCancel, 0);

if(resp == mrYes)
GuardarImagen1Click(this);
Imagen->Picture->Assign(NULL);
//siendo Imagen un TImage dentro del formulario principal
.....
}

¿qué puedo hacer entonces?