我认为 gif 动画图像没有原生支持。
怎样才是最好的方法呢？任何允许这样做的免费组件？我正在考虑使用 TImage 和 ImageList + Timer，但我需要将 gif 的每一帧导出到单独的 bmp 文件。
在现代 Delphi 中这非常简单。一切都是内置的。TImage到窗体上并将动画 GIF 加载到 Picture 属性中。然后，通过以下方式启动动画Animate财产：
(Image1.Picture.Graphic as TGIFImage).Animate := True;
您可以使用以下命令控制动画AnimateLoop and AnimateSpeed。应该很容易猜到如何再次关闭动画！
现在，由于您使用的是 Delphi 7，因此您没有TGIFImage组件内置。但是，您可以从以下位置下载代码芬·托德伦德网站（您想要最新版本的TGIFImage）。使用这个版本的组件，上面的代码应该可以正常工作，尽管自从几年前我从 D6 移植到 D2010 以来我个人就没有使用过它。
所有这些各种各样的TGIFImage代码实际上只是同一组件的版本，最初由安德斯·梅兰德2007 年，向 Embarcadero 捐赠并纳入德尔福。
本文内容由网友自发贡献，版权归原作者所有，本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容，请联系:hwhale#tublm.com(使用前将#替换为@)
