Browse Source

Update zgl_application.pas

Seenkao 2 years ago
parent
commit
cd69039933
1 changed files with 1 additions and 1 deletions
  1. 1 1
      Zengl_SRC/src/zgl_application.pas

+ 1 - 1
Zengl_SRC/src/zgl_application.pas

@@ -1133,7 +1133,7 @@ eventLoop:
     NSScrollWheel:
     NSScrollWheel:
       begin
       begin
         if ev.scrollingDeltaY > 0 then
         if ev.scrollingDeltaY > 0 then
-          mouseAction[M_BMIDDLE].state := mouseAction[M_BMIDDLE].state or is_mWheelUp;
+          mouseAction[M_BMIDDLE].state := mouseAction[M_BMIDDLE].state or is_mWheelUp
         else
         else
           mouseAction[M_BMIDDLE].state := mouseAction[M_BMIDDLE].state or is_mWheelDown;
           mouseAction[M_BMIDDLE].state := mouseAction[M_BMIDDLE].state or is_mWheelDown;
       end;
       end;