Browse Source

correct for MAcOS

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

+ 2 - 1
Zengl_SRC/src/zgl_application.pas

@@ -40,6 +40,7 @@ uses
   {$ENDIF}
   {$ENDIF}
   {$IfDef MAC_COCOA}
   {$IfDef MAC_COCOA}
   CocoaAll,
   CocoaAll,
+  MacOSAll
   {$ENDIF}
   {$ENDIF}
   {$IFDEF iOS}
   {$IFDEF iOS}
   iPhoneAll, CFRunLoop, CGGeometry, CFBase, CFString
   iPhoneAll, CFRunLoop, CGGeometry, CFBase, CFString
@@ -1103,7 +1104,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;