Changeset 530 for trunk/LocalPlayer/Wonders.pas

Timestamp:

Feb 24, 2024, 8:04:26 PM (9 months ago)

Author:

chronos

Message:

• Modified: Use BitBltBitmap instead of BitBltCanvas if possible.

File:

• trunk/LocalPlayer/Wonders.pas (modified) (1 diff)

trunk/LocalPlayer/Wonders.pas

@@ -235 +235 @@
         WonderDestroyed: begin
           HaveWonder := True;
-          BitBltCanvas(Offscreen.Canvas,
+          BitBltBitmap(Offscreen,
             Center.X - xSizeBig div 2 + RingPosition[I].X,
             Center.Y - ySizeBig div 2 + RingPosition[I].Y, xSizeBig,
-            ySizeBig, BigImp.Canvas, 0, (SystemIconLines + 3) *
+            ySizeBig, BigImp, 0, (SystemIconLines + 3) *
             ySizeBig);
         end;
         else begin
           HaveWonder := True;
-          BitBltCanvas(Offscreen.Canvas,
+          BitBltBitmap(Offscreen,
             Center.X - xSizeBig div 2 + RingPosition[I].X,
             Center.Y - ySizeBig div 2 + RingPosition[I].Y, xSizeBig, ySizeBig,
-            BigImp.Canvas, (I mod 7) * xSizeBig,
+            BigImp, (I mod 7) * xSizeBig,
             (I div 7 + SystemIconLines) * ySizeBig);
         end;