uses ShellApi;

procedure TForm1.Button1Click(Sender: TObject);
begin
ShellExecute(Handle,nil,'http://delphipage.free.fr/',nil,nil,SW_SHOWNORMAL);
end;