Obter o dominio de uma url

Question

Alguem sabe qual funcao que faz isso, eu lembro que � alguma api do internet explorer mais nao estou lembrando qual, alguem pode me ajudar ?ObrigadoEmilio...

Beppe · Answer

Tem umas APIs sim, acho que est� em URLMon, sei l�. Mas � simples de fazer.

function GetDomain(const Url: String): String;
var
  I, Ofs: Integer;
begin
  Result := Url;
  Ofs := Pos(�://�, Result);
  if Ofs > 0 then
  begin
    Delete(Result, 1, Ofs + 3);
  end;
  I := Pos(�/�, Result);
  if I > 0 then
    Delete(Result, I, MaxInt);
end;

N�o � o jeito mais eficiente de fazer, mas funciona. N�o testei. :oops:

F�rum Obter o dominio de uma url #210925