Hallo Jan,
lass dir in der Schleife die Fenstergriffe ausgeben und vergleiche mit den Werten aus deinem Tool - vielleicht kannst du dann sehen, was schief läuft:
Delphi-Quellcode:
procedure TDemoForm.UrlButtonClick(Sender: TObject);
var
sw: IShellWindows;
i: Integer;
begin
sw := CoShellWindows.Create;
for i := 0 to Pred(sw.Count) do
with sw.Item(i) as IWebBrowser2 do
ShowMessage(Format('%d %s', [HWND, LocationURL]));
end;
Grüße vom marabu