求助：如何把256色bitmap到jpeg的转换。(100分)

硕

硕鼠

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-23

• #1

代码:

        jpg:=TJPEGImage.Create;
        jpg.Assign(bmp);
        jpg.PixelFormat:=jf8Bit;
        fname:=p+fname+'.jpg';
        jpg.SaveToFile(fname);

本人的程序中bmp存放的是一幅256色的图希望把它转换到jpg中，程序运行没有问题，
但生成的jpg文件是0字节。

 

B

bswilson

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-23

• #2

试试这个,没错的.
Procedre Button1Click(Sender:TObject);
var
ExmJpeg:TJpegImage;
ExmImage:TImage;
begin
ExmImage :- Timage.Create(self);
ExmJpeg := TJPEGImage.Create;
ExmImage.Picture.LoadFromFile('you bitmap');//装入位图
ExmJpeg.Assign(ExmImage.Picture.Bitmap);
ExmJpeg.SaveTofile('your jpeg file');
ExmImage.Free;
ExmJpeg.Free;
end;

 

远

远帆

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-23

• #3

你可以去看看我以前发的帖子。jpg图像注定是16k色的，你指定为8bit就不行了。

 

硕

硕鼠

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-23

• #4

我的bitmap是8bit的，没办法。

 

硕

硕鼠

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-23

• #5

to bswilson
你的程序在24位的时候是对的，但在8位的时候报内存不足。

 

B

bswilson

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-23

• #6

你到TJPEGImage的属性设置中,设定PixelFormat,由它决定是用8BIT或者24BIT.
希望这下你能解决到问题了.

 

硕

硕鼠

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-23

• #7

to bswilson
我设了.

 

远

远帆

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-25

• #8

你bitmap是8bit这没有关系，在转换的时候会自动变为16k的。

 

玲

玲儿响叮当

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-05-09

• #9

就是不行，请使用png格式

 

硕

硕鼠

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-05-09

• #10

接受答案了.