Changeset 273 for trunk/UCore.pas

Timestamp:

Jan 30, 2019, 8:08:44 AM (6 years ago)

Author:

chronos

Message:

• Added: Show units shape to see in which cell units are placed.
• Fixed: Do not place units with zero power in zero power cells.
• Fixed: Better checks of cell power if cell is without unit.

File:

• trunk/UCore.pas (modified) (3 diffs)

trunk/UCore.pas

@@ -95 +95 @@
     DevelMode: Boolean;
     AnimationSpeed: Integer;
-    ShowCellGrid: Boolean;
+    CellGridVisible: Boolean;
+    UnitShapeVisible: Boolean;
     AutoSaveEnabled: Boolean;
     ReopenLastFile: Boolean;
@@ -203 +204 @@
   ScaleDPI1.AutoDetect := XMLConfig1.GetValue('DPIAuto', True);
   FormNewTabIndex := XMLConfig1.GetValue('FormNewTabIndex', 0);
-  ShowCellGrid := XMLConfig1.GetValue('ShowCellGrid', True);
+  CellGridVisible := XMLConfig1.GetValue('CellGridVisible', True);
+  UnitShapeVisible := XMLConfig1.GetValue('UnitShapeVisible', False);
 end;
 
@@ -219 +221 @@
   XMLConfig1.SetValue('DPIAuto', ScaleDPI1.AutoDetect);
   XMLConfig1.SetValue('FormNewTabIndex', FormNewTabIndex);
-  XMLConfig1.SetValue('ShowCellGrid', ShowCellGrid);
+  XMLConfig1.SetValue('CellGridVisible', CellGridVisible);
+  XMLConfig1.SetValue('UnitShapeVisible', UnitShapeVisible);
 end;