Du kannst für Deine Zwecke schon eine TFloatAnimation verwenden. PropertyName muss aber auf eine existierende property des Parent gesetzt werden, sonst geht nichts.
Dennoch würde ich empfehlen eine abgeleitete Animation zu verwenden
Code:
TMyFloatAnimation = class(TFloatAnimation)
protected
MyControl: TMyButton;
procedure ProcessAnimation; override;
procedure FirstFrame; override; // macht nichts
end;
und in den Prozeduren die zu verändernde property direkt zuzuweisen.
Code:
procedure TMyFloatAnimation .ProcessAnimation;
var
V : Single;
begin
if (NormalizedTime=0) or (Duration=0) then
V := StartValue
else V := StartValue + (StopValue-StartValue) * NormalizedTime;
---> mach was mit V
end;
Deine Animation kann immer von 0-1 laufen, für die Rotation halt dann mit 360 oder 2pi multiplizieren.