Use path of focused explorer window as fallback

Author: eltos

PasteIntoFile/PasteIntoFile.csproj

@@ -75,10 +75,6 @@
     <Reference Include="System" />
     <Reference Include="System.Configuration" />
     <Reference Include="System.Core" />
-    <Reference Include="System.Xml.Linq" />
-    <Reference Include="System.Data.DataSetExtensions" />
-    <Reference Include="Microsoft.CSharp" />
-    <Reference Include="System.Data" />
     <Reference Include="System.Deployment" />
     <Reference Include="System.Drawing" />
     <Reference Include="System.Windows.Forms" />
@@ -141,6 +137,26 @@
     <Content Include="Resources\icon.png" />
     <None Include="Resources\next.png" />
   </ItemGroup>
+  <ItemGroup>
+    <COMReference Include="SHDocVw">
+      <Guid>{EAB22AC0-30C1-11CF-A7EB-0000C05BAE0B}</Guid>
+      <VersionMajor>1</VersionMajor>
+      <VersionMinor>1</VersionMinor>
+      <Lcid>0</Lcid>
+      <WrapperTool>tlbimp</WrapperTool>
+      <Isolated>False</Isolated>
+      <EmbedInteropTypes>True</EmbedInteropTypes>
+    </COMReference>
+    <COMReference Include="Shell32">
+      <Guid>{50A7E9B0-70EF-11D1-B75A-00A0C90564FE}</Guid>
+      <VersionMajor>1</VersionMajor>
+      <VersionMinor>0</VersionMinor>
+      <Lcid>0</Lcid>
+      <WrapperTool>tlbimp</WrapperTool>
+      <Isolated>False</Isolated>
+      <EmbedInteropTypes>True</EmbedInteropTypes>
+    </COMReference>
+  </ItemGroup>
   <Import Project="$(MSBuildToolsPath)\Microsoft.CSharp.targets" />
   <!-- To modify your build process, add your task inside one of the targets below and uncomment it. 
        Other similar extension points exist, see Microsoft.Common.targets.

PasteIntoFile/Program.cs

@@ -78,7 +78,7 @@ static void Main(string[] args)
             }
             else
             {
-                Application.Run(new frmMain());
+                Application.Run(new frmMain(GetActiveExplorerPath()));
             }
 
         }
@@ -179,7 +179,27 @@ static RegistryKey OpenDirectoryKey()
         {
             return Registry.CurrentUser.CreateSubKey(@"Software\Classes\Directory");
         }
+        
+        // get path of active or only windows explorer
+        // modified from https://stackoverflow.com/a/5708578/13324744
+        private static string GetActiveExplorerPath()
+        {
+            IntPtr handle = GetForegroundWindow();
+            var shellWindows = new SHDocVw.ShellWindows();
+            foreach (SHDocVw.InternetExplorer window in shellWindows)
+            {
+                if (window.HWND == (int) handle || shellWindows.Count == 1)
+                {
+                    var shellWindow = window.Document as Shell32.IShellFolderViewDual2;
+                    return shellWindow?.Folder.Items().Item().Path;
+                }
+            }
+            return null;
+        }
 
+        [System.Runtime.InteropServices.DllImport("user32.dll")]
+        private static extern IntPtr GetForegroundWindow();
+        
         [System.Runtime.InteropServices.DllImport("user32.dll")]
         private static extern bool SetProcessDPIAware();
     }