菜鸟问题：shellexecute的使用(20分)

青

青山侠客

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-07

• #1

请问以下语句为什么不能执行:
procedure TForm1.Button1Click(Sender: TObject);
begin
shellExecute(handle,nil,pchar('http://home.microsoft.com')nil,nil,SW_shownormal);
end;

 

L

lvxq

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-07

• #2

在uses 中加入 shellapi

shellExecute(handle,'Open',pchar('http://www.sohu.com'),nil,nil,SW_shownormal);

 

M

Myronyale

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-07

• #3

听说这种写法不是很好，说是C++中可以用 system[命令] 的形式执行

不知道Delphi中有没有类似的东西啊？

 

J

joann

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-07

• #4

为何我的程序在用shellExecute(handle,'Open',pchar('http://www.sohu.com'),nil,nil,SW_shownormal);
时,系统提示"Unsafe type 'PChar'"?
我的工作环境是win2000,Delphi7.

 

L

lvxq

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-07

• #5

我是 win2K , Delphi 3.0 没问题
如果这样有问题那就
Var
Filenamechar;
......

Filename:=PChar('http://.....');

ShellExecute(handle,'Explore',filname,nil,nil,SW_Show);

 

小

小乙

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-07

• #6

先在Uses中加入ShellApi,然后在OnClick中加入：
ShellExecute(handle,nil,pchar('http://www.softreg.com.cn/shareware.asp?id=6088'),
nil,nil,sw_shownormal);

 

青

青山侠客

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-07

• #7

各位的方法我都试了，shellapi早加了，为什么还不行？是不是跟系统有关？我用的是win2000

 

Q

QuickSilver

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-07

• #8

1)使用Delphi提供的UrlMon单元中的函数HlinkNavigateString，如
HlinkNavigateString（Nil,'http://www.borland.com'）;
必须在uses子句中加入UrlMon。

(2)使用API函数ShellExecute，必须在uses子句中加入ShellAPI。以下代码可使得
名为mylabel的label控件在被点击时直接启动缺省浏览器浏览borland公司的主页：

procedure TForm1.mylabelClick(Sender:TObject);
begin
ShellExecute(0,Nil,'www.borland.com',Nil,Nil,SW_NORMAL);
end;

 

青

青山侠客

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-07

• #9

to QuickSilver:
第一种方法很好！
但第二种调用shellexecute仍不行，我用的是delphi6.0+win2k

 

L

leejames

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-07

• #10

Win2000下面直接打开URL不行，可以用这个办法如果客户用别的浏览器你得读注册表得到默认浏览器)
shellExecute(handle,'open','IEXPLORE.EXE', 'www.163.com', nil,SW_shownormal);

 

Q

QuickSilver

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-07

• #11

查查你的默认浏览器是那个。

 

F

form1.

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-07

• #12

你的默认浏览器不正确
可能是腾逊的

 

H

huasoft

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-07

• #13

　　这个问题我遇到过，不是DELPHI的问题，不信你把编译的exe文件拷贝到别的
电脑上试，可能一切正常。也许跟OICQ的浏览器有关，当时重装IE都没解决，
干脆重装系统。由于很多电脑都装过OICQ，建议改用winexec或HlinkNavigateString
函数。

 

C

chuguozhen

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-07

• #14

lvxq的办法是可以的，但是不知道你用的Delphi的版本，补丁装了没有，我以前用BCB5的时候碰到过如果不装补丁，ShellExecute不能执行

 

青

青山侠客

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-08

• #15

感谢各位，已有可行方法，但我仍想问一下：
我的确装过滕迅的浏览器，但已删除，如何把IE设为默认的浏览器呢？

 

L

lvxq

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-08

• #16

对不起，此问题与delphi无关，不过我还是回答了
打开IE,主菜单选择Tools--->Options--选择程序页 选中启动时检查是否为默认浏览器
对不起，不知道翻译对不对，我这里的顺序是
IE Explore -->ツール　　->　インターネット　オプション　－－＞
プログラム-->Internet Explorer 起動時に、。。。。

 

紫

紫风逍遥

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-08

• #17

晕啊，楼上的兄弟是什么文字，莫非是外星文字，果然是高人啊。
好了，说正经的。
同意，其实用winexec也不错的。

 

W

wind28

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-08-03

• #18

可以呀，我试过了，win98

 

D

dcshi2001

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-08-03

• #19

是吗。真的不能执行的话，就另想办法吧