一、调用 chm文件:
uses shellapi
...
begin
ShellExecute(handle,nil,'indexsyy.chm',nil,nil,SW_SHOWNORMAL);
end;
二、调用IE网页:
procedure TForm1.Button1Click(Sender: TObject);
begin
//用IE打开
ShellExecute(Handle, 'open', 'IExplore.EXE', 'about:blank', nil, SW_SHOWNORMAL);
//用火狐打开
ShellExecute(Handle, 'open', 'firefox.exe', 'about:blank', nil, SW_SHOWNORMAL);
//用默认浏览器打开
ShellExecute(Handle, 'open', 'Explorer.exe', 'about:blank', nil, SW_SHOWNORMAL);
end;
窗体打开网页:
放一个WebBrowser控件,
WebBrowser1.Navigate('www.csdn.com');