procedure TForm1.Playback(const AName : String);
var LAnim : TGorillaAnimation
begin
  if not GorillaModel1.AnimationManager.Animations.TryGetValue(AName, LAnim) then
    LAnim := nil;
    
  if Assigned(LAnim) then
    LAnim.Start();
end;