delphi - 如何从 Google 搜索结果中提取目标 URL？

Question

我正在尝试从 Google 搜索结果中提取网址。我使用 Indy IdHTTP 从 Google 获取 HTML 结果，并使用 Achmad Z's code for getting the link hrefs from the page 。如何获取每个网址的真实链接目标，而不是通过 Google 重定向器的链接目标？

<小时/>

我尝试过，但在这部分代码中出现“操作数不适用”错误:

function ToUTF8Encode(str: string): string;
var
  b: Byte;
begin
  for b in BytesOf(UTF8Encode(str)) do
  begin
    Result := Format('%s%s%.2x', [Result, '%', b]);
  end;
end;

我使用 Delphi 7 和 Indy 9.00.10。也许 indy 更新会有帮助？

Answer 1

如果我没猜错的话，您正在尝试使用 TIdHTTP.Get 获取 Google 搜索结果方法。如果是这样，那么
您绝对应该关注一些 Google Search API 实现，因为

1. 不可能以这种方式获取结果，因为您无权访问包含搜索结果的 iframe 内的文档，因此在这种情况下使用 HTTP GET 将无法获得任何搜索结果(或至少我还没有听说过可以做到这一点的请求)
2. 这违反了 Google 政策，您应该使用正确的 Google Search API，例如 Google SOAP Search API ，还有多种类型的 Google Search API 可用于各种目的

您可以找到例如here Delphi 包装器带有 demo Google 搜索 API 的代码。我已经在 Windows 7/64 上使用 Delphi 2009 对其进行了测试，它对我来说工作得很好。