TAnimationEndEvent

TAnimationEndEvent

type TAnimationEndEvent = procedure(Sender: TTeeAnimation; Var FreeAnimation: Boolean) of object;

Unit
TeeAnimate