Index: src/groffstudio.lpi ================================================================== --- src/groffstudio.lpi +++ src/groffstudio.lpi @@ -24,10 +24,11 @@ + Index: src/unit1.lfm ================================================================== --- src/unit1.lfm +++ src/unit1.lfm @@ -6,10 +6,11 @@ Caption = 'groffstudio' ClientHeight = 692 ClientWidth = 847 DefaultMonitor = dmPrimary Position = poScreenCenter + LCLVersion = '4.99.0.0' OnClose = FormClose OnCreate = FormCreate object MainStatusBar: TStatusBar Left = 0 Height = 18 @@ -229,11 +230,11 @@ Font.Pitch = fpFixed Font.Quality = fqCleartypeNatural ParentColor = False ParentFont = False TabOrder = 3 - Gutter.Width = 57 + Gutter.Width = 55 Gutter.MouseActions = <> RightGutter.Width = 0 RightGutter.MouseActions = <> Keystrokes = < item @@ -701,11 +702,11 @@ MouseActions = <> MaxExtraMarksColums = 0 Options = [sgmoDeDuplicateMarksOnOverflow] end object SynGutterLineNumber1: TSynGutterLineNumber - Width = 17 + Width = 15 MouseActions = <> MarkupInfo.Background = clBtnFace MarkupInfo.Foreground = clNone DigitCount = 2 ShowOnlyLineNumbersMultiplesOf = 1 Index: src/unit1.pas ================================================================== --- src/unit1.pas +++ src/unit1.pas @@ -406,10 +406,11 @@ BuildWindow := TBuildStatusWindow.Create(Application); BuildWindow.Show; // Build the parameters: buildOpts := 'groff'; + preproc := ''; // - Macro: if LeftStr(cmbMacro.Text, 1) = 'm' then buildOpts := buildOpts + ' -' + cmbMacro.Text; // - Enforce UTF-8: