如何实现点击一个按钮，打开指定网址浏览器

Question

比如我点击一个按钮，跳出浏览器打开百度页面

Answer 1

百度搜索一下ShellExcute函数打开网页的用法就可以了.

Answer 2

这个简单。procedure TForm1.Button1Click(Sender: TObject);
begin
  ShellExecute(Handle,'open','http://www.baidu.com',nil,nil,SW_SHOWNORMAL);
end;

Answer 3

ShellExecute(Handle,'open','http://www.baidu.com',nil,nil,SW_SHOWNORMAL);正解，如果不想让打开的窗体一直在自己窗体上面，第一个参数传0就可以了。

Answer 4

ShellExecute(Handle,'open','http://www.baidu.com',nil,nil,SW_SHOWNORMAL);
或者CreateProcess也行，用法是差不多的

Answer 5

ShellExecute(Handle,'open','http://www.baidu.com',nil,nil,SW_SHOWNORMAL);

Answer 6

ShellExecute(Handle,'open','http://www.baidu.com',nil,nil,SW_SHOWNORMAL);

Answer 7

如果不想使用楼上的方法，在Delphi里有webBrowser控件楼主可以试试。

Answer 8

ShellExecute(Handle,'open','http://www.qq.com',nil,nil,SW_SHOWNORMAL);

Answer 9

procedure TForm1.Button1Click(Sender: TObject);
begin
  ShellExecute(Handle,'open','http://www.baidu.com',nil,nil,SW_SHOWNORMAL);
end;

Answer 10

winexec('explorer http:\\www.baidu.com',sw_show);这个更简单！