Browse Source

* Remove += operators

git-svn-id: trunk@1990 -
daniel 19 years ago
parent
commit
d28e5e9318
1 changed files with 2 additions and 2 deletions
  1. 2 2
      packages/extra/ptc/dos/cga/cga.pp

+ 2 - 2
packages/extra/ptc/dos/cga/cga.pp

@@ -197,7 +197,7 @@ Begin
     End;
   End;
 
-  error += Round(Sqrt(mindist) * 290);
+  error:=error+round(Sqrt(mindist) * 290);
   Case dither Of
     0 : best2 := best1;
     1 : Begin
@@ -226,7 +226,7 @@ Begin
       b := s[0];
       g := s[1];
       r := s[2];
-      CGACalcError += precalcerror[back, pal]^[b Shr 4, g Shr 4, r Shr 4];
+      inc(CGACalcError,precalcerror[back, pal]^[b Shr 4, g Shr 4, r Shr 4]);
       Inc(s, 4{ + 4 + 4 + 4});
     End;
 //    Inc(s, 320*4*3);