delphi - FindStyleResource は floatanimation を見つけることができません

Question

firemonkey のプログレス バーの連続アニメーションをオフにしようとしています。しかし、FindStyleResource を使用してアニメーション オブジェクトを見つける方法がわかりません。

T := MyProgressBar.FindStyleResource('floatanimation');
if (T <> nil) and (T is TFloatAnimation) then
  TFloatAnimation(T).Loop := false;

上記のコードでは、T は常に nil です。これで私が間違っているかどうかについての提案は大歓迎です。

マーティン