URL aus Browser holen?

[PeterPanino]

Heureka! Hier ist die Funktion:

Delphi-Quellcode:

function GetChromeURL(const hwndChromeWindow: HWND): string;
var
  hwndChromeOmnibox: HWND;

  function GetText(WindowHandle: HWND): string;
  var
    TxtLength: integer;
    Buf: string;
  begin
    TxtLength := SendMessage(WindowHandle, WM_GETTEXTLENGTH, 0, 0) + 1;
    SetLength(Buf, TxtLength);
    SendMessage(WindowHandle, WM_GETTEXT, TxtLength, LongInt(@Buf[1]));
    Result := Buf;
  end;
begin
  Result := '';

  hwndChromeOmnibox := FindWindowEx(hwndChromeWindow, 0, PChar('Chrome_OmniboxView'), nil);
  if hwndChromeOmnibox <> 0 then
    Result := GetText(hwndChromeOmnibox);
end;

Man übergibt der Funktion das Handle des Chrome-Fensters und erhält als Ergebnis die in der URL-Zeile angezeigte URL.

[PeterPanino]

Ich habe das jetzt auch mit Opera versucht, aber bei Opera kriege ich mit Winspy für alle Fensterelemente immer nur die Klasse "OperaWindowClass". Weiß jemand, wie man an die Opera URL-Box rankommen könnte? DDE funktioniert bei Opera auch nicht.

[dunningkruger]

Siehe dein #1,

BSourceFileNameNoExt:='Opera'; Opera kann DDE

[PeterPanino]

Zitat von dunningkruger:

Siehe dein #1,

BSourceFileNameNoExt:='Opera'; Opera kann DDE

Danke, habe es gerade rausgefunden und wollte es gerade posten!

Habe jetzt diese Browser abgedeckt: MSIE, Firefox, Chrome, Opera. Welche Browser sind noch relevant?

[Klaus01]

vielleicht Safari?

Grüße
Klaus

[dunningkruger]

QupZilla vielleicht (vermutlich Null Verbreitung), funktioniert fast so schön wie Opera, basiert aber auf WebKit (wie Chrome, Safari usw.), daher leider kein DDE ;-(

Zum Testen: http://portableapps.com/news/2013-01...1.3.5-released

An das Handle des Chrome-Fensters komme ich bisher nicht ran (habe allerdings nur Chrome portable).
Wie findest du das Handle von Chrome bzw. wonach suchst du in #6?

Danke!

[PeterPanino]

Zitat von dunningkruger:

An das Handle des Chrome-Fensters komme ich bisher nicht ran (habe allerdings nur Chrome portable).
Wie findest du das Handle von Chrome bzw. wonach suchst du in #6?

Danke!

Ich verwende [Winapi.Windows.]GetForegroundWindow, weil bei meiner Aufgabenstellung Chrome den Fokus hat. Leider funktioniert FindWindow('Chrome_WidgetWin_1', nil) nicht, obwohl es laut WinSpy die Fensterklasse von Chrome ist. Würde mich auch interessieren, wenn jemand draufkommt.