Delphi中打开网页连接的几种方法

 

https://blog.csdn.net/zisongjia/article/details/69398143

正好要用，做个记录。Mark下。

 

使用了第一种

uses shellapi
procedure TForm1.Button2Click(Sender: TObject);
begin
    ShellExecut(Application.Handle,nil,‘http://www.sharejs.com‘,nil,nil,SW_SHOWnorMAL);
 
end;

 

Delphi打开网址链接的几种方法： 
1： 
用默认浏览器打开 

uses shellapi

procedure TForm1.Button2Click(Sender: TObject);

begin

ShellExecut(ApplicationHandle, nil, ‘http://www.sharejs.com‘

end;

2： 
用IE浏览器打开的3种方法： 

Button1Click(Sender: TObject);

ShellExecute(Application‘open‘‘Iexplore.exe‘;

Button2Click(Sender: TObject);

begin

‘http://www.haotu.net‘;

//该代码片段来自于: http://www.sharejs.com/codes/delphi/9051