hedgewars/uLandObjects.pas
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