Changeset 176 for trunk/Forms/FormSourceCode.lfm

Timestamp:

Aug 21, 2024, 11:30:27 AM (4 weeks ago)

Author:

chronos

Message:

• Modified: Use monospace font.
• Modified: Do not extra scale controls dimensions.

File:

• trunk/Forms/FormSourceCode.lfm (modified) (3 diffs)

trunk/Forms/FormSourceCode.lfm

@@ -17 +17 @@
     Width = 672
     Align = alClient
-    Font.Height = 13
-    Font.Name = 'Courier New'
+    Font.Height = 20
+    Font.Name = 'Liberation Mono'
     Font.Pitch = fpFixed
-    Font.Quality = fqNonAntialiased
+    Font.Quality = fqAntialiased
     ParentColor = False
     ParentFont = False
@@ -27 +27 @@
     OnKeyUp = MemoSourceKeyUp
     OnMouseDown = MemoSourceMouseDown
-    Gutter.Width = 76
+    Gutter.Width = 84
     Gutter.MouseActions = <>
     RightGutter.Width = 0
@@ -481 +481 @@
       end
       object SynGutterLineNumber1: TSynGutterLineNumber
-        Width = 17
+        Width = 25
         MouseActions = <>
         MarkupInfo.Background = clBtnFace