diff -r 0ce8aad17c24 -r 6b2c87490f0a hedgewars/uStore.pas --- a/hedgewars/uStore.pas Tue Oct 09 11:28:07 2018 -0400 +++ b/hedgewars/uStore.pas Tue Oct 09 12:54:40 2018 -0400 @@ -774,7 +774,6 @@ key, value, l, temp: shortstring; color, tempColor: Longword; clanID, tempClanID: byte; - conversionSuccess: boolean; begin if cOnlyStats then exit; @@ -787,7 +786,6 @@ while (not pfsEOF(f)) and (l <> '[colors]') do pfsReadLn(f, l); - conversionSuccess:= false; while (not pfsEOF(f)) and (l <> '') do begin pfsReadLn(f, l); @@ -803,11 +801,8 @@ if temp = 'color' then begin temp:= copy(key, 6, length(key) - 5); - tempClanID:= StrToInt(temp, conversionSuccess); - if conversionSuccess then - clanID:= tempClanID - else - continue; + tempClanID:= StrToInt(temp); + clanID:= tempClanID end else continue; @@ -822,11 +817,8 @@ if value[1] <> '#' then continue; temp:= copy(value, 2, length(value) - 1); - tempColor:= StrToInt('0x'+temp, conversionSuccess); - if conversionSuccess then - color:= tempColor - else - continue; + tempColor:= StrToInt('0x'+temp); + color:= tempColor end; if clanID <= cClanColors then