Accelerator was visible on Target path label on Copy dialog and it wasn't associated with the exit box

Source commit: 1e6382dc89fe8630fcdad635457f23ab68a16a80

source/forms/CopyLocal.dfm

@@ -32,6 +32,7 @@ object CopyLocalDialog: TCopyLocalDialog
     Width = 61
     Height = 13
     Caption = '&Target path:'
+    FocusControl = DirectoryEdit
   end
   object DirectoryEdit: THistoryComboBox
     Left = 46

source/forms/CopyLocal.h

@@ -8,6 +8,7 @@
 #include <Vcl.Forms.hpp>
 #include "HistoryComboBox.hpp"
 #include <Vcl.ExtCtrls.hpp>
+#include <GUITools.h>
 //---------------------------------------------------------------------------
 class TCopyLocalDialog : public TForm
 {
@@ -38,6 +39,8 @@ private:
   UnicodeString GetFileMask();
   void SetDirectoryAndFileMask(const UnicodeString & Directory, const UnicodeString & FileMask);
 
+  INTERFACE_HOOK;
+
 public:
   TCopyLocalDialog(TComponent * Owner, bool Move, int Options);