🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: comp.lang.pascal.delphi.misc
Article #258

Re: Hyperlinks

#258
From: Brian Bosworth
Date: Tue, 23 Nov 1999 00:00
17 lines
1451 bytes
procedure TFormOfSomeKind.HTTPLabelClick(Sender: TObject);
begin
  ShellExecute(0, Nil, PChar(HTTPLabel.Caption), Nil, Nil, SW_NORMAL);
end;

Luke Bennett wrote in message <819rot$dg8$1@news7.svr.pol.co.uk>...
>One thing that has been bugging me is how to use hyperlinks in Delphi -
>links to websites. How can I add these so the user can go direct to a site?
>Same goes for email addresses.
>
>Thanks - I REALLY need to know how to do this. Any help will be greatly
>appreciated.
>
>Luke Bennett
>luke@logilink.freeserve.co.uk
>
>
Technical Details
Message-ID: <81dlrn$37m$1@autumn.news.rcn.net>
Path: arc1-ca.pugleaf.net!unknown!not-for-mail
References: <819rot$dg8$1@news7.svr.pol.co.uk>

Show Full Headers
Complete Article Headers
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: f894d,c602b98a46599cd3
X-Google-Attributes: gidf894d,public
X-Google-Thread: 1043cf,c602b98a46599cd3
X-Google-Attributes: gid1043cf,public
X-Google-Thread: 109d99,c602b98a46599cd3
X-Google-Attributes: gid109d99,public
X-Google-Thread: 10baee,c602b98a46599cd3
X-Google-Attributes: gid10baee,public
From: "Brian Bosworth" <bbosworth@cablespeed.com>
Subject: Re: Hyperlinks
Date: 1999/11/23
Message-ID: <81dlrn$37m$1@autumn.news.rcn.net>
X-Deja-AN: 551986404
References: <819rot$dg8$1@news7.svr.pol.co.uk>
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
X-Complaints-To: abuse@rcn.com
X-Trace: Hov/7gU3uUHWVWkUQyZ2298cWbr2nuZsCDPIZin+I7A=
NNTP-Posting-Date: 23 Nov 1999 09:13:27 GMT
Newsgroups: comp.lang.pascal.delphi.misc,comp.lang.pascal.delphi.components.misc,borland.public.delphi.objectpascal,borland.public.delphi