GIF格式转为位图(100分)

胡

胡清江

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-04-06

• #1

GIF<<--->>BMP:-(?

 

胡

胡清江

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-04-06

• #2

不要用第三方控件,有没有?

 

W

wjiachun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-04-06

• #3

没有

 

热

热血

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-04-06

• #4

不用第三方没有
第三方GifImage

 

H

htw

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-04-06

• #5

?

 

Y

yexiaofeng

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-04-06

• #6

可以把JPG文件加入到paradox数据库中
再到处存盘就是BMP文件

 

W

wb_wen

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-04-08

• #7

我不知道我看懂了题目没有
我的想法是用ScanLine读图象，然后保存到另一个.bmp文件中（呵呵，不知道行不行？）

 

R

redsky.l

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-04-08

• #8

看一下GIFIMAGE控件的源码吧！ 我相信你很快就会放弃自己的想法，而用这控件来做！

 

H

ht99

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-04-10

• #9

uses rxGif;//in RxLIb2.75
.
.
.
.
procedure xxx;
var img1,img2:TImage;
begin
img1:=TImage.Create;
img1.loadfromfile('xxx.gif');
img2:=TImage.Create;
img2.Picture.Assign(Image1.picture);
img1.Destroy;
img2.SavetoFile('xxx.bmp');
img2.Destroy;
end;

end;

 

C

cqhxping

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-04-10

• #10

ht99的答案需要第三方控件RxLIb2.75对Gif的支持。只要可以Load了转换方法是可行的；
只是img1.Destroy;和img2.Destroy;应写成img1.Free;和img2.Free

 

吕

吕雪松

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-04-10

• #11

到
<a href='http://vcl.vclxx.org/DELPHI/D32FREE/DELGIF.ZIP'>http://vcl.vclxx.org/DELPHI/D32FREE/DELGIF.ZIP</a>
去下载一个GIF控件吧，里面有一个TGIFImage类。它有LoadFromStream和SaveToStream方法
，可以同Bitmap交互。自己改造一下吧。

 

H

ht99

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-04-13

• #12

谢谢cqhxping。

 

魏

魏启明

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-04-20

• #13

ACDSEE可以转换；
其实没有必要，
因为GIF比BMP省空间的多；
GIF的颜色虽然只有256色（或更少），但每个颜色都是24位真彩；
如果转成BMP就变成24位真彩图了（效果不变），
如果变成256色，失真太大，划不来；
图形是用来显示的；
可显示就行了嘛

 

L

lvxq

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-04-21

• #14

可人家要BMP总 有自己的打算，否则要来作甚。
既然这样有点是肯定的了，就是需要能显示GIF的控件，不过我觉得HT99
的语句中还应加入两句：
IMG2.TRANSPARENTCOLOR:=$02FFFFFF;
IME2.PIXELSFORMAT:=PF24BIT;
可能效果会好一点，否则会丢颜色吧可能

 

C

cqhxping

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-04-27

• #15

不想用控件也简单嘛，你把别人的东西来remark下嘛。世界上哪有不张嘴就可
以吃饭的？？？

 

M

maming

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-05-16

• #16

??

 

H

HeXiang Lee

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-06-06

• #17

通過BitMap,JepgImage來轉換。
Var
TemBitMap:TBitMap;
TemJepgImage:TJepgImage;
Begin
TemJepgImage:=TJepgImage.Create;
TemJepgImage.LoadFrom('tem.Jpg');
TemBitMap:=TBitMap.Create;
TemBitMap.Assign(TemJepgImage);
TemBitMap.SaveToFile('tem.bmp');
End;