Delphi中打开网页连接的几种方法
来源:互联网 发布:淘宝2016双十一销售额 编辑:程序博客网 时间:2024/04/30 03:36
Delphi打开网址链接的几种方法:
1:
用默认浏览器打开
2:
用IE浏览器打开的3种方法:
3: 4:用WebBrowser控件
1:
用默认浏览器打开
uses
shellapi
procedure
TForm1
.
Button2Click(Sender: TObject);
begin
ShellExecut(Application
.
Handle,
nil
,
'http://www.sharejs.com'
,
nil
,
nil
, SW_SHOWNORMAL);
end
;
2:
用IE浏览器打开的3种方法:
uses
shellapi
procedure
TForm1
.
Button1Click(Sender: TObject);
begin
ShellExecute(Application
.
Handle,
'open'
,
'Iexplore.exe'
,
'http://www.sharejs.com'
,
nil
,SW_SHOWNORMAL);
end
;
procedure
TForm1
.
Button2Click(Sender: TObject);
begin
ShellExecute(Application
.
Handle,
nil
,
'http://www.haotu.net'
,
nil
,
nil
, SW_SHOWNORMAL);
end
;
//该代码片段来自于: http://www.sharejs.com/codes/delphi/9051
uses
SHDocVw;
procedure
TForm1
.
Button4Click(Sender: TObject);
var
IE : OleVariant;
begin
IE := CoInternetExplorer
.
Create;
IE
.
Visible :=
True
;
IE
.
Navigate2(
'http://cy03wqh.blog.163.com'
);
end
;
//该代码片段来自于: http://www.sharejs.com/codes/delphi/9051
comobj
procedure
TForm1
.
Button1Click(Sender: TObject);
procedure
OpenInIe(URL:
string
);
var
Ie:Variant;
begin
Ie:=CreateOleObject(
'InternetExplorer.Application'
);
Ie
.
visible:=
True
;
Ie
.
left:=
300
;
Ie
.
top:=
200
;
Ie
.
height:=
400
;
Ie
.
width:=
600
;
Ie
.
menubar:=
0
;
//隐藏菜单栏
Ie
.
toolbar:=
0
;
//隐藏工具栏
Ie
.
addressbar:=
0
;
//隐藏地址栏
//
Ie
.
statubar:=
0
;
//不可调整大小
Ie
.
resizable:=
0
;
Ie
.
navigate(URL);
end
;
begin
OpenInIe(
'http://www.sharejs.com'
);
end
;
//该代码片段来自于: http://www.sharejs.com/codes/delphi/9051
procedure
TForm1
.
FormCreate(Sender: TObject);
begin
WebBrowser1
.
Align := alTop;
WebBrowser1
.
Navigate(
'http://www.sharejs.com'
);
end
;
0 0
- Delphi中打开网页连接的几种方法
- Delphi中打开网页连接的几种方法
- 在Sliverlight中打开网页的几种方法
- delphi连接数据库的几种方法
- Delphi打开网址链接的几种方法
- Delphi打开网址链接的几种方法
- 2015.1.25 Delphi打开网址链接的几种方法
- Delphi打开网址链接的几种方法
- C#调用默认浏览器打开网页的几种方法
- C#调用默认浏览器打开网页的几种方法
- CSharp调用默认浏览器打开网页的几种方法
- C#调用默认浏览器打开网页的几种方法
- C#调用默认浏览器打开网页的几种方法
- C#调用默认浏览器打开网页的几种方法
- C#调用默认浏览器打开网页的几种方法
- C#调用默认浏览器打开网页的几种方法
- delphi中使用透明控件的几种方法
- delphi 向webbrowser打开的网页中插入js命令
- javascript 实现ajax调用,重点是纯的js实现
- 做一名优秀的开发者可没有说的那么简单
- 反超苹果!谷歌成为美国最有价值品牌
- Eclipse install svn plugin(link)
- javaSE_06Java中的数组(array)-提高练习
- Delphi中打开网页连接的几种方法
- Eclipse_background indexer crash recovery java.lang.stackoverflowerror
- Spring
- git学习(一)
- 学习JavaScript你必须掌握的8大知识点!
- 技术创始人如何挑选非技术合伙人?
- 10个调试和排错的小建议
- protobuf-cpp-3.2.0编译Windows的libprotobuf.lib
- ajax使用回调函数的例子(原生代码和jquery代码)