From 49e340569cbf8da09c0fdb56fa55e959a9227b66 Mon Sep 17 00:00:00 2001 From: n7800 <14154601-n7800@users.noreply.gitlab.com> Date: Thu, 22 May 2025 06:00:32 +0500 Subject: [PATCH 1/3] IDE/Options: Add action for "Help" button in "Defines" dialog. Issue #41661 --- docs/IDEWindowHelpTree.xml | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/docs/IDEWindowHelpTree.xml b/docs/IDEWindowHelpTree.xml index be64a68196..bc1423ba3f 100644 --- a/docs/IDEWindowHelpTree.xml +++ b/docs/IDEWindowHelpTree.xml @@ -1,5 +1,5 @@ - + @@ -198,4 +198,5 @@ + From b963faf2174cbef40ff8fd657e4358672f7aa0e4 Mon Sep 17 00:00:00 2001 From: n7800 <14154601-n7800@users.noreply.gitlab.com> Date: Thu, 22 May 2025 06:00:33 +0500 Subject: [PATCH 2/3] IDE/Options: Add action for "Help" button in "All Compiler Options" dialog. Issue #41662 --- docs/IDEWindowHelpTree.xml | 3 ++- ide/allcompileroptions.lfm | 1 + ide/allcompileroptions.pas | 8 +++++++- 3 files changed, 10 insertions(+), 2 deletions(-) diff --git a/docs/IDEWindowHelpTree.xml b/docs/IDEWindowHelpTree.xml index bc1423ba3f..c4e438c44e 100644 --- a/docs/IDEWindowHelpTree.xml +++ b/docs/IDEWindowHelpTree.xml @@ -1,5 +1,5 @@ - + @@ -199,4 +199,5 @@ + diff --git a/ide/allcompileroptions.lfm b/ide/allcompileroptions.lfm index 5596ee73a0..38245f2c9d 100644 --- a/ide/allcompileroptions.lfm +++ b/ide/allcompileroptions.lfm @@ -37,6 +37,7 @@ object frmAllCompilerOptions: TfrmAllCompilerOptions OKButton.DefaultCaption = True HelpButton.Name = 'HelpButton' HelpButton.DefaultCaption = True + HelpButton.OnClick = HelpButtonClick CloseButton.Name = 'CloseButton' CloseButton.DefaultCaption = True CancelButton.Name = 'CancelButton' diff --git a/ide/allcompileroptions.pas b/ide/allcompileroptions.pas index 9c60d6e1b5..9ad2fc851d 100644 --- a/ide/allcompileroptions.pas +++ b/ide/allcompileroptions.pas @@ -34,7 +34,7 @@ uses // LazUtils LazUTF8, LazLoggerBase, // IdeIntf - IDEImagesIntf, IDEWindowIntf, + IDEImagesIntf, IDEWindowIntf, IDEHelpIntf, // IDE Compiler, LazarusIDEStrConsts; @@ -53,6 +53,7 @@ type txtErrorMsg: TStaticText; procedure btnResetOptionsFilterClick(Sender: TObject); procedure cbShowModifiedClick(Sender: TObject); + procedure HelpButtonClick(Sender: TObject); procedure sbMouseWheel(Sender: TObject; {%H-}Shift: TShiftState; WheelDelta: Integer; {%H-}MousePos: TPoint; var Handled: Boolean); procedure edOptionsFilterChange(Sender: TObject); @@ -146,6 +147,11 @@ begin IdleConnected := True; end; +procedure TfrmAllCompilerOptions.HelpButtonClick(Sender: TObject); +begin + LazarusHelp.ShowHelpForIDEControl(self); +end; + procedure TfrmAllCompilerOptions.SetIdleConnected(AValue: Boolean); begin if csDestroying in ComponentState then From 0f715bca8559f5b713b43d087a7b067857580f76 Mon Sep 17 00:00:00 2001 From: n7800 <14154601-n7800@users.noreply.gitlab.com> Date: Thu, 22 May 2025 06:00:34 +0500 Subject: [PATCH 3/3] IDE/Options: Fixed help link for "Custom Options" frame. Issue #41662 --- docs/IDEWindowHelpTree.xml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/docs/IDEWindowHelpTree.xml b/docs/IDEWindowHelpTree.xml index c4e438c44e..859b0fb193 100644 --- a/docs/IDEWindowHelpTree.xml +++ b/docs/IDEWindowHelpTree.xml @@ -103,7 +103,7 @@ - +