trichview.support
Re: string tags again |
Author |
Message |
Daniel Waeber |
Posted: 09/23/2003 17:07:57 Thanks a lot Sergey, I knew it would be easy.... :-) "Sergey Tkachenko" <[email protected]> schrieb im Newsbeitrag news:[email protected]... > There are two additional color properties specialy for hypertext text: > HoverColor - color of text > HoverBackColor - text background color. > These colors are used when the hyperlink is active (under the mouse pointer > in hypertext (read-only) mode, at the position of caret in editing mode). > > New version of RichViewActions (http://www.trichview.com/resources/actions/) > allows defining these colors in hyperlink properties. > If you do not use RichViewActions (and you use your own implementation of > OnStyleConversion), change these properties together with Color and > BackColor. > > > > Thanks Sergey, > > > > Needed to do some changes (JUMP = TRUE!) otherwise the events were not > > fired. > > > > Works fine now, with one little problem: > > > > I have a text style with JUMP=TRUE and a different background color. > > > > If I click into a "hyperlink" (i.e. string with this style assigned), the > > background > > color changes to white. > > > > How can I change this? I'd like to keep the background color whether the > > item is focused or not. Changing "jump = false" corrects this but prevents > > the > > events from being fired... > > > > Thanks > > > > Daniel > > > > > > > > "Sergey Tkachenko" <[email protected]> schrieb im Newsbeitrag > > news:[email protected]... > > > Yes, but you need to process some events (OnReadHyperlink and > > OnURLNeeded). > > > May be in future I'll add an option to make it automatically. > > > > > > // Importing hyperlink from RTF > > > procedure TForm3.RichViewEdit1ReadHyperlink(Sender: TCustomRichView; > > > const Target, Extras: String; DocFormat: TRVLoadFormat; var StyleNo, > > > ItemTag: Integer; var ItemName: String); > > > begin > > > ItemTag := Integer(StrNew(PChar(Target))); > > > end; > > > > > > // Exporting hyperlink to RTF and HTML > > > procedure TForm3.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; > > > > > > In the new version, you can use OnWriteHyperlink instead of OnURLNeeded. > > > > > > > Hi, > > > > > > > > One more question regarding string-tags: > > > > > > > > I have a rich-view containing string-tags (using the INSERTSTRINGTAG > > > > command). > > > > > > > > If I copy / paste the text into WORD and paste it back into RichView, > > > string > > > > tags > > > > disappear. > > > > > > > > Is it possible to conserve string tags while using copy / paste into > > WORD? > > > > > > > > Thanks a lot, > > > > > > > > Daniel > > > > > > > > > > > > > > > > > > > > |
Powered by ABC Amber Outlook Express Converter