...open an URL in the Default Webbrowser?

Author: Simon Grossenbacher
Homepage: http://www.swissdelphicenter.ch

Category: Internet / LAN

uses
  
ShellApi;

{....}

procedure TForm1.Button1Click(Sender: TObject);
begin
  
ShellExecute(Handle,
               'open',
               'http://www.SwissDelphiCenter.ch',
               nil,
               nil,
               SW_SHOW);
end;

 

printed from
www.swissdelphicenter.ch
developers knowledge base