hedgewars/uStore.pas
changeset 5686 3f2e6ec7719a
parent 5670 e01f0b6f1969
child 5696 972bf04d4a79
equal deleted inserted replaced
5685:f5518fbcd019 5686:3f2e6ec7719a
  1004 
  1004 
  1005     SDL_SetHint('SDL_IOS_ORIENTATIONS','LandscapeLeft LandscapeRight');
  1005     SDL_SetHint('SDL_IOS_ORIENTATIONS','LandscapeLeft LandscapeRight');
  1006     flags:= flags or SDL_WINDOW_BORDERLESS or SDL_WINDOW_RESIZABLE;
  1006     flags:= flags or SDL_WINDOW_BORDERLESS or SDL_WINDOW_RESIZABLE;
  1007 {$ENDIF}
  1007 {$ENDIF}
  1008 
  1008 
  1009     SDLwindow:= SDL_CreateWindow('Hedgewars', x, y, cScreenWidth, cScreenHeight, flags);
  1009     if cFullScreen then SDLwindow:= SDL_CreateWindow('Hedgewars', x, y, cOrigScreenWidth, cOrigScreenHeight, flags);
       
  1010     else SDLwindow:= SDL_CreateWindow('Hedgewars', x, y, cScreenWidth, cScreenHeight, flags);
  1010     SDLTry(SDLwindow <> nil, true);
  1011     SDLTry(SDLwindow <> nil, true);
  1011 {$ELSE}
  1012 {$ELSE}
  1012     flags:= SDL_OPENGL or SDL_RESIZABLE;
  1013     flags:= SDL_OPENGL or SDL_RESIZABLE;
  1013     if cFullScreen then
  1014     if cFullScreen then
  1014         flags:= flags or SDL_FULLSCREEN;
  1015         flags:= flags or SDL_FULLSCREEN;