hedgewars/uStore.pas
changeset 2600 7b21daf84933
parent 2599 c7153d2348f3
child 2601 21ed7cec1fa2
equal deleted inserted replaced
2599:c7153d2348f3 2600:7b21daf84933
  1005 		if (tmpsurf <> nil) then
  1005 		if (tmpsurf <> nil) then
  1006 		begin
  1006 		begin
  1007 			if ((tmpsurf^.w > MaxTextureSize) or (tmpsurf^.h > MaxTextureSize)) then
  1007 			if ((tmpsurf^.w > MaxTextureSize) or (tmpsurf^.h > MaxTextureSize)) then
  1008 			begin
  1008 			begin
  1009 				SDL_FreeSurface(tmpsurf);
  1009 				SDL_FreeSurface(tmpsurf);
  1010 				AddFileLog('Image too big, trying to load lowres version: ' + s);
  1010 				WriteLnToConsole('Image too big, trying to load lowres version: ' + s);
  1011 				tmpsurf:= IMG_Load(Str2PChar(s))
  1011 				tmpsurf:= IMG_Load(Str2PChar(s))
  1012 			end;
  1012 			end;
  1013 		end
  1013 		end
  1014 		else
  1014 		else
  1015 		begin
  1015 		begin
  1016 			AddFileLog('Image not found, trying to load lowres version: ' + s);
  1016 			WriteLnToConsole('Image not found, trying to load lowres version: ' + s);
  1017 			tmpsurf:= IMG_Load(Str2PChar(s))
  1017 			tmpsurf:= IMG_Load(Str2PChar(s))
  1018 		end;
  1018 		end;
  1019 	end;
  1019 	end;
  1020 
  1020 
  1021 if tmpsurf = nil then
  1021 if tmpsurf = nil then