浏览代码

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