HTTP Link

王朝delphi·作者佚名  2006-01-09
窄屏简体版  字體: |||超大  

HTTP Link

Print

Email

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

 
 
 
免责声明:本文为网络用户发布,其观点仅代表作者个人观点,与本站无关,本站仅提供信息存储服务。文中陈述内容未经本站证实,其真实性、完整性、及时性本站不作任何保证或承诺,请读者仅作参考,并请自行核实相关内容。
 
 
© 2005- 王朝網路 版權所有 導航