Переглянути джерело

Update zgl_application.pas

Seenkao 4 роки тому
батько
коміт
bf1decc48b
1 змінених файлів з 1 додано та 1 видалено
  1. 1 1
      Zengl_SRC/src/zgl_application.pas

+ 1 - 1
Zengl_SRC/src/zgl_application.pas

@@ -1005,7 +1005,7 @@ begin
 eventLoop:
   ev := wndHandle.nextEventMatchingMask_untilDate_inMode_dequeue(NSAnyEventMask, nil, NSDefaultRunLoopMode, true);
   if ev = nil then
-  begin
+    exit;
   case ev.type_ of
     NSMouseMoved, NSLeftMouseDragged, NSRightMouseDragged, NSOtherMouseDragged:
       begin