DEADSOFTWARE

FlexUI: sdlstandalone fix
authorKetmar Dark <ketmar@ketmar.no-ip.org>
Mon, 2 Oct 2017 17:03:50 +0000 (20:03 +0300)
committerKetmar Dark <ketmar@ketmar.no-ip.org>
Mon, 2 Oct 2017 23:34:42 +0000 (02:34 +0300)
src/flexui/sdlstandalone.pas

index 11f52108333395c3dc19a2279b67b93add82dda3..6dd81c76203fdab15963a1b12c6dc77eb714ded5 100644 (file)
@@ -108,9 +108,10 @@ begin
   FillChar(ev, sizeof(ev), 0);
   while (SDL_PollEvent(@ev) > 0) do
   begin
-    if fuiOnSDLEvent(ev) then result := true;
+    fuiOnSDLEvent(ev);
     //if (ev.type_ = SDL_QUITEV) then exit;
   end;
+  if fuiQuitReceived then result := true;
 end;