Fixed: Contextual help in File|Export ...

dpradov · Jan 27, 2025 · e8e117c · e8e117c
1 parent 15938f0
commit e8e117c
Show file tree

Hide file tree

Showing 2 changed files with 1 addition and 2 deletions.
diff --git a/structure/kn_ExportNew.pas b/structure/kn_ExportNew.pas
@@ -2227,7 +2227,7 @@ procedure TForm_ExportNew.Btn_TknHlpClick(Sender: TObject);
 
 procedure TForm_ExportNew.Button_HelpClick(Sender: TObject);
 begin
-  ActiveKeyNoteHelp(Pages.ActivePage.HelpContext);  // Node
+  ActiveKeyNoteHelp(PChar(Pages.ActivePage.HelpKeyword));  // Node+Marker
   //Application.HelpCommand( HELP_CONTEXT, HelpContext );
 end;
 

diff --git a/structure/kn_filemgr.pas b/structure/kn_filemgr.pas
@@ -98,7 +98,6 @@   TForm_KntFileMgr = class(TForm)
     procedure TVPaintText(Sender: TBaseVirtualTree; const TargetCanvas: TCanvas;
                          Node: PVirtualNode; Column: TColumnIndex; TextType: TVSTTextType);
     procedure TVSelectionChange(Sender: TBaseVirtualTree; Node: PVirtualNode);
-    procedure TVmgrDblClick(Sender: TObject);
     procedure TVDblClick(Sender: TObject);
 
   private