a ver, basicamente lo que pretengo hacer es cojer el bitmap de un timage, almacenarlo en una variable temporal de tipo TBitmap y a partir de esa variable guardarlo en disco
Código:
procedure TForm1.Button2Click(Sender: TObject);
var
temporal : Tbitmap;
begin
temporal := TBitmap.Create();
temporal.Assign(self.Image1.Picture.bitmap);
temporal.SaveToFile('a.bmp');
end;
El codigo anterior no me da ningun error, sin embargo el archivo que genera, a.bmp, está completamente vacio.
Si el codigo anterior lo implemente en vez de usar un temporal TBitmap uso un TPicture el metodo SaveToFile me guarda la imagen tal cual.
Alguien sabe que estoy haciendo mal?
Un saludo y gracias