DEADSOFTWARE

gl: fix text fields
authorDeaDDooMER <deaddoomer@deadsoftware.ru>
Wed, 15 Feb 2023 18:43:43 +0000 (21:43 +0300)
committerDeaDDooMER <deaddoomer@deadsoftware.ru>
Fri, 9 Jun 2023 09:13:47 +0000 (12:13 +0300)
src/game/renders/opengl/r_gui.pas

index 37fb2179daa3dea752185bf4504072a0fa296821..3e35ac9e01e6d75689a8d4add79f34ff28652507 100644 (file)
@@ -258,7 +258,7 @@ implementation
     var w, h: Integer; r, g, b: Byte; f: TGLFont;
   begin
     r_Draw_Texture(EditLeft, ctrl.X, ctrl.Y, EditLeft.width, EditLeft.height, false, 255, 255, 255, 255, false);
-    r_Draw_TextureRepeat(EditMiddle, ctrl.X + 8, ctrl.Y, 8 + (ctrl.Width - 1) * 16, EditMiddle.height, false, 255, 255, 255, 255, false);
+    r_Draw_TextureRepeat(EditMiddle, ctrl.X + 8, ctrl.Y, 8 + ctrl.Width * 16, EditMiddle.height, false, 255, 255, 255, 255, false);
     r_Draw_Texture(EditRight, ctrl.X + 8 + ctrl.Width * 16, ctrl.Y, EditRight.width, EditRight.height, false, 255, 255, 255, 255, false);
     r := ctrl.Color.R;
     g := ctrl.Color.G;