hedgewars/uStore.pas
changeset 8309 edcfb5e43245
parent 8204 9a6030d96273
child 8330 aaefa587e277
child 8354 c25bee85d6f8
equal deleted inserted replaced
8308:cdf83bdf7b27 8309:edcfb5e43245
  1232         begin
  1232         begin
  1233     {$IFDEF WIN32}
  1233     {$IFDEF WIN32}
  1234         s:= SDL_getenv('SDL_VIDEO_CENTERED');
  1234         s:= SDL_getenv('SDL_VIDEO_CENTERED');
  1235         SDL_putenv('SDL_VIDEO_CENTERED=1');
  1235         SDL_putenv('SDL_VIDEO_CENTERED=1');
  1236     {$ENDIF}
  1236     {$ENDIF}
  1237         SDLPrimSurface:= SDL_SetVideoMode(cScreenWidth, cScreenHeight, cBits, flags);
  1237         SDLPrimSurface:= SDL_SetVideoMode(cScreenWidth, cScreenHeight, 0, flags);
  1238         SDLTry(SDLPrimSurface <> nil, true);
  1238         SDLTry(SDLPrimSurface <> nil, true);
  1239     {$IFDEF WIN32}SDL_putenv(str2pchar('SDL_VIDEO_CENTERED=' + s));{$ENDIF}
  1239     {$IFDEF WIN32}SDL_putenv(str2pchar('SDL_VIDEO_CENTERED=' + s));{$ENDIF}
  1240         end;
  1240         end;
  1241 {$ENDIF}
  1241 {$ENDIF}
  1242 
  1242