Bug 2127: Bookmark drop download menu in Explorer interface

https://winscp.net/tracker/2127

Source commit: 6d42bf7bdd2d152449cfb4a2c0684a7a2bf5a5a3

source/forms/ScpExplorer.cpp

@@ -421,3 +421,9 @@ bool TScpExplorerForm::SupportedSession(TSessionData * SessionData)
 {
   return !SessionData->IsLocalBrowser;
 }
+//---------------------------------------------------------------------------
+void __fastcall TScpExplorerForm::RemoteOpenDirButtonPopup(TTBCustomItem *, bool DebugUsedArg(FromLink))
+{
+  CreateOpenDirMenu(RemoteOpenDirButton, osRemote);
+}
+//---------------------------------------------------------------------------

source/forms/ScpExplorer.dfm

@@ -932,8 +932,10 @@ inherited ScpExplorerForm: TScpExplorerForm
         OnMeasureWidth = RemotePathComboBoxMeasureWidth
         OnCancel = RemotePathComboBoxCancel
       end
-      object TBXItem22: TTBXItem
+      object RemoteOpenDirButton: TTBXSubmenuItem
         Action = NonVisualDataModule.RemoteOpenDirAction
+        DropdownCombo = True
+        OnPopup = RemoteOpenDirButtonPopup
       end
       object TBXItem229: TTBXSubmenuItem
         Action = NonVisualDataModule.RemoteFilterAction

source/forms/ScpExplorer.h

@@ -160,7 +160,7 @@ __published:
   TTBXItem *TBXItem21;
   TTBXToolbar *AddressToolbar;
   TTBXLabelItem *TBXLabelItem1;
-  TTBXItem *TBXItem22;
+  TTBXSubmenuItem *RemoteOpenDirButton;
   TTBXToolbar *ButtonsToolbar;
   TTBXSubmenuItem *BackButton;
   TTBXSubmenuItem *ForwardButton;
@@ -339,6 +339,7 @@ __published:
           bool FromLink);
   void __fastcall RemoteStatusBarPanelClick(TTBXCustomStatusBar *Sender, TTBXStatusPanel *Panel);
   void __fastcall AddressToolbarEndModal(TObject *Sender);
+  void __fastcall RemoteOpenDirButtonPopup(TTBCustomItem *Sender, bool FromLink);
 
 private:
   UnicodeString FStatusBarFileText;