Changeset 28 for trunk/LocalPlayer/Help.pas

Timestamp:

Jan 8, 2017, 7:14:56 PM (7 years ago)

Author:

chronos

Message:

• Fixed: Drawing using ScanLine require to use BeginUpdate and EndUpdate.

File:

• trunk/LocalPlayer/Help.pas (modified) (2 diffs)

trunk/LocalPlayer/Help.pas

@@ -375 +375 @@
       (SystemIconLines + woEiffel div 7) * ySizeBig + dy];
 
+  BigImp.BeginUpdate;
+  Offscreen.BeginUpdate;
   xSrc := iix mod 7 * xSizeBig;
   ySrc := (iix div 7 + 1) * ySizeBig;
@@ -408 +410 @@
           PaintLine[x0 + x, 1] := PaintLine[x0 + x, 1] * sum shr 22;
           PaintLine[x0 + x, 2] := PaintLine[x0 + x, 2] * sum shr 22;
-        end
-      end
+        end;
+      end;
     end;
+  Offscreen.EndUpdate;
+  BigImp.EndUpdate;
 end;