Re: Create an hyperlink by insert

Return to index

Author

Message

Phil

Posted: 06/15/2005 11:59:33

Hi,

Thanks for you answer but it doesn't work.

It just create a line of text without hyperlink.

When I try to edit the document with ActionText.exe, I see a number in the

field target but that's all.

Have you got an idea?

Yernar Shambayev <[email protected]> wrote:

>function MakeTag(TagStr: string): Integer;

>var

>  r: PChar;

>begin

>  if (TagStr <> '0') and (TagStr <> '') then

>  begin

>    r := StrNew(PChar(TagStr));

>    Result := Integer(r);

>  end

>  else

>    Result := StrToIntDef(TagStr, 0);

>end;

>

>rvBody.InsertStringTag('Text on screen',

>MakeTag('http://link.to.follow'));

>

>

>On 14 Jun 2005 21:17:58 +0400, "Phil"

><[email protected]> wrote:

>

>>

>>Hi,

>>I'm currently to generate a document by using procedure like :

>>rvBody.InsertText('Type of sort of text');

>>

>>I would insert an hyperlink text by the same way like :

>>rvBody.InsertTextHTML('Text on screen','http://link.to.follow');

>>

>>Do you know to do this ?

>>Thanks.

>