hedgewars/uStore.pas
changeset 6639 2b29832557c2
parent 6624 e049b5bb0ad1
child 6674 4d3209a189ca
equal deleted inserted replaced
6638:4cb7c055dca1 6639:2b29832557c2
   301            (((cReducedQuality and rqKillFlakes) = 0) or (Theme = 'Snow') or (Theme = 'Christmas') or ((not (ii in [sprFlake, sprSDFlake])))) and
   301            (((cReducedQuality and rqKillFlakes) = 0) or (Theme = 'Snow') or (Theme = 'Christmas') or ((not (ii in [sprFlake, sprSDFlake])))) and
   302            ((cCloudsNumber > 0) or (ii <> sprCloud)) and
   302            ((cCloudsNumber > 0) or (ii <> sprCloud)) and
   303            ((vobCount > 0) or (ii <> sprFlake)) then
   303            ((vobCount > 0) or (ii <> sprFlake)) then
   304             begin
   304             begin
   305             if AltPath = ptNone then
   305             if AltPath = ptNone then
   306                 if ii in [sprHorizont, sprHorizontL, sprHorizontR, sprSky, sprSkyL, sprSkyR, sprChunk, sprFireButton] then // FIXME: hack
   306                 if ii in [sprHorizont, sprHorizontL, sprHorizontR, sprSky, sprSkyL, sprSkyR, sprChunk] then // FIXME: hack
   307                     begin
   307                     begin
   308                     if not reload then
   308                     if not reload then
   309                         begin
   309                         begin
   310                         tmpsurf:= LoadImage(UserPathz[Path] + '/' + FileName, ifAlpha or ifTransparent);
   310                         tmpsurf:= LoadImage(UserPathz[Path] + '/' + FileName, ifAlpha or ifTransparent);
   311                         if tmpsurf = nil then
   311                         if tmpsurf = nil then