Apagar Imagem do TImage

Question

Oi pessoal! Seguinte. Tenho um form com um TImage. Carrego a figura nele por um bot�o e queria colocar outro bot�o para apagar essa imagem. Tentei Image1.Picture.Free, Image1.Picture.Bitmap.FreeImage, mas nenhum desses funciona. Algu�m sabe como?

Macario · Accepted Answer

8) [code:1:2eeaf0b02e]Image1.Picture := nil;[/code:1:2eeaf0b02e]...

Raimundo Pereira · Answer

Usando o click de apenas um button e um listimagem

if Id_Foto=0 then
begin
Imagem_Play.Picture:=nil;
Lista_Imagens.GetBitmap(Id_Foto, Imagem_Play.Picture.Bitmap);
Id_Foto := Lista_Imagens.Count - 1;
end
else
begin
Imagem_Play.Picture:=nil;
Lista_Imagens.GetBitmap(Id_Foto, Imagem_Play.Picture.Bitmap);
Id_Foto:= Id_Foto-1;
end;

Agora tem outras n' maneiras de fazer, tudo indica da sua real necessidade.
Informe a sua real ideia e vamos ajudar-lo