imageen不行,要自定义才能显示gif
解决方案 »
- popupmenu 动态创建问题
- 找到新工作并且今天回家(两年没有回家)-------------散分庆贺
- 关于分层问题
- 如何获得本地连接的名称啊
- 请求多线程的例子!!
- 关于日期条件查询的问题
- 大虾帮帮忙吧,这段简单的多线程的代码什么错误啊?
- 求助:在DELPHI中怎样才能使用VB控件
- 请问table1.FieldByName('company').AsString:=edit1.Text;里的AsString是干嘛的,它是怎么用的呀?
- 关于报表打印的问题?
- NMUDP能用于internet程序吗?
- 散分!顺便问及劳动法真能保护我们劳动者权益吗???????????????????????????????
http://www.51dd.com/SoftView/SoftView_27802.html
d到处有得下载,作者主页下载:http://home20.inet.tele.dk/tolderlund/delphi/
优点:免费
缺点:TGifImage对gif支持不好,TJvImage显示动画质量不高.
if (PicType = 'GIF') then
begin
Image := TGIFImage.Create;
end
else if (PicType = 'JPG') then
begin
Image := TJPEGImage.Create;
end;
Image.LoadFromFile(PicFile); Picture := TPicture.Create;
Picture.Graphic := Image;
JvImage1.Picture := Picture;