Source position: ipanim.pas line 70
type TOnAfterFrameChange = procedure(
Sender: TObject;
CurrentFrame: Integer;
Frames: TIpAnimationFrameList
) of object;