Buscar por:

Método para chamar um site

Código

//já tem uma dica sobre chamar um site porém o método é diferente

//acho este melhor porque trabalhar com char é mais simples que widechar

//sendo que o outro método justamente utiliza widechar

//chamando diretamento o site

begin

  ShellExecute(0, Nil, 'www.delphi.eti.br', Nil, Nil, SW_NORMAL);

end;

//ou declare uma variável tipo string como por exemplo

var

  link: string;

begin

  link := Query1.FieldByName('Campo').AsString;

  ShellExecute(0, Nil, PChar(link), Nil, Nil, SW_NORMAL);

end;

//não esqueca... declare a unit ShellAPI na seção uses