Delphi 转圈 原型进度条 AniIndicator 及线程配合使用

Delphi FMX 转圈 原型进度条 progress

 AniIndicator

TAniIndicator

TFloatAnimation

 

 VCL下也有转圈菊花进度条

TActivityIndicator

属性： IndicatorSize，大小

           FrameDelay速度

 

start 

AniIndicator1.Enabled := true;

end

AniIndicator1.Enabled := false;

 ActivityIndicator1->StartAnimation()；
 ActivityIndicator1->StopAnimation();

2016.5.19
Berlin,change the AniIndicator size,set StyleLookup=labelstyle,the default StyleLookup is aniindicatorstyle.i find that,if the value is not default,it's size can resize.

labelstyle is from Label StyleLookup.
if set to button stylelookup ,eg addtoolbutton,it has add + symble.

 
在win下，阻塞执行query.open，等于假死，但在ios下AniIndicator一直转动，这一点来说ios比win好，Android也是假死。

如何让AniIndicator使用线程技术一直显示。

 

 参考Demo,推荐

http://stackoverflow.com/questions/20688839/correctly-using-taniindicator-in-firemonkey-mobile-dev-for-wait-for-processing

 

http://www.dave-gill.co.uk/blog/2014/08/22/restrequestexacuteasync-and-taniindicator

http://www.devsuperpage.com/search/Articles.aspx?G=2&ArtID=90334

http://www.fmxexpress.com/build-a-progress-spinner-using-objects-in-delphi-xe6-firemonkey-on-android-and-ios/

http://blog.marcocantu.com/blog/2014_may_background_delphi_android_threads.html