Changeset 268 for trunk/UGame.pas

Timestamp:

Jan 20, 2019, 9:32:16 PM (6 years ago)

Author:

chronos

Message:

• Added: New menu action show/hide map grid lines.
• Modified: Draw cell polygons without a gap so it can be drawn as solid surface without grid lines.

File:

• trunk/UGame.pas (modified) (2 diffs)

trunk/UGame.pas

@@ -23 +23 @@
     class procedure TextOutEx(Canvas: TCanvas; X,Y: Integer; const Text: string; MovePen: Boolean = True);
     class procedure PolygonEx(Canvas: TCanvas; const Points: array of Classes.TPoint; Winding: Boolean);
+    class procedure PolyLineEx(Canvas: TCanvas; const Points: array of Classes.TPoint);
   end;
 
@@ -180 +181 @@
 end;
 
+class procedure TCanvasEx.PolyLineEx(Canvas: TCanvas;
+  const Points: array of Classes.TPoint);
+begin
+  LCLIntf.Polyline(Canvas.Handle, @Points[0], Length(Points));
+end;
+
 { TGame }