Как мне извлечь целевой URL из результатов поиска Google?

Я пытаюсь извлечь URL-адреса из результатов поиска Google. Я использую Indy IdHTTP для получения результатов HTML от Google, и я использую код Achmad Z для получения hrefs ссылок со страницы . Как я могу получить реальную цель ссылки для каждого URL-адреса вместо того, который проходит через перенаправитель 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 update поможет?