Re: Store extra info.

Return to index

Author

Message

rafaellop

Posted: 09/25/2002 11:20:58

Hello,

In fact my full code for getting the Tag value

is located in the OnURLNeeded. I use the value

for embedding URLs and creating hyperlinks.

But perhaps you can modify the code.

The function for getting the ItemNo value is

GetJumpPointLocation(id, RVData, ItemNo) where

the id is the Item number, RVData is the RVData :)

and ItemNo is a var parameter. Here is my full

handler. Perhaps you'll get something working from

this. I've found the code in the RichView demo apps.

procedure TFRM_RVImporter.RV_RichViewURLNeeded(Sender: TCustomRichView;

  id: Integer; var url: String);

var ItemNo: Integer;

    RVData: TCustomRVFormattedData;

begin

     RV_RichView.GetJumpPointLocation(id, RVData, ItemNo);

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

end;

Regards,

Rafal