Cerrar un TImage

[[cHackAll]]

Image1->Picture->Assign(NULL);

[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?

[[escafandra]]

¿Que tal si pruebas esto?:

TPicture *VoidPicture = new TPicture;
Imagen->Picture->Assign(VoidPicture);

Asignas un TPicture vacio....

Saludos.

[fasthorse]

que va tampoco... no se , q cosa más rara,... seguiré probando... y si se os ocurre otra cosa...
Gracias por todo.

[[escafandra]]

¿Por que dices que no se cierra?
¿No habras volcado en el Canvas de tu formulario la imagen....?

En ese caso debes repintar el Canvas con una imagen nula....


Saludos.

[fasthorse]

No no, si ahí no utilizo ningún canvas ni nada, simplemente tengo un formulario Form1 y dentro de él tengo definido un Timagen, tb un botón para que, una vez abierta la imagen dentro del Form1 se me cierre, y eso es lo q no consigo. Me entiendes?
Entonces tu crees que tengo q pintar un canvas?? Es que creo que no te he entendido bien.
Un saludo.

[[escafandra]]

Borrado por repetición

[[escafandra]]

Pues no entiendo....
He probado un programita con un TImage y dos botones.
uno hace

Image1->Picture->Assign(NULL);

y el otro

TPicture *VoidPicture = new TPicture;
Imagen->Picture->Assign(VoidPicture);

Ambos cierran el TImage, es decir, se borra.