一个关于控件GIFimage的用法，请ufo! ( 积分: 50 )

Y

yhwyb

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-03-13

• #1

我比较了一下，你给我的jepg方法，不如用GIFimage好，同样一个图文件，用jepg,压80,是14K,而用gifimage，是4K,真的太好了，不知你用过否？？我现在做到了在image控件中了，同时可以存为文件(4K),就是放不到数据库中，数据库用的是access,中的blob字段，有用过的朋友也帮我一下，谢谢了

 

Y

yhwyb

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-03-13

• #2

还有，一说明变：aFile:TADOBlobStream;
就报错，是哪个库没use ???

 

Y

yhwyb

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-03-13

• #3

原来是要加一个：use jpeg, 上面那个sfile:Tadoblobstream就可以编译了，但第一个问题我还是等高手回答

 

Y

yhwyb

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-03-13

• #4

怎么没人？？？

 

U

ufo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-03-13

• #5

没用过ado，不过方法应该都类似。
给你一段保存到interbase数据库的代码参考一下：

data2.IBSQL5.Close;
data2.IBSQL5.SQL.Clear;
data2.IBSQL5.SQL.Add('INSERT INTO tupianb(bianh,tupian) values hh1,:hh2)');
data2.IBSQL5.ParamByName('hh1').AsString:= 'test';
data2.IBSQL5.ParamByName('hh2').LoadFromFile(picfilename);//也可以用类似loadfromstream方法从数据流中载入图片数据
data2.IBSQL5.ExecQuery;

 

Y

yhwyb

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-03-13

• #6

还是不行的，好象access图象字段只能存bmp的图，报错就是说，不是bmp格式，这下有点难了，你上面说的方法都试过了，存不进去

 

U

ufo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-03-13

• #7

不要用图形字段，用二进制字段

 

U

ufo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-03-13

• #8

我看了一下，access说明里介绍，需用 OLE 对象字段，可以保存二进制值的。

 

Y

yhwyb

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-03-13

• #9

我用的就是ole,

 

Y

yhwyb

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-03-13

• #10

我存jpg图，没问题，就是想用gifimage控件，他的文件真小，我的图本来色少，但数据量大，所以尽量能用这个控件，只要解决好存数据库就可以了

 

U

ufo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-03-13

• #11

我看了一下 gifimage单元，它有 SaveToStream方法

 

Y

yhwyb

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-03-13

• #12

好的，我先回家，