hedgewars/uStore.pas
changeset 3006 da6023c2745b
parent 2958 e6f7620da87e
child 3025 01682ec58eb0
equal deleted inserted replaced
3005:1ff835e9ce32 3006:da6023c2745b
  1232 var r: TSDL_Rect;
  1232 var r: TSDL_Rect;
  1233     texsurf: PSDL_Surface;
  1233     texsurf: PSDL_Surface;
  1234 begin
  1234 begin
  1235     if Step = 0 then
  1235     if Step = 0 then
  1236     begin
  1236     begin
  1237 {$IFDEF SDL_IMAGE_NEWER}
       
  1238         WriteToConsole('Init SDL_image... ');
       
  1239         SDLTry(IMG_Init(IMG_INIT_PNG) <> 0, true);
       
  1240         WriteLnToConsole(msgOK);
       
  1241 {$ENDIF}
       
  1242     
       
  1243         WriteToConsole(msgLoading + 'progress sprite: ');
  1237         WriteToConsole(msgLoading + 'progress sprite: ');
  1244         texsurf:= LoadImage(Pathz[ptGraphics] + '/Progress', ifCritical or ifTransparent);
  1238         texsurf:= LoadImage(Pathz[ptGraphics] + '/Progress', ifCritical or ifTransparent);
  1245 
  1239 
  1246         ProgrTex:= Surface2Tex(texsurf, false);
  1240         ProgrTex:= Surface2Tex(texsurf, false);
  1247         
  1241