Hi all
i do not know how to add title property in hyperlinks
any help
How to set title property for hyperlinks
-
- Site Admin
- Posts: 17534
- Joined: Sat Aug 27, 2005 10:28 am
- Contact:
hi
i try this code but no thing happened
and this is the event of richview
the message showmessage( title ); is empty
if you can clear by code it will be very good
thanks
i try this code but no thing happened
Code: Select all
Rve.InsertStringTag('New link', Integer(StrNew(PChar('www.google.com'))));
Rve.SetCurrentItemExtraStrProperty(rvespHint,'Hinttttttttttt',False);
and this is the event of richview
Code: Select all
procedure TNewArticle.RveWriteHyperlink(Sender: TCustomRichView;
id: Integer; RVData: TCustomRVData; ItemNo: Integer;
SaveFormat: TRVSaveFormat; var Target, Extras: String);
Var
url , title : String;
Begin
RVData.GetItemExtraStrProperty(ItemNo,rvespHint,title);
showmessage( title );
url := PChar(RVData.GetItemTag(ItemNo));
Target := url;
End;
the message showmessage( title ); is empty
if you can clear by code it will be very good
thanks
-
- Site Admin
- Posts: 17534
- Joined: Sat Aug 27, 2005 10:28 am
- Contact: