Page 1 of 1

hyperlinks

Posted: Fri Aug 07, 2009 2:43 pm
by ConvertFromOldNGs
by cnwrbb1 >> Mon, 12 May 2003 19:54:58 GMT

Can anyone shed light on how to do this? When a user clicks on a hyperlink (e.g. label) on a thin client form, start a new web browser, or maximise an existing browser, to display the web page.

Cheers -- rb

Re: hyperlinks

Posted: Fri Aug 07, 2009 2:43 pm
by ConvertFromOldNGs
by allistar >> Mon, 12 May 2003 20:29:46 GMT

Like this:

vars
command, site: String;begin

command := "open";
site := "http://www.silvermoon.co.nz";
call shellExecute (0, command.bufferAddress, site.bufferAddress, 0, 0, 1); end;

where shellExecute is an external function defined as this:

shellExecute (hwnd, lpOperation, lpFile, lpParameters, lpDirectory,
nShowCmd : Integer) is ShellExecuteA in shell32;;

This will open up your default browser (e.g. Mozilla) with the URL you pass it.

Regards,
Allistar.

------------------------------------------------------------------
Allistar Melville
Software Developer, Analyst allistar@silvermoon.co.nz
Auckland, NEW ZEALAND

Silvermoon Software
Specialising in JADE development and consulting
Visit us at: http://www.silvermoon.co.nz ------------------------------------------------------------------