Windows Explorer Pfad in der Adressleiste ermitteltn

[Gabro]

Zitat von bitsetter:

Hi,

folgendes funktioniert bei mir unter Windows XP und Win98:

Delphi-Quellcode:

uses SHDocVw_TLB;

var
  ShellWin: IShellWindows;
  i: Integer;
  ClName: array[0..64]of Char;
  Pfad: AnsiString;
begin
  ShellWin := CoShellWindows.Create;
  for i := 0 to Pred(ShellWin.Count) do
    with ShellWin.Item(i) as IWebBrowser2 do
    begin
      GetClassName(hwnd, ClName, SizeOf(ClName));
      if (string(ClName)= 'ExploreWClass') or (string(ClName)= 'CabinetWClass') then
      begin
        Pfad:= StringReplace(LocationURL, 'file:///', '', [rfReplaceAll, rfIgnoreCase]);
        Pfad:= StringReplace(Pfad, '/', '\', [rfReplaceAll]);
        Pfad:= StringReplace(Pfad, '%20', ' ', [rfReplaceAll]);
        if DirectoryExists(Pfad) then
          ListBox1.Items.Add(IncludeTrailingPathDelimiter(Pfad));
        //ListBox1.Items.Add(Format('%d   %s   %s', [HWND, LocationURL, LocationName]))
      end;
    end;

Vielen Dank bitsetter. Super Idee.

Ich habe deinen Code mal in C# getestet nur um zu gucken wie man das mit C# programmieren könnte und es funktioniert auch bei mir. Für die die sich auch dafür interessieren:

In C# müsste man zunächst auf die Com-Komponente "Microsoft Internet Controls" verweisen. Anschließend würde der folgende Code alle Windows Explorer Fenster Pfade und Internet Explorer Fenster Pfade auf der Konsole ausgeben.

Code:

using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Text;
using System.Windows.Forms;
using SHDocVw;

namespace WindowsApplication1 {
   public partial class Form1 : Form {
      public Form1() {
         InitializeComponent();
      }

      private void Form1_Load( object sender, EventArgs e ) {
         IShellWindows windows = new ShellWindowsClass();

         foreach ( IWebBrowser2 window in windows ) {
            System.Diagnostics.Debug.WriteLine( window.LocationURL ); 
         }
      }
   }
}

Was mich nun interessieren würde ist wie kann man nun anhand des .Net Frameworks oder der WinApi das obige Beispiel implementieren. Ich wette die Klasse ShellWindowsClass im obigen Beispiel benutzt intern die WinApi. Wahrscheinlich gibt es eine Möglichkeit ohne auf die Com-Komponente zu verweisen. Hat jemand eine Idee.

Vermutlich fragt ihr euch warum ich die Com-Komponente nicht benutzen möchte. Die Antwort ist einfach. Es interessiert mich einfach wie der Windows Explorer intern funktioniert und wie eventuell Daten ausgelesen und manipuliert werden können.