如何从Google Chrome版本34及更高版本获取网址？

Question

如何从Google Chrome版本34及更高版本获取网址？

这样的东西不起作用，因为chrome不使用Chrome_OmniboxView：

FindWindow('Chrome_WidgetWin_1', Buffer);  
if hWndChrome <> 0 then 
begin    
  hWndChromeChild := FindWindowEx(hWndChrome, 0, 'Chrome_OmniboxView', nil);    
  if hWndChromeChild <> 0 then    
  begin
    SendMessage(hWndChromeChild, WM_GETTEXT, Length(Buffer), integer(@Buffer));
    List.Add(Buffer);    
  end;  
end;