hedgewars/uStore.pas
changeset 4911 5d10bd725efe
parent 4901 d1e2d82d9ccc
child 4920 bc3c077e15a2
equal deleted inserted replaced
4910:9dcb2e83b24f 4911:5d10bd725efe
   920         SDL_FreeSurface(SDLPrimSurface);
   920         SDL_FreeSurface(SDLPrimSurface);
   921         SDLPrimSurface:= nil;
   921         SDLPrimSurface:= nil;
   922     end;
   922     end;
   923 
   923 
   924 {$IFDEF SDL13}
   924 {$IFDEF SDL13}
       
   925 {$IFDEF IPHONEOS}
       
   926     // ipad can have 2 monitors, display sdl window on the second one
       
   927     SDL_SelectVideoDisplay(SDL_GetNumVideoDisplays() - 1);
       
   928 {$ENDIF}
       
   929 
   925     if SDLwindow = nil then
   930     if SDLwindow = nil then
   926     begin
   931     begin
   927         SDLwindow:= SDL_CreateWindow('Hedgewars', 0, 0, cScreenWidth, cScreenHeight,
   932         SDLwindow:= SDL_CreateWindow('Hedgewars', 0, 0, cScreenWidth, cScreenHeight,
   928                         SDL_WINDOW_OPENGL or SDL_WINDOW_SHOWN
   933                         SDL_WINDOW_OPENGL or SDL_WINDOW_SHOWN
   929                         {$IFDEF IPHONEOS} or SDL_WINDOW_BORDERLESS{$ENDIF});
   934                         {$IFDEF IPHONEOS} or SDL_WINDOW_BORDERLESS{$ENDIF});