如何调用IE打开一个网页(50分)

jyh_jack · 2002-01-25

请教各位大哥大姐：    如何将一个本地的网页通过IE打开呢。                                     谢谢

yhaochuan · 2002-01-25

procedure TForm1.Button1Click(Sender: TObject); begin   ShellExecute(0, 'open', 'http://www.sina.com.cn', '', '' , SW_SHOWDEFAULT); end; 用本地HTML文件的路径代替'http://www.sina.com.cn'

microrain · 2002-01-25

在uses部分加入  ShellApi 然后在程序中如下调用就行了。 procedure TfrmAbout.Label2Click(Sender: TObject); begin  ShellExecute(Application.Handle,nil,'http://www.codechina.net',nil,nil,SW_SHOWNORMAL); end;

远帆 · 2002-01-25

I'm late：） 用这种方法是调用系统默认的方法打开，其实并不一定是IE，要看你默认的浏览器是什么。

eric.youbin · 2002-01-25

试试我这个 shellexecute(handle, 'open', 'iexplore.exe','http://www.sina.com.cn' ,nil,SW_SHOW); 我的系统里面就用的这个

酷尔贝塔 · 2002-01-25

用ShellExecute来实现。 ShellExecute(handle,'open','c:/myapp/myapp.exe','-s','',SW_SHOWNORMAL); 用法： 第一个参数为父窗口句柄； 第二个参数为找开方式（OPEN,PRINT两种）； 第三个参数为执行文件的全路径； 第四个参数为执行文件参数； 第五个为执行文件开始时的初始目录； 第六个我想就不用我说了吧。 具体就看帮助吧。还有，如果为字符串参数，其中包含变量或运算的必须用PCHAR()进行转代 。 例子： ShellExecute(handle,nil,pchar('http://www.delphibbs.com'),nil,nil,SW_SHOWNORMAL); [red]切记在用到ShellExecute时，一定要在  uses 那边加上 ShellAPI  单元。[/red]

redrain · 2002-01-25

shellexecute 没错

bowl · 2002-01-25

该结束啦

jyh_jack · 2002-01-27

其实，这个问题是我问的不好了，我只是不知道， 那个shellexecute调用时，use后要加上什么单元文件而已了。 不过谢了各位。。

远帆 · 2002-01-28

上面已经说过了，加入shellapi

jyh_jack · 2002-01-29

不好意思，忘记加分了。

StevenLee · 2002-02-26

那又该如何关闭打开的网页呢？

如何调用IE打开一个网页(50分)

jyh_jack

Unregistered / Unconfirmed

yhaochuan

Unregistered / Unconfirmed

microrain

Unregistered / Unconfirmed

远帆

Unregistered / Unconfirmed

eric.youbin

Unregistered / Unconfirmed

酷尔贝塔

Unregistered / Unconfirmed

redrain

Unregistered / Unconfirmed

bowl

Unregistered / Unconfirmed

jyh_jack

Unregistered / Unconfirmed

远帆

Unregistered / Unconfirmed

jyh_jack

Unregistered / Unconfirmed

StevenLee

Unregistered / Unconfirmed

Similar threads