浏览器获取当前url

在Web开发中，获取当前浏览器窗口或标签页的URL是一个常见的需求。可以通过JavaScript来实现这一功能。在JavaScript中，可以使用全局对象`window`的`location`属性来获取当前页面的URL信息。`location`是一个对象，其中包含了当前URL的详细信息，可以通过不同的属性来获取不同的部分。

例如，你可以使用以下方式获取当前的完整URL：

var currentUrl = window.location.href;

这行代码会返回当前页面的完整URL字符串。

`location`对象还提供了许多其他属性，比如：

- `protocol`：获取当前URL的协议部分，如 "http:" 或 "https:"。
- `host`：获取服务器名称和端口号（如果有）。
- `hostname`：仅获取服务器名称。
- `port`：获取URL中的端口号码。
- `pathname`：获取URL中的路径部分。
- `search`：获取URL的查询字符串部分，以"?"开头。

通过这些属性，你可以访问URL中的不同部分，用于各种不同的目的。

相关问题

用delphi获取chrome浏览器的当前url

可以通过以下代码获取Chrome浏览器的当前URL：

uses
  ActiveX, SHDocVw;

function GetCurrentChromeURL: string;
var
  ShellWindows: IShellWindows;
  IE: IWebbrowser2;
  URL: OleVariant;
  ItemIndex: Integer;
begin
  Result := '';
  ShellWindows := CoShellWindows.Create;
  for ItemIndex := 0 to ShellWindows.Count - 1 do
  begin
    if Supports(ShellWindows.Item(ItemIndex), IWebbrowser2, IE) then
    begin
      if (IE.FullName = 'C:\Program Files (x86)\Google\Chrome\Application\chrome.exe') or
         (IE.FullName = 'C:\Program Files\Google\Chrome\Application\chrome.exe') then
      begin
        URL := IE.Document.LocationURL;
        Result := URL;
        Break;
      end;
    end;
  end;
end;

注意需要在程序中引入 `ActiveX` 和 `SHDocVw` 单元。

delphi 获取360极速浏览器的当前url

你可以使用以下 Delphi 代码来获取 360 极速浏览器的当前 URL：

uses
  Winapi.Windows, Winapi.ActiveX, System.Win.ComObj;

function Get360ChromeURL: string;
const
  CLSID_CUrlHistory: TGUID = '{3C374A40-BAE4-11CF-BF7D-00AA006946EE}';
  IID_IUrlHistoryStg: TGUID = '{3C374A41-BAE4-11CF-BF7D-00AA006946EE}';
  IID_IEnumSTATURL: TGUID = '{3C374A42-BAE4-11CF-BF7D-00AA006946EE}';
var
  UrlHistory: IUrlHistoryStg;
  EnumUrls: IEnumSTATURL;
  StatUrl: TStatUrl;
  FetchCount: Cardinal;
begin
  Result := '';
  if Succeeded(CoCreateInstance(CLSID_CUrlHistory, nil, CLSCTX_INPROC_SERVER, IID_IUrlHistoryStg, UrlHistory)) then
  begin
    if Succeeded(UrlHistory.EnumUrls(EnumUrls)) then
    begin
      EnumUrls.Reset;
      FetchCount := 1;
      while (FetchCount > 0) and (EnumUrls.Next(1, StatUrl, @FetchCount) = S_OK) do
      begin
        if AnsiContainsStr(StatUrl.pwcsUrl, '360chrome') then
        begin
          Result := StatUrl.pwcsUrl;
          Break;
        end;
        CoTaskMemFree(StatUrl.pwcsUrl);
        CoTaskMemFree(StatUrl.pwcsTitle);
      end;
    end;
  end;
end;

这段代码使用 Windows 的 COM 接口 IUrlHistoryStg 和 IEnumSTATURL 来获取浏览器历史记录中的 URL。在返回的结果中，找到包含“360chrome”字符串的 URL，即为当前正在浏览的 URL。