Panel: Fix SetFrame out of index

http://doom2d.org/forum/viewtopic.php?f=36&t=2576

diff --git a/src/game/g_panel.pas b/src/game/g_panel.pas
index c95c271c289aff596bbc6b0b5b9f33750b09e7be..c3d822480045e29454919fe9c3c5e9cb9f4609f3 100644 (file)
--- a/src/game/g_panel.pas
+++ b/src/game/g_panel.pas
@@ -906,7 +906,7 @@ begin
     (FTextureIDs[FCurTexture].AnTex <> nil) and
     (Width > 0) and (Height > 0) and (FAlpha < 255) then
   begin
-    FCurFrame := ClampInt(Frame, 0, FTextureIDs[FCurTexture].AnTex.TotalFrames);
+    FCurFrame := ClampInt(Frame, 0, FTextureIDs[FCurTexture].AnTex.TotalFrames - 1);
     FCurFrameCount := Count;
     FTextureIDs[FCurTexture].AnTex.CurrentFrame := FCurFrame;
     FTextureIDs[FCurTexture].AnTex.CurrentCounter := FCurFrameCount;