解决问题立即给分，图形load问题(200分)

D

delphi-pgp

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-21

• #1

我想动态建立一图形控件并且想LoadFromFile不同格式的图片(Bmp,gif,jpg)就这几种格式
但我建立Timage.create后在loadfromfile只能是Bmp,如果格式为gif就出错，请问如何解决
或有什么好的控件，但是要动态建立

 

A

Adnil

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-21

• #2

装rxlib，里面有支持TImage的gif单元。

 

T

twos

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-21

• #3

有一个GifImage单元，你去网上找一下
可以是TImage支持gif, JpegImage.dcu是Delphi自带的，可以支持Jpg
我可以发给你，只要加入工程里，就可以了

 

P

pcc_mmz1

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-21

• #4

Timage 类的对象不能处理 .gif格式图片。不知道能不能将
其转换为一个流，并存在流中，然后通过loadfromstream加入该控件中。

 

S

svw0506

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-21

• #5

问题出在你没引用以下两个单元：
jpeg, GIFImage

代码如下：
//uses jpeg, GIFImage;


var
l_Image1: TImage;
begin
if not OpenDialog1.Execute then
Exit;
l_Image1 := TImage.Create(Self);
with l_Image1 do
begin
Parent := Form1;
Left := 10;
Top := 10;
Picture.LoadFromFile(OpenDialog1.FileName);
end;

 

3

300850

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-21

• #6

gz

 

D

del520

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-21

• #7

装一个支持gif的控件就可以了。我以前也是这样。
如果需要给我你的mail我给你发一个。

 

X

xujia

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-21

• #8

加入jpeg, GIFImage单元就可以了

 

D

delphi-pgp

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-23

• #9

接受答案了.

 

元

元无天

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-26

• #10

送分，在搞名堂。DFM上面居然有铜味了。