Condense dialogue controls & add info label

Add an information label explaining that Syntax Highlighter
preferences page must be used to set source code font size.

Author: delphidabbler

Src/FrDisplayPrefs.dfm

@@ -48,6 +48,19 @@ inherited DisplayPrefsFrame: TDisplayPrefsFrame
     Caption = 'Detail pane font si&ze: '
     FocusControl = cbDetailFontSize
   end
+  object lblHiliterInfo: TLabel
+    Left = 16
+    Top = 256
+    Width = 370
+    Height = 36
+    Caption = 
+      'To change the size of the source code font use the the Syntax Hi' +
+      'ghlighter options page.'
+    Color = clBtnFace
+    ParentColor = False
+    Transparent = True
+    WordWrap = True
+  end
   object cbOverviewTree: TComboBox
     Left = 192
     Top = 2

Src/FrDisplayPrefs.pas

@@ -39,6 +39,7 @@   TDisplayPrefsFrame = class(TPrefsBaseFrame)
     cbOverviewFontSize: TComboBox;
     lblDetailFontSize: TLabel;
     cbDetailFontSize: TComboBox;
+    lblHiliterInfo: TLabel;
     procedure chkHideEmptySectionsClick(Sender: TObject);
     procedure btnDefColoursClick(Sender: TObject);
     procedure FontSizeChange(Sender: TObject);
@@ -152,7 +153,7 @@ procedure TDisplayPrefsFrame.ArrangeControls;
     [
       lblOverviewTree, chkHideEmptySections, chkSnippetsInNewTab,
       lblMainColour, lblUserColour, lblSourceBGColour, btnDefColours,
-      lblOverviewFontSize, lblDetailFontSize
+      lblOverviewFontSize, lblDetailFontSize, lblHiliterInfo
     ],
     0
   );
@@ -176,15 +177,15 @@ procedure TDisplayPrefsFrame.ArrangeControls;
     [lblMainColour, fMainColourBox]
   );
   TCtrlArranger.AlignVCentres(
-    TCtrlArranger.BottomOf([lblMainColour, fMainColourBox], 8),
+    TCtrlArranger.BottomOf([lblMainColour, fMainColourBox], 6),
     [lblUserColour, fUserColourBox]
   );
   TCtrlArranger.AlignVCentres(
-    TCtrlArranger.BottomOf([lblUserColour, fUserColourBox], 8),
+    TCtrlArranger.BottomOf([lblUserColour, fUserColourBox], 6),
     [lblSourceBGColour, fSourceBGColourBox]
   );
   TCtrlArranger.MoveBelow(
-    [lblSourceBGColour, fSourceBGColourBox], btnDefColours, 12
+    [lblSourceBGColour, fSourceBGColourBox], btnDefColours, 6
   );
   TCtrlArranger.AlignVCentres(
     TCtrlArranger.BottomOf(btnDefColours, 12),
@@ -194,6 +195,11 @@ procedure TDisplayPrefsFrame.ArrangeControls;
     TCtrlArranger.BottomOf(cbOverviewFontSize, 8),
     [lblDetailFontSize, cbDetailFontSize]
   );
+  TCtrlArranger.MoveBelow(
+    [lblDetailFontSize, cbDetailFontSize], lblHiliterInfo, 12
+  );
+  lblHiliterInfo.Width := Self.ClientWidth;
+  TCtrlArranger.SetLabelHeight(lblHiliterInfo);
   chkHideEmptySections.Width := Self.Width - 16;
   chkSnippetsInNewTab.Width := Self.Width - 16;
 end;