我想单击一下按钮，弹出ie,并且可以指定url,该怎么做？(50分)

W

woodcutter

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-03-11

• #1

我想单击一下按钮，弹出ie,并且可以指定url,该怎么做？

 

张

张无忌

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-03-11

• #2

uses
shellapi;
用下面这个函数，可能我名字记错了，你在DFW里找找看，有代码的
shellexecue()

 

L

lzhuan

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-03-11

• #3

ShellExecute(Handle,'open',StrPCopy(St,'http://www.delphibbs.com'),nil,nil,SW_SHOW);

 

L

lzhuan

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-03-11

• #4

看看下面這個貼把
http://www.delphibbs.com/delphibbs/dispq.asp?lid=1324971

 

D

DeiDei

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-03-11

• #5

unit Unit1;

interface

uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,ShellAPI,
StdCtrls;

type
TForm1 = class(TForm)


var
st: array[0..100] of char;
begin
//包含ShellAPI。
ShellExecute(Handle,'open',StrPCopy(St,'www.163.com'),nil,nil,SW_SHOW);
end;

 

N

netstone

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-03-11

• #6

Shellexecute(Handle, 'open', 'http://www.***.com.cn', '', '',sw_ShowNormal);