Re: Does SaveHTMLToStream do hyperlinks?

Return to index

Author

Message

Sergey Tkachenko

Posted: 10/12/2003 18:11:31

No, SaveHTMLToStream saves hyperlinks, if they are provided in OnURLNeeded.

By default, tags of all items are 0 (i.e. nil, empty string). If you store

URLs in tags (like RichViewActions do), you need to assign tags to hyperlink

items explicitly (or allow RichViewActions to do it).

rvoTagsArePChars must be included in Options.

The code for OnURLNeeded must be:

uses CRVFData;

procedure TForm1.RichViewEdit1URLNeeded(Sender: TCustomRichView;

  id: Integer; var url: String);

var RVData: TCustomRVFormattedData;

    ItemNo: Integer;

begin

  RichViewEdit1.GetJumpPointLocation(id, RVData, ItemNo);

  url := PChar(RVData.GetItemTag(ItemNo));

end;

>

> Can this be confirmed?

>

> On URLNeeded I get 'id' values of zero all the time, and 'GetItemTag'

doesn't

> return the text (even for item 0).

>

> Thanks.