diff --git a/source/main.dfm b/source/main.dfm index 35b5f4ce..5d23a0a3 100644 --- a/source/main.dfm +++ b/source/main.dfm @@ -2735,7 +2735,7 @@ object MainForm: TMainForm object actFavoriteObjectsOnly: TAction Category = 'Various' AutoCheck = True - Caption = 'actFavoriteObjectsOnly' + Caption = 'Show only favorites' Hint = 'Show only favorite tree items' ImageIndex = 112 OnExecute = actFavoriteObjectsOnlyExecute @@ -9065,6 +9065,10 @@ object MainForm: TMainForm object menuSelectBGColor: TMenuItem Action = actSelectTreeBackground end + object actFavoriteObjectsOnly1: TMenuItem + Action = actFavoriteObjectsOnly + AutoCheck = True + end end object menuPrint: TMenuItem Action = actPrintList diff --git a/source/main.pas b/source/main.pas index abfe4d73..a7f3b5ff 100644 --- a/source/main.pas +++ b/source/main.pas @@ -578,6 +578,7 @@ type btnHelp: TToolButton; lblDonate: TLabel; lblUpdateAvailable: TLabel; + actFavoriteObjectsOnly1: TMenuItem; procedure actCreateDBObjectExecute(Sender: TObject); procedure menuConnectionsPopup(Sender: TObject); procedure actExitApplicationExecute(Sender: TObject);