changeset 12102 | ebe87b6ed182 |
parent 11900 | 19cb0de79287 |
child 12173 | 666e18b1ca32 |
--- a/hedgewars/uLandObjects.pas Sun Nov 27 18:49:15 2016 +0100 +++ b/hedgewars/uLandObjects.pas Mon Nov 28 13:46:25 2016 -0500 @@ -575,7 +575,10 @@ i:= Pos(',', s); SDTint.g:= StrToInt(Trim(Copy(s, 1, Pred(i)))); Delete(s, 1, i); - SDTint.b:= StrToInt(Trim(s)); + i:= Pos(',', s); + SDTint.b:= StrToInt(Trim(Copy(s, 1, Pred(i)))); + Delete(s, 1, i); + SDTint.a:= StrToInt(Trim(s)); if GrayScale then begin