FindStyleResource не может найти floatanimation

Question

Я пытаюсь отключить непрерывную анимацию на индикаторе выполнения в Firemonkey. Но я не могу понять, как найти объект анимации, используя FindStyleResource.

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

В приведенном выше коде T всегда ноль. Любое предложение о том, где я иду не так, с благодарностью.

Мартин