title: Mouse event animation in Delphi Firemonkey
body: <p>I have added a button and added a BoxBlurEffect to it and set following attributes to the <code>BoxBlurEffect1</code>.</p>
  
  <pre><code>//extracted form fmx file 
  
  object BoxBlurEffect1: TBoxBlurEffect
    Trigger = 'IsMouseOver=true'
    Enabled = False
    BlurAmount = 0.009999999776482582
    object FloatAnimation1: TFloatAnimation
      AnimationType = atInOut
      Enabled = True
      Duration = 1.000000000000000000
      Loop = True
      Trigger = 'IsMouseOver=true'
      TriggerInverse = 'IsMouseOver=false'
      StartValue = 0.009999999776482582
      StopValue = 10.000000000000000000
      PropertyName = 'BlurAmount'
    end
  end
  </code></pre>
  
  <p>I set loop = true because if it is false it is not animating it is just suddenly going to end value.</p>
  
  <p>So I set it to true. But now it is looping (as the name described) not just animating once and stopping.</p>
  
  <p>And also I want it to animate from stop value to start value when I leave the mouse (only once). When my mouse leaves or enters, the new animation must start from current value not from the max or min value.</p>