手机站
网通分站
电信主站
密 码:
用户名:
当前位置 : 主页>程序设计>delphi>列表

HTTP Link

来源:互联网 作者:西部数码 时间:2008-04-09
西部数码-全国虚拟主机10强!40余项虚拟主机管理功能,全国领先!双线多线虚拟主机南北访问畅通无阻!免费赠送企业邮局,.CN域名,自助建站480元起,免费试用7天,满意再付款! P4主机租用799元/月.月付免压金!

HTTP Link

Print Email
article
Submitted on: 3/2/2004 11:59:07 AM
By: t0rus
Level: Beginner
User Rating: Unrated
Compatibility:Delphi 7, Delphi 6

Users have accessed this article 1657 times.
There are at least 3 ways to create an http link on your form, i''''ll describe 2 of them here.


Terms of Agreement:
By using this article, you agree to the following terms...
1) You may use this article in your own programs (and may compile it into a program and distribute it in compiled format for languages that allow it) freely and with no charge.
2) You MAY NOT redistribute this article (for example to a web site) without written permission from the original author. Failure to do so is a violation of copyright laws.
3) You may link to this article from another website, but ONLY if it is not wrapped in a frame.
4) You will abide by any additional copyright restrictions which the author may have placed in the article or article''''s description.
First, you need to create a button/label/whatever, then you''''ll have this procedure...

procedure Tform1.Button1Click(Sender: TObject);
const
csOLEObjName = ''''InternetExplorer.Application'''';
var
IE : Variant;
begin
IE := CreateOleObject( csOLEObjName );
IE.Visible := true;
IE.Navigate(''''http://www.yahoo.com'''');
end;

the unit that u''''ll need for this application should be automatically added to the Uses if not, just add Uses ComOBJ there but this only works if you have internet explorer installed.
the SECOND method should work regardless of your browser:

ShellExecute(0,''''open'''',''''http://www.yahoo.com'''','''''''','''''''',SW_SHOWNORMAL);

for this one, you''''ll need to have Uses ShellAPI
the third method, consists of simply downloading a component that has http link, and adding it to your form, but that''''s up to you to look for one

文章整理:西部数码--专业提供域名注册虚拟主机服务
http://www.west263.com
以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息,谢谢!