Changeset 220 for trunk/Forms/UFormMain.pas

Timestamp:

Jun 10, 2018, 12:18:28 PM (6 years ago)

Author:

chronos

Message:

• Added: Allow to toggle Fog of war in debug mode from Debug menu.

File:

• trunk/Forms/UFormMain.pas (modified) (2 diffs)

trunk/Forms/UFormMain.pas

@@ -44 +44 @@
     MenuItem28: TMenuItem;
     MenuItem29: TMenuItem;
+    MenuItemDebug: TMenuItem;
+    MenuItem31: TMenuItem;
     MenuItem4: TMenuItem;
     MenuItemLoadRecent: TMenuItem;
@@ -149 +151 @@
   FormClient.ManualDock(PanelMain, nil, alClient);
   FormClient.Align := alClient;
+  {$IFDEF DEBUG}
+  MenuItemDebug.Visible := True;
+  MenuItemDebug.Enabled := True;
+  {$ELSE}
+  MenuItemDebug.Visible := False;
+  MenuItemDebug.Enabled := False;
+  {$ENDIF}
 end;