DELPHI中GIF的使用

为了达到美观的效果，系统首页面需要加入一个GIF图片。用TIMAGE加载之后，图片是有了，但是不活动的。郁闷。

网上找了一会，有的说需要去弄个TGIFIMAGE的控件，找半天都没地方下。

后来发现说DELPHI2009自带了TGIFIMAGE，只不过没有源代。试验下：

TGIFImage(imgPolice.Picture.Graphic).AnimationSpeed := 200;

TGIFImage(imgPolice.Picture.Graphic).Animate := True;

哎，不错，可以用。AnimationSpeed的值越高，动的越快。

但是又有一个问题出现了，以为我的GIF是放在一个图片上的，GIF动起来的时候刷屏很厉害。后来找了一个很简单的解决办法：

form1.DoubleBuffered := True;

OK,搞定，哈！