[Controls] Adjusting the animated codec for future releases

Co-Authored-By: Paulo César Botelho Barbosa <[email protected]>
skia4delphi · May 26, 2024 · f1c1d72 · f1c1d72
1 parent 07a109a
commit f1c1d72
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/Source/FMX/FMX.Skia.pas b/Source/FMX/FMX.Skia.pas
@@ -3746,7 +3746,11 @@ function TSkDefaultAnimationCodec.GetDuration: Double;
 
 function TSkDefaultAnimationCodec.GetFPS: Double;
 begin
+{$IF CompilerVersion >= 37}
+ Result := GlobalPreferredFramesPerSecond;
+{$ELSE}
  Result := TAnimation.DefaultAniFrameRate;
+{$ENDIF}
 end;
 
 function TSkDefaultAnimationCodec.GetIsStatic: Boolean;