Changeset 104

Timestamp:

Dec 27, 2014, 12:10:34 PM (10 years ago)

Author:

chronos

Message:

• Fixed: Hide Debug settings.
• Fixed: Remove previous cell links from map if they were disabled.

Location:

trunk

Files:

• Forms/UFormSettings.pas (modified) (2 diffs)
• UGame.pas (modified) (1 diff)
• xtactics.lpi (modified) (3 diffs)

trunk/Forms/UFormSettings.pas

@@ -66 +66 @@
 procedure TFormSettings.FormShow(Sender: TObject);
 begin
-
+  {$IFDEF DEBUG}
+  TabSheetDebug.TabVisible := True;
+  {$ELSE}
+  TabSheetDebug.TabVisible := False;
+  {$ENDIF}
 end;
 
@@ -79 +83 @@
   SpinEditX.Value := Core.ScaleDPI1.DPI.X;
   SpinEditY.Value := Core.ScaleDPI1.DPI.Y;
-  {$IFDEF DEBUG}
-  TabSheetDebug.Visible := True;
-  {$ELSE}
-  TabSheetDebug.Visible := False;
-  {$ENDIF}
 end;
 

trunk/UGame.pas

@@ -2891 +2891 @@
 
   // Build bridges
-
+  Map.CellLinks.Clear;
   if BridgeEnabled then begin
-    Map.CellLinks.Clear;
     BuildMapAreas;
     LastAreaCount := -1;

trunk/xtactics.lpi

@@ -18 +18 @@
       <StringTable ProductVersion=""/>
     </VersionInfo>
-    <MacroValues Count="2">
-      <Macro2 Name="LCLWidgetType" Value="qt"/>
+    <MacroValues Count="1">
+      <Macro1 Name="LCLWidgetType" Value="qt"/>
     </MacroValues>
     <BuildModes Count="2">
       <Item1 Name="Debug" Default="True"/>
       <Item2 Name="Release">
+        <MacroValues Count="1">
+          <Macro1 Name="LCLWidgetType" Value="qt"/>
+        </MacroValues>
         <CompilerOptions>
           <Version Value="11"/>
@@ -51 +54 @@
             <Debugging>
               <GenerateDebugInfo Value="False"/>
+              <StripSymbols Value="True"/>
             </Debugging>
             <LinkSmart Value="True"/>
@@ -61 +65 @@
         </CompilerOptions>
       </Item2>
-      <SharedMatrixOptions Count="2">
-        <Item1 ID="345389164333" Modes="Debug" Type="IDEMacro"/>
-        <Item2 ID="462723536445" Modes="Debug" Type="IDEMacro" MacroName="LCLWidgetType" Value="qt"/>
+      <SharedMatrixOptions Count="1">
+        <Item1 ID="462723536445" Modes="Debug,Release" Type="IDEMacro" MacroName="LCLWidgetType" Value="qt"/>
       </SharedMatrixOptions>
     </BuildModes>