2013-02-17 86 views
1

有时候我想运行一次或两次动画gif图像,并停止它,有没有可能做到这一点?我们可以在TGIFImage delphi组件中停止动画吗?

+1

您使用哪个组件来支持GIF图像?据我所知,Delphi 7中没有任何*内置*类。 – TLama 2013-02-17 17:36:15

+2

@TLama每个人使用的是后来被博格 – 2013-02-17 17:59:02

+1

吸收的gifimage库我使用TGIFImage部件从http://melander.dk/delphi/gifimage/,,, – user1940948 2013-02-18 13:12:38

回答

3

动画由TGIFImage控制的Animate属性控制。将其设置为True以设置动画,并将其设置为False以停止动画。

也有AnimateLoop财产。如果这是True那么动画就会无休止地循环。否则它运行一次然后停止。如果你想运行一次动画然后设置AnimateLoopFalse,然后设置AnimateTrue

最后,你有OnLoop事件。每当循环动画循环回到开始时,就会触发。所以,如果你想显示动画的两倍或更多,那么你需要设置AnimateLoopTrue,然后在OnLoop处理器统计循环。

+0

如何使用动画在[TGIFImage](HTTP属性: //melander.dk/delphi/gifimage/)组件?我找不到它。 – user1940948 2013-02-18 13:11:37

+0

既然你有Delphi 7,我假设你正在使用[由Finn Tolderlund维护的](http://www.tolderlund.eu/delphi/),不是吗?如果是这样,你使用哪一个? [最新版本](http://www.tolderlund.eu/delphi/gifimaged2010b.zip)具有'Animate'属性。 – TLama 2013-02-21 17:09:40

+0

@TLama我正在看的那个是我在D6时代用过的。它有'Animate'和'OnLoop'。我认为它缺少AnimateLoop。这意味着你需要使用'OnLoop'来实现'AnimateLoop = False'功能。这是Finn Tolderlund代码,版本2.2,2001.07.23。 – 2013-02-21 17:12:14