Changeset 104 for trunk/Forms/UFormSettings.pas

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.

File:

• trunk/Forms/UFormSettings.pas (modified) (2 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;