hedgewars/uStore.pas
branch0.9.21
changeset 10735 42af3bfc832c
parent 10644 3b8290381fcb
child 10869 f23763bbac1b
equal deleted inserted replaced
10733:b22c57f45e86 10735:42af3bfc832c
   609         end;
   609         end;
   610 
   610 
   611     // loading failed
   611     // loading failed
   612     if tmpsurf = nil then
   612     if tmpsurf = nil then
   613         begin
   613         begin
   614 
       
   615         // anounce that loading failed
       
   616         OutError(msgFailed, false);
       
   617 
       
   618         // output sdl error if loading failed when data source was available
   614         // output sdl error if loading failed when data source was available
   619         if rwops <> nil then
   615         if rwops <> nil then
   620             begin
   616             begin
       
   617             // anounce that loading failed
       
   618             OutError(msgFailed, false);
       
   619 
   621             SDLTry(false, (imageFlags and ifCritical) <> 0);
   620             SDLTry(false, (imageFlags and ifCritical) <> 0);
   622             // rwops was already freed by IMG_Load_RW
   621             // rwops was already freed by IMG_Load_RW
   623             rwops:= nil;
   622             rwops:= nil;
   624             end;
   623             end else
       
   624             OutError(msgFailed, (imageFlags and ifCritical) <> 0);
   625         exit;
   625         exit;
   626         end;
   626         end;
   627 
   627 
   628     if ((imageFlags and ifIgnoreCaps) = 0) and ((tmpsurf^.w > MaxTextureSize) or (tmpsurf^.h > MaxTextureSize)) then
   628     if ((imageFlags and ifIgnoreCaps) = 0) and ((tmpsurf^.w > MaxTextureSize) or (tmpsurf^.h > MaxTextureSize)) then
   629         begin
   629         begin