Skip to content

Commit

Permalink
Better phrases on the options menu
Browse files Browse the repository at this point in the history
Using more conventional phrases on the Options menu. Also added hints
explaining each option.
  • Loading branch information
rubiot committed May 28, 2019
1 parent 045e680 commit 9891f03
Show file tree
Hide file tree
Showing 7 changed files with 235 additions and 54 deletions.
60 changes: 35 additions & 25 deletions formprincipal.lfm
Original file line number Diff line number Diff line change
Expand Up @@ -4,7 +4,7 @@ object frmPrincipal: TfrmPrincipal
Top = 109
Width = 943
Caption = 'iBiblia'
ClientHeight = 658
ClientHeight = 661
ClientWidth = 943
KeyPreview = True
Menu = MainMenu1
Expand All @@ -14,12 +14,14 @@ object frmPrincipal: TfrmPrincipal
OnKeyPress = FormKeyPress
OnShow = FormShow
Position = poDesktopCenter
ShowHint = True
LCLVersion = '2.0.2.0'
object StatusBar1: TStatusBar
Left = 0
Height = 21
Top = 637
Height = 23
Top = 638
Width = 943
AutoHint = True
Panels = <>
end
object ToolBar1: TToolBar
Expand Down Expand Up @@ -96,23 +98,23 @@ object frmPrincipal: TfrmPrincipal
end
object Panel1: TPanel
Left = 0
Height = 592
Height = 593
Top = 33
Width = 943
Align = alBottom
Anchors = [akTop, akLeft, akRight, akBottom]
Caption = 'Panel1'
ClientHeight = 592
ClientHeight = 593
ClientWidth = 943
TabOrder = 2
object Panel2: TPanel
Left = 144
Height = 590
Height = 591
Top = 1
Width = 798
Align = alClient
Caption = 'Panel2'
ClientHeight = 590
ClientHeight = 591
ClientWidth = 798
TabOrder = 0
object ScrollBox1: TScrollBox
Expand Down Expand Up @@ -172,7 +174,7 @@ object frmPrincipal: TfrmPrincipal
AnchorSideTop.Control = Splitter4
AnchorSideTop.Side = asrBottom
Left = 1
Height = 113
Height = 114
Top = 357
Width = 796
HorzScrollBar.Page = 1
Expand Down Expand Up @@ -220,7 +222,7 @@ object frmPrincipal: TfrmPrincipal
object Panel3: TPanel
Left = 1
Height = 114
Top = 475
Top = 476
Width = 796
Align = alBottom
Caption = 'Panel3'
Expand All @@ -231,16 +233,16 @@ object frmPrincipal: TfrmPrincipal
Left = 1
Height = 112
Top = 1
Width = 650
Width = 680
Align = alClient
Enabled = False
TabOrder = 0
end
object RadioGroupStatus: TRadioGroup
Left = 651
Left = 681
Height = 112
Top = 1
Width = 144
Width = 114
Align = alRight
Anchors = [akRight, akBottom]
AutoFill = True
Expand All @@ -255,8 +257,8 @@ object frmPrincipal: TfrmPrincipal
ChildSizing.ShrinkVertical = crsScaleChilds
ChildSizing.Layout = cclTopToBottomThenLeftToRight
ChildSizing.ControlsPerLine = 4
ClientHeight = 93
ClientWidth = 140
ClientHeight = 92
ClientWidth = 110
ColumnLayout = clVerticalThenHorizontal
Enabled = False
ItemIndex = 0
Expand All @@ -274,7 +276,7 @@ object frmPrincipal: TfrmPrincipal
Cursor = crVSplit
Left = 1
Height = 5
Top = 470
Top = 471
Width = 796
Align = alBottom
Anchors = [akLeft, akBottom]
Expand All @@ -283,13 +285,13 @@ object frmPrincipal: TfrmPrincipal
end
object Splitter1: TSplitter
Left = 139
Height = 590
Height = 591
Top = 1
Width = 5
end
object TreeView1: TTreeView
Left = 1
Height = 590
Height = 591
Top = 1
Width = 138
Align = alLeft
Expand All @@ -303,7 +305,7 @@ object frmPrincipal: TfrmPrincipal
object ProgressBar1: TProgressBar
Left = 0
Height = 12
Top = 625
Top = 626
Width = 943
Align = alBottom
TabOrder = 3
Expand Down Expand Up @@ -383,56 +385,64 @@ object frmPrincipal: TfrmPrincipal
end
end
object MenuItemDictPopup: TMenuItem
Caption = 'Show dictionary popup on...'
Caption = 'Dictionary popup trigger...'
object MenuItemMouseHover: TMenuItem
Caption = 'Mouse hover'
Hint = 'Activate the popup dictionary whenever you hover the mouse pointer over a word'
OnClick = MenuItemPopupTriggerClick
end
object MenuItemAltMouseHover: TMenuItem
Caption = 'Alt + Mouse hover'
Hint = 'Activate the popup dictionary whenever you hover the mouse pointer over a word while holding the Alt key'
OnClick = MenuItemPopupTriggerClick
end
object MenuItemCtrlMouseHover: TMenuItem
Caption = 'Ctrl + Mouse hover'
Hint = 'Activate the popup dictionary whenever you hover the mouse pointer over a word while holding the Ctrl key'
OnClick = MenuItemPopupTriggerClick
end
end
object MenuItemStrongsCount: TMenuItem
Caption = 'Strongs count'
object MenuItemStrongsCountNone: TMenuItem
Caption = 'Hide'
Hint = 'Don''t show Strong''s count'
Hint = 'Don''t show any count'
OnClick = MenuItemStrongsCountClick
end
object MenuItemStrongsCountWords: TMenuItem
Caption = 'Count words'
Hint = 'Show a count of words having Strong''s tags'
Hint = 'Show a count of words having strong''s tags'
OnClick = MenuItemStrongsCountClick
end
object MenuItemStrongsCountStrongs: TMenuItem
Caption = 'Count Strong''s tags'
Hint = 'Show a count of Strong''s tags in verse'
Hint = 'Show a count of all strong''s tags in verse'
OnClick = MenuItemStrongsCountClick
end
end
object MenuItem22: TMenuItem
Caption = 'Automatically auto-associate verses'
Caption = 'Auto-associate unassociated verses'
Hint = 'Run the auto-association whenever you navigate to an unassociated verse'
OnClick = MenuItem22Click
end
object MenuItemSyncTheWord: TMenuItem
Caption = 'Sync theWord to iBiblia verse'
Hint = 'Keeps theWord synchronized to iBiblia''s current verse, and current word''s strong, morphology and lemma.'
OnClick = MenuItemSyncTheWordClick
end
object MenuItemSynciBiblia: TMenuItem
Caption = 'Sync iBiblia to theWord verse'
Hint = 'Keeps iBiblia synchronized to theWord''s current verse'
OnClick = MenuItemSynciBibliaClick
end
object MenuItemStrongNegrito: TMenuItem
Caption = 'Show words with strong tags in bold'
Caption = 'Words with strongs in bold'
Hint = 'Words with associated strong''s tags are displayed in bold font'
OnClick = MenuItemStrongNegritoClick
end
object MenuItemAlwaysOnTop: TMenuItem
Caption = 'Keep iBiblia always on top of other windows'
Caption = 'Always on top'
Hint = 'Keep iBiblia window always on top of other windows'
OnClick = MenuItemAlwaysOnTopClick
end
end
Expand Down
2 changes: 0 additions & 2 deletions formprincipal.pas
Original file line number Diff line number Diff line change
Expand Up @@ -670,8 +670,6 @@ procedure TFrmPrincipal.FormCreate(Sender: TObject);
end;

procedure TFrmPrincipal.FormDestroy(Sender: TObject);
var
m: TMenuItem;
begin
DescarregarMRU(MenuItemRecent);
opts.WriteInteger('leiaute', 'principal.largura', Width);
Expand Down
Binary file modified languages/iBiblia.en.mo
Binary file not shown.
85 changes: 73 additions & 12 deletions languages/iBiblia.en.po
Original file line number Diff line number Diff line change
Expand Up @@ -9,7 +9,7 @@ msgstr ""
"MIME-Version: 1.0\n"
"Content-Transfer-Encoding: 8bit\n"
"Language: en\n"
"X-Generator: Poedit 2.2.2\n"
"X-Generator: Poedit 2.2.3\n"

#: formexportar.sanalyticalconcordance
msgid "AnalyticalConcordance"
Expand Down Expand Up @@ -1037,8 +1037,14 @@ msgid "Options"
msgstr "Options"

#: tfrmprincipal.menuitem22.caption
msgid "Automatically auto-associate verses"
msgstr "Automatically auto-associate verses"
#| msgid "Auto-associate verses on navigation"
msgid "Auto-associate unassociated verses"
msgstr "Auto-associate unassociated verses"

#: tfrmprincipal.menuitem22.hint
#| msgid "Run the auto-association whenever you navigate to a verse with no associations"
msgid "Run the auto-association whenever you navigate to an unassociated verse"
msgstr "Run the auto-association whenever you navigate to an unassociated verse"

#: tfrmprincipal.menuitem23.caption
msgid "Language"
Expand All @@ -1056,17 +1062,31 @@ msgstr "About..."
msgid "Alt + Mouse hover"
msgstr "Alt + Mouse hover"

#: tfrmprincipal.menuitemaltmousehover.hint
msgid "Activate the popup dictionary whenever you hover the mouse pointer over a word while holding the Alt key"
msgstr "Activate the popup dictionary whenever you hover the mouse pointer over a word while holding the Alt key"

#: tfrmprincipal.menuitemalwaysontop.caption
msgid "Keep iBiblia always on top of other windows"
msgstr "Keep iBiblia always on top of other windows"
#| msgid "Keep iBiblia always on top of other windows"
msgid "Always on top"
msgstr "Always on top"

#: tfrmprincipal.menuitemalwaysontop.hint
msgid "Keep iBiblia window always on top of other windows"
msgstr "Keep iBiblia window always on top of other windows"

#: tfrmprincipal.menuitemctrlmousehover.caption
msgid "Ctrl + Mouse hover"
msgstr "Ctrl + Mouse hover"

#: tfrmprincipal.menuitemctrlmousehover.hint
msgid "Activate the popup dictionary whenever you hover the mouse pointer over a word while holding the Ctrl key"
msgstr "Activate the popup dictionary whenever you hover the mouse pointer over a word while holding the Ctrl key"

#: tfrmprincipal.menuitemdictpopup.caption
msgid "Show dictionary popup on..."
msgstr "Show dictionary popup on..."
#| msgid "Activate dictionary popup when..."
msgid "Dictionary popup trigger..."
msgstr "Dictionary popup trigger..."

#: tfrmprincipal.menuitemlangen.caption
msgctxt "tfrmprincipal.menuitemlangen.caption"
Expand All @@ -1082,27 +1102,68 @@ msgstr "Português"
msgid "Mouse hover"
msgstr "Mouse hover"

#: tfrmprincipal.menuitemmousehover.hint
msgid "Activate the popup dictionary whenever you hover the mouse pointer over a word"
msgstr "Activate the popup dictionary whenever you hover the mouse pointer over a word"

#: tfrmprincipal.menuitemrecent.caption
msgid "Open recent"
msgstr "Open recent"

#: tfrmprincipal.menuitemstrongnegrito.caption
msgid "Show words with strong tags in bold"
msgstr "Show words with strong tags in bold"
#| msgid "Show words with strong tags in bold"
msgid "Words with strongs in bold"
msgstr "Words with strongs in bold"

#: tfrmprincipal.menuitemstrongnegrito.hint
msgid "Words with associated strong's tags are displayed in bold font"
msgstr "Words with associated strong's tags are displayed in bold font"

#: tfrmprincipal.menuitemstrongscount.caption
#| msgid "Show count for words having strong tags"
msgid "Show strongs count"
msgstr "Show strongs count"
#| msgid "Show strongs count"
msgid "Strongs count"
msgstr "Strongs count"

#: tfrmprincipal.menuitemstrongscountnone.caption
msgid "Hide"
msgstr "Hide"

#: tfrmprincipal.menuitemstrongscountnone.hint
msgid "Don't show any count"
msgstr "Don't show any count"

#: tfrmprincipal.menuitemstrongscountstrongs.caption
msgid "Count Strong's tags"
msgstr "Count Strong's tags"

#: tfrmprincipal.menuitemstrongscountstrongs.hint
msgid "Show a count of all strong's tags in verse"
msgstr "Show a count of all strong's tags in verse"

#: tfrmprincipal.menuitemstrongscountwords.caption
msgid "Count words"
msgstr "Count words"

#: tfrmprincipal.menuitemstrongscountwords.hint
msgid "Show a count of words having strong's tags"
msgstr "Show a count of words having strong's tags"

#: tfrmprincipal.menuitemsyncibiblia.caption
msgid "Sync iBiblia to theWord verse"
msgstr "Sync iBiblia to theWord verse"

#: tfrmprincipal.menuitemsyncibiblia.hint
msgid "Keeps iBiblia synchronized to theWord's current verse"
msgstr "Keeps iBiblia synchronized to theWord's current verse"

#: tfrmprincipal.menuitemsynctheword.caption
msgid "Sync theWord to iBiblia verse"
msgstr "Sync theWord to iBiblia verse"

#: tfrmprincipal.menuitemsynctheword.hint
msgid "Keeps theWord synchronized to iBiblia's current verse, and current word's strong, morphology and lemma."
msgstr "Keeps theWord synchronized to iBiblia's current verse, and current word's strong, morphology and lemma."

#: tfrmprincipal.opendialog1.title
msgid "Open existing association project"
msgstr "Open existing association project"
Expand Down
Loading

0 comments on commit 9891f03

Please sign in to comment.