请问：为什么 bmp.savetofile('a.bmp');后文件大小是零呢？

[郝人（好人）]

将JPG保存为BMP，代码正常，就是存的bmp文件是零字节，为什么？

[郝人（好人）]

代码如下：
var
bmp:Tbitmap;
begin
bmp:=Tbitmap.Create;
bmp.Assign(image1.Picture.Bitmap);
bmp.PixelFormat:=pf24bit;
bmp.SaveToFile('c:\a.bmp');
end;

[郝人（好人）]

image1.Picture.Bitmap.SaveToFile('c:\b.bmp');
也是零！！！

[hiflower]

如果是 bmp 文件，则没问题
如果是 jpg 文件，用 (image1.picture.graphic as tjpegimage).savetofile

通用：image1.picture.savetofile

图像传递到 Bitmap：bmp.Assign(image1.picture.graphic)

[planfore]

bmp.Assign(image1.Picture.Graphic);