Changeset 40 for trunk/LocalPlayer/IsoEngine.pas

Timestamp:

Jan 9, 2017, 8:28:51 PM (7 years ago)

Author:

chronos

Message:

• Fixed: More bitmaps to solve black background problem.
• Fixed: Bad drawing of gradient lines.

File:

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

trunk/LocalPlayer/IsoEngine.pas

@@ -399 +399 @@
   Borders := TBitmap.Create;
   Borders.PixelFormat := pf24bit;
-  Borders.Width := xxt * 2;
-  Borders.Height := (yyt * 2) * nPl;
+  Borders.SetSize(xxt * 2,(yyt * 2) * nPl);
+  Borders.Canvas.FillRect(0, 0, Borders.Width, Borders.Height);
   BordersOK := 0;
 end;