Re: TDBRichView Hyperlink not working

Author

Message

Etienne van Tonder

Posted: 06/23/2003 12:34:40

Hi Sergey,

I've solved my problem, I'm saving the document in RTF format and when

reading it back I did not have any code in the ReadHyperlink event, once I

added the following code everything woked perfectly.

void __fastcall TfrmEMailPreview::rvvMessageReadHyperlink(

TCustomRichView *Sender, const AnsiString Target,

const AnsiString Extras, TRVLoadFormat DocFormat, int &StyleNo,

int &ItemTag, AnsiString &ItemName)

{

ItemTag = (int)StrNew(Target.c_str());

}

Regards,

Etienne.

"Etienne van Tonder" <[email protected]> wrote in message

> Hi Sergey,

> Sorry I've not got back to you earlier. I've traced into the code again

and

> I may have lead you astray for which I apologise.

> void __fastcall TfrmEMailPreview::rvvMessageJump(TObject *Sender, int id)

> {

> TCustomRVFormattedData *rvd;

> int ItemNo;

> rvvMessage->GetJumpPointLocation(id, rvd, ItemNo);

> if (rvd != NULL)

> {

> AnsiString URL = (char*)rvd->GetItemTag(ItemNo);

> ShellExecute(0, "open", URL.c_str(), NULL, NULL, SW_SHOW);

> }

> When I trace into the code above after the line:

> rvvMessage->GetJumpPointLocation(id, rvd, ItemNo);

> the values are:

> id = 1

> ItemNo = 5

> rvd is ok & not NULL

> so it seem to find the location ok but then when the following line is

> executed:

> AnsiString URL = (char*)rvd->GetItemTag(ItemNo);

> the value of URL is NULL which causes the problem. Now the contents of

> rvvMessage is being read from a BLOB in the database, could the problem be

> caused by the options I have switched on when saving the contents in the

> first place.

> Regards,

> Etienne.