有时候我想运行一次或两次动画gif图像,并停止它,有没有可能做到这一点?我们可以在TGIFImage delphi组件中停止动画吗?
回答
动画由TGIFImage
控制的Animate
属性控制。将其设置为True
以设置动画,并将其设置为False
以停止动画。
也有AnimateLoop
财产。如果这是True
那么动画就会无休止地循环。否则它运行一次然后停止。如果你想运行一次动画然后设置AnimateLoop
到False
,然后设置Animate
到True
。
最后,你有OnLoop
事件。每当循环动画循环回到开始时,就会触发。所以,如果你想显示动画的两倍或更多,那么你需要设置AnimateLoop
到True
,然后在OnLoop
处理器统计循环。
如何使用动画在[TGIFImage](HTTP属性: //melander.dk/delphi/gifimage/)组件?我找不到它。 – user1940948 2013-02-18 13:11:37
既然你有Delphi 7,我假设你正在使用[由Finn Tolderlund维护的](http://www.tolderlund.eu/delphi/),不是吗?如果是这样,你使用哪一个? [最新版本](http://www.tolderlund.eu/delphi/gifimaged2010b.zip)具有'Animate'属性。 – TLama 2013-02-21 17:09:40
@TLama我正在看的那个是我在D6时代用过的。它有'Animate'和'OnLoop'。我认为它缺少AnimateLoop。这意味着你需要使用'OnLoop'来实现'AnimateLoop = False'功能。这是Finn Tolderlund代码,版本2.2,2001.07.23。 – 2013-02-21 17:12:14
您使用哪个组件来支持GIF图像?据我所知,Delphi 7中没有任何*内置*类。 – TLama 2013-02-17 17:36:15
@TLama每个人使用的是后来被博格 – 2013-02-17 17:59:02
吸收的gifimage库我使用TGIFImage部件从http://melander.dk/delphi/gifimage/,,, – user1940948 2013-02-18 13:12:38