I corrected it some time ago, if i remember well it should be
something like:


[pascal]function TImageSprite.GetDrawImageIndex: integer;
begin
Result := FAnimStart + Trunc(FAnimPos);
end;[/pascal]

that should be

[pascal]function TImageSprite.GetDrawImageIndex: integer;
begin
Result := FAnimStart + Round(FAnimPos);
end;[/pascal]

or vice versa...

anyway is the algo that calc the position of the frame to draw, sure about
this