Re: How to recognize e-maillinks

Author

Message

Pieter E.

Posted: 10/26/2004 17:25:34

Dear Sergey,

The problem is solved. It does work.

Thanks for your support.

Pieter E.

"Sergey Tkachenko" <svt@trichview.com> wrote:

>I do not know, it must work.

>But:

>- what if the address is www.www@domain.com or name@www.domain.com ?

>- what if 'mailto:' is already in aHyperlink ?

>> How to recognize e-maillinks? (mailto:)

>> I've got the following code:

>> void __fastcall TTekstFrame1::rveWriteHyperlink(TCustomRichView *Sender,

>> int id, TCustomRVData *RVData, int ItemNo, TRVSaveFormat SaveFormat,

>AnsiString

>> &Target, AnsiString &Extras)

>> {

>> AnsiString aHyperlink = (char *)RVData->GetItemTag(ItemNo);

>> if(aHyperlink.Pos("www.") == 1) aHyperlink = "http://" + aHyperlink;

>> if(aHyperlink.Pos("@") >= 1)

>> {

>> aHyperlink = "mailto:" + aHyperlink;

>> }

>> Target = aHyperlink;

>> }

>> //---------------------------------------------------------------

>> The 'mailto:' link doesn't work...

>> (The hyperlink method works great!!)

>> Any ideas?

>> Thanks.

>> Pieter E.