X-Git-Url: http://deadsoftware.ru/gitweb?a=blobdiff_plain;f=src%2Fflexui%2Fsdlstandalone.pas;h=3959b2a28d22e4b8577ac3a04fe3633a639c304b;hb=08b53e05935bfc8f5c8e6c18754fd3768917aa77;hp=11f52108333395c3dc19a2279b67b93add82dda3;hpb=26290d9816334b8377531cf8b3e58643444f4d04;p=d2df-sdl.git

diff --git a/src/flexui/sdlstandalone.pas b/src/flexui/sdlstandalone.pas
index 11f5210..3959b2a 100644
--- a/src/flexui/sdlstandalone.pas
+++ b/src/flexui/sdlstandalone.pas
@@ -70,6 +70,7 @@ begin
   //SDL_Quit();
   result := true;
   fuiWinActive := fuiWinActive;
+  SDL_StartTextInput();
 end;
 
 
@@ -108,9 +109,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;