Index: CHANGES.txt ================================================================== --- CHANGES.txt +++ CHANGES.txt @@ -1,10 +1,11 @@ Version [next] [Feature] Support for hdtbl. [Changed] Build extras and build preprocessors are now listed in a multi-select box. [Improved] If no error has occurred, the log file will contain a success message. +[Improved] The default font looked gross on macOS. This should be better now. ------------------------------- Version 0.12.0 2022-03-14 Index: src/unit1.lfm ================================================================== --- src/unit1.lfm +++ src/unit1.lfm @@ -1,21 +1,21 @@ object MainForm: TMainForm - Left = 2515 + Left = 1073 Height = 692 Top = 99 Width = 847 Caption = 'groffstudio' ClientHeight = 692 ClientWidth = 847 DefaultMonitor = dmPrimary OnClose = FormClose OnCreate = FormCreate - LCLVersion = '2.3.0.0' + LCLVersion = '3.0.0.3' object MainStatusBar: TStatusBar Left = 0 - Height = 23 - Top = 669 + Height = 18 + Top = 674 Width = 847 Panels = < item Text = 'file name with save status' Width = 200 @@ -40,40 +40,40 @@ Style = tsFlatButtons TabIndex = 0 TabOrder = 1 object tsEdit: TTabSheet Caption = 'edit a groff document' - ClientHeight = 631 - ClientWidth = 819 + ClientHeight = 626 + ClientWidth = 821 ParentFont = False object GroupBox1: TGroupBox Left = 10 Height = 66 - Top = 560 - Width = 799 + Top = 555 + Width = 801 Align = alBottom BorderSpacing.Left = 10 BorderSpacing.Right = 10 BorderSpacing.Bottom = 5 Caption = 'build' - ClientHeight = 46 - ClientWidth = 795 + ClientHeight = 39 + ClientWidth = 791 TabOrder = 0 object Label1: TLabel Left = 184 - Height = 15 + Height = 16 Top = -4 - Width = 72 + Width = 83 Caption = 'macro to use:' ParentColor = False end object cmbMacro: TComboBox Left = 184 - Height = 23 + Height = 20 Top = 16 Width = 100 - ItemHeight = 15 + ItemHeight = 19 Items.Strings = ( 'man' 'me' 'mm' 'mom' @@ -81,50 +81,50 @@ ) TabOrder = 0 Text = '[ select ]' end object Label2: TLabel - Left = 672 - Height = 15 + Left = 659 + Height = 16 Top = -4 - Width = 78 + Width = 87 Anchors = [akTop, akRight] Caption = 'output format:' ParentColor = False end object rdPs: TRadioButton - Left = 673 - Height = 19 + Left = 655 + Height = 18 Top = 16 - Width = 71 + Width = 85 Anchors = [akTop, akRight] Caption = 'PostScript' TabOrder = 1 end object rdPdf: TRadioButton - Left = 753 - Height = 19 + Left = 738 + Height = 18 Top = 16 - Width = 39 + Width = 50 Anchors = [akTop, akRight] Caption = 'PDF' TabOrder = 2 end object Label3: TLabel - Left = 419 - Height = 15 + Left = 400 + Height = 16 Top = -4 - Width = 76 + Width = 91 Anchors = [akTop, akRight] Caption = 'preprocessors:' ParentColor = False end object Label4: TLabel - Left = 544 - Height = 15 + Left = 533 + Height = 16 Top = -4 - Width = 34 + Width = 41 Anchors = [akTop, akRight] Caption = 'extras:' ParentColor = False end object btnBuild: TButton @@ -134,27 +134,27 @@ Width = 75 Caption = 'build' Color = clLime Enabled = False Font.Style = [fsBold, fsItalic] - OnClick = btnBuildClick ParentFont = False TabOrder = 3 + OnClick = btnBuildClick end object chkLogFile: TCheckBox Left = 80 - Height = 19 + Height = 18 Hint = 'If enabled, a log file containing the groff output will be placed alongside the source document.' Top = 16 - Width = 68 + Width = 79 Caption = 'log to file' Enabled = False TabOrder = 4 end object chkBoxPreprocessors: TCheckComboBox - Left = 419 - Height = 24 + Left = 415 + Height = 20 Top = 15 Width = 100 Anchors = [akTop, akRight] ItemHeight = 16 Items.Strings = ( @@ -164,76 +164,77 @@ 'pic' 'refer' 'tbl' ) TabOrder = 5 + Text = '0' end object chkBoxExtras: TCheckComboBox - Left = 544 - Height = 24 + Left = 540 + Height = 20 Top = 15 Width = 100 Anchors = [akTop, akRight] ItemHeight = 16 Items.Strings = ( 'hdtbl' 'Pdfmark' ) TabOrder = 6 + Text = '0' end end object btnSaveGroff: TButton - Left = 734 + Left = 736 Height = 28 - Top = 528 + Top = 523 Width = 75 Anchors = [akRight, akBottom] Caption = 'save' Font.Style = [fsBold] - OnClick = btnSaveGroffClick ParentFont = False TabOrder = 1 + OnClick = btnSaveGroffClick end object btnLoadGroff: TButton - Left = 653 + Left = 655 Height = 28 - Top = 528 + Top = 523 Width = 75 Anchors = [akRight, akBottom] Caption = 'load' Font.Style = [fsBold] - OnClick = btnLoadGroffClick ParentFont = False TabOrder = 2 + OnClick = btnLoadGroffClick end object Label5: TLabel - Left = 197 - Height = 15 - Top = 541 - Width = 438 + Left = 128 + Height = 16 + Top = 535 + Width = 509 Anchors = [akRight, akBottom] Caption = 'note that everything build-related will be stored in the document''s storage directory' Font.Color = clBlue Font.Style = [fsItalic] ParentColor = False ParentFont = False end inline SynEdit1: TSynEdit Left = 10 - Height = 523 + Height = 518 Top = 0 - Width = 799 + Width = 801 Anchors = [akTop, akLeft, akRight, akBottom] Font.CharSet = 4 Font.Height = -13 - Font.Name = 'Consolas' Font.Pitch = fpFixed Font.Quality = fqCleartypeNatural ParentColor = False ParentFont = False TabOrder = 3 - Gutter.Width = 55 + Gutter.Width = 67 Gutter.MouseActions = <> RightGutter.Width = 0 RightGutter.MouseActions = <> Keystrokes = < item @@ -687,11 +688,11 @@ object SynGutterMarks1: TSynGutterMarks Width = 24 MouseActions = <> end object SynGutterLineNumber1: TSynGutterLineNumber - Width = 15 + Width = 27 MouseActions = <> MarkupInfo.Background = clBtnFace MarkupInfo.Foreground = clNone DigitCount = 2 ShowOnlyLineNumbersMultiplesOf = 1 @@ -720,128 +721,128 @@ end end end object tsSettings: TTabSheet Caption = 'groffstudio settings' - ClientHeight = 631 - ClientWidth = 819 + ClientHeight = 626 + ClientWidth = 821 object chkAutoSaveBuildSettings: TCheckBox Left = 0 - Height = 19 + Height = 18 Top = 16 - Width = 309 + Width = 341 Caption = 'save and restore the chosen build settings for next time' TabOrder = 0 end object btnSaveSettings: TButton - Left = 730 + Left = 732 Height = 25 - Top = 600 + Top = 595 Width = 91 Anchors = [akRight, akBottom] Caption = 'save settings' - OnClick = btnSaveSettingsClick TabOrder = 1 + OnClick = btnSaveSettingsClick end object Label14: TLabel Left = 0 - Height = 15 + Height = 16 Top = 80 - Width = 129 + Width = 150 Caption = 'yes, that''s all for now. :-)' ParentColor = False end object chkUpdateCheckOnStart: TCheckBox Left = 0 - Height = 19 + Height = 18 Top = 40 - Width = 169 + Width = 190 Caption = 'check for updates on startup' TabOrder = 2 end end object tsGroff: TTabSheet Caption = 'groff version' - ClientHeight = 631 - ClientWidth = 819 + ClientHeight = 626 + ClientWidth = 821 object GroupBox2: TGroupBox Left = 20 Height = 57 - Top = 566 - Width = 779 + Top = 561 + Width = 781 Align = alBottom BorderSpacing.Left = 20 BorderSpacing.Right = 20 BorderSpacing.Bottom = 8 Caption = 'groff for Windows' - ClientHeight = 37 - ClientWidth = 775 + ClientHeight = 30 + ClientWidth = 771 TabOrder = 0 object Label6: TLabel Left = 8 - Height = 15 + Height = 16 Top = 8 - Width = 108 + Width = 125 Caption = 'latest version online:' ParentColor = False end object edtOnlineGroffVersionWindows: TEdit Left = 136 - Height = 15 + Height = 17 Top = 8 - Width = 542 + Width = 538 Anchors = [akTop, akLeft, akRight] BorderStyle = bsNone Enabled = False TabOrder = 0 Text = 'fetching ...' end object btnDownloadGroffWindows: TButton - Left = 686 + Left = 682 Height = 25 Top = 5 Width = 80 Anchors = [akTop, akRight] Caption = 'download it' - OnClick = btnDownloadGroffWindowsClick TabOrder = 1 + OnClick = btnDownloadGroffWindowsClick end end object Label7: TLabel Left = 8 - Height = 30 + Height = 32 Top = 8 - Width = 807 + Width = 809 Anchors = [akTop, akLeft, akRight] Caption = 'as you might guess, groffstudio requires a working installation of groff. this page performs the basic checks for you. note that on windows, everything is harder than it should. :-)' Constraints.MaxHeight = 582 ParentColor = False WordWrap = True end object Label9: TLabel Left = 8 - Height = 15 + Height = 16 Top = 56 - Width = 70 + Width = 81 Caption = 'groff version:' ParentColor = False end object edtGroffInstalledVersion: TEdit Left = 144 - Height = 15 + Height = 17 Top = 56 - Width = 671 + Width = 673 Anchors = [akTop, akLeft, akRight] BorderStyle = bsNone Enabled = False TabOrder = 1 end object lblTroffCommandNotFound: TLabel Left = 8 - Height = 45 + Height = 48 Top = 112 - Width = 806 + Width = 808 Anchors = [akTop, akLeft, akRight] Caption = 'groff was not found. in order to use groffstudio, you absolutely need groff in your PATH variable. on unix and unix-like systems, you''ll need to edit the $PATH variable. on windows, i warmly recommend the Rapid Environment Editor for that.'#13#10'please exit groffstudio at your nearest convenience and adjust your PATH variables. then try again.' Font.Color = clRed ParentColor = False ParentFont = False @@ -848,95 +849,95 @@ Visible = False WordWrap = True end object edtGroffstudioInstalledVersion: TEdit Left = 144 - Height = 15 + Height = 17 Top = 77 - Width = 671 + Width = 673 Anchors = [akTop, akLeft, akRight] BorderStyle = bsNone Enabled = False TabOrder = 2 end object Label10: TLabel Left = 8 - Height = 15 + Height = 16 Top = 77 - Width = 103 + Width = 118 Caption = 'groffstudio version:' ParentColor = False end end object tsAbout: TTabSheet Caption = 'about groffstudio' - ClientHeight = 631 - ClientWidth = 819 + ClientHeight = 626 + ClientWidth = 821 object lblAboutProductName: TLabel Left = 0 - Height = 61 + Height = 53 Top = 16 - Width = 315 + Width = 297 Caption = 'groffstudio x.y.z' Font.Color = clBlue Font.Height = -45 ParentColor = False ParentFont = False end object Label8: TLabel Left = 20 - Height = 15 + Height = 16 Top = 80 - Width = 217 + Width = 246 Caption = 'brought to you by tux0r and contributors' ParentColor = False end object Label11: TLabel Left = 0 - Height = 15 + Height = 16 Top = 128 - Width = 45 + Width = 53 Caption = 'Website:' Font.Style = [fsItalic] ParentColor = False ParentFont = False end object Label12: TLabel Left = 0 - Height = 15 + Height = 16 Top = 152 - Width = 57 + Width = 69 Caption = 'Repository:' Font.Style = [fsItalic] ParentColor = False ParentFont = False end object Label13: TLabel Left = 0 - Height = 15 + Height = 16 Top = 176 - Width = 99 + Width = 119 Caption = 'Repository (mirror):' Font.Style = [fsItalic] ParentColor = False ParentFont = False end object mLicense: TMemo Left = 0 Height = 418 Top = 216 - Width = 826 + Width = 828 Anchors = [akTop, akLeft, akRight] ScrollBars = ssAutoBoth TabOrder = 0 end object lblWebsite: TLabel Cursor = crHandPoint Left = 120 - Height = 15 + Height = 16 Top = 128 - Width = 99 + Width = 113 Caption = 'groff.tuxproject.de' Font.Color = clBlue Font.Style = [fsUnderline] ParentColor = False ParentFont = False @@ -943,13 +944,13 @@ OnClick = lblWebsiteClick end object lblFossilRepo: TLabel Cursor = crHandPoint Left = 120 - Height = 15 + Height = 16 Top = 152 - Width = 121 + Width = 140 Caption = 'code.rosaelefanten.org' Font.Color = clBlue Font.Style = [fsUnderline] ParentColor = False ParentFont = False @@ -956,13 +957,13 @@ OnClick = lblFossilRepoClick end object lblGithubRepo: TLabel Cursor = crHandPoint Left = 120 - Height = 15 + Height = 16 Top = 176 - Width = 62 + Width = 68 Caption = 'github.com' Font.Color = clBlue Font.Style = [fsUnderline] ParentColor = False ParentFont = False