Graph: options for depth colours and dot sizes

Client/Settings.py

@@ -120,6 +120,10 @@ def ShowSettingsDialog(TheApp: App, OnSaved: Callable[[bool], None], StartCatego
     # Graph.
     GraphDirectoriesSwitch = ft.Switch(label="Show directories (off: only files and the links between them)",
                                        value=Config.GraphShowDirectories)
+    ColourByDepthSwitch = ft.Switch(label="Colour directories by depth (off: all purple)",
+                                    value=Config.GraphColourByDepth)
+    ShrinkByDepthSwitch = ft.Switch(label="Smaller directory dots the deeper they are",
+                                    value=Config.GraphShrinkByDepth)
     PanButtonPicker = ft.RadioGroup(
         ft.Column([
             ft.Radio(value="Right", label="Right (left-click opens a dot)"),
@@ -217,9 +221,11 @@ def ShowSettingsDialog(TheApp: App, OnSaved: Callable[[bool], None], StartCatego
             OwnAppearance,
         ], spacing=12, scroll=ft.ScrollMode.AUTO),
         "Graph": ft.Column([
-            _Note("The graph view (Ctrl+G): directories in the heading colours by depth, files white, "
+            _Note("The graph view (Ctrl+G): directories purple or in the heading colours by depth, files white, "
                   "joined to their directory and to the files that reference them."),
             GraphDirectoriesSwitch,
+            ColourByDepthSwitch,
+            ShrinkByDepthSwitch,
             ft.Divider(height=1, color=Palette.Surface1),
             ft.Text("Pan with mouse button"),
             PanButtonPicker,
@@ -261,6 +267,8 @@ def ShowSettingsDialog(TheApp: App, OnSaved: Callable[[bool], None], StartCatego
         Config.ShowFilesInTree = TreeFilesSwitch.value
         Config.MarkdownEditing = MarkdownEditingPicker.value or Config.MarkdownEditing
         Config.GraphShowDirectories = GraphDirectoriesSwitch.value
+        Config.GraphColourByDepth = ColourByDepthSwitch.value
+        Config.GraphShrinkByDepth = ShrinkByDepthSwitch.value
         Config.GraphPanButton = PanButtonPicker.value or Config.GraphPanButton
         Config.FontSize = _ReadInt(FontSizeField, Config.FontSize, 8, 32)
         Config.Mode = ModePicker.value or Config.Mode