!This program cannot be run in DOS mode.
`.data
MSVBVM60.DLL
333333
ffffff
2#0"; ExtendeRTF
koshuta
MDIForm1
#4$(-.111
!7<7/;+01.
2)"(20290200000100900020200000002000000200000020000000
q]sTzR
:ioMs
E_mGZ-l
\ 1M Hj
Y]%A(-
f*w;_b
Y3uHGV
u3N)_~K
.J[@Wt
bmOeY$
VI[?CZ
+n?A5y21
)Sqv)6
amm]vctl
uUW&Kq
v}>uK_
%6fY7l,ZI
J>SRM(
brI99$
MDIForm1
ExtendedRTFDemo
ExtendeRTF
BackColor
ForeColor
Caption
tabctl32.ocx
TabDlg.SSTab
Enabled
DataSource
Msflxgrd.ocx
MSFlexGridLib.MSFlexGrid
MSFlexGrid
Comdlg32.ocx
MSComDlg.CommonDialog
CommonDialog
Enabled
HotTracking
MultiSelect
Separators
mscomctl.ocx
MSComctlLib.TabStrip
TabStrip
Enabled
BorderStyle
mscomctl.ocx
MSComctlLib.Toolbar
Toolbar
mscomctl.ocx
MSComctlLib.StatusBar
StatusBar
mscomctl.ocx
MSComctlLib.ProgressBar
ProgressBar
mscomctl.ocx
MSComctlLib.TreeView
TreeView
mscomctl.ocx
MSComctlLib.ListView
ListView
mscomctl.ocx
MSComctlLib.ImageList
ImageList
Enabled
mscomctl.ocx
MSComctlLib.Slider
Slider
mscomctl.ocx
MSComctlLib.ImageCombo
ImageCombo
MSCOMCT2.OCX
MSComCtl2.Animation
Animation
MSCOMCT2.OCX
MSComCtl2.UpDown
UpDown
MSCOMCT2.OCX
MSComCtl2.MonthView
MonthView
MSCOMCT2.OCX
MSComCtl2.DTPicker
DTPicker
MSCOMCT2.OCX
MSComCtl2.FlatScrollBar
FlatScrollBar
MSINET.OCX
InetCtlsObjects.Inet
BackColor
Enabled
TextRTF
RICHTX32.OCX
RichTextLib.RichTextBox
RichTextBox
BorderStyle
Enabled
DataSource
DataMember
MSCHRT20.OCX
MSChart20Lib.MSChart
MSChart
Socket.ocx
MSWinsockLib.Winsock
Winsock
MSMAPI32.OCX
MSMAPI.MAPISession
MAPISession
MSMAPI32.OCX
MSMAPI.MAPIMessages
MAPIMessages
BorderStyle
MCI32.OCX
MCI.MMControl
MMControl
PICCLP32.OCX
PicClip.PictureClip
PictureClip
SYSINFO.OCX
SysInfoLib.SysInfo
SysInfo
MSCOMM32.OCX
MSCommLib.MSComm
MSComm
BackColor
ForeColor
Enabled
BorderStyle
MSMASK32.OCX
MSMask.MaskEdBox
MaskEdBox
AllowAddNew
AllowArrows
AllowDelete
AllowUpdate
Appearance
BackColor
BorderStyle
ColumnHeaders
DataSource
DataMember
DefColWidth
ForeColor
RightToLeft
TabAcrossSplits
TabAction
WrapCellPointer
DataFormats
MSDATGRD.OCX
MSDataGridLib.DataGrid
DataGrid
BoundText
RowSource
RowMember
MSDATLST.OCX
MSDataListLib.DataList
DataList
BoundText
RowSource
RowMember
MSDATLST.OCX
MSDataListLib.DataCombo
DataCombo
COMCT332.OCX
ComCtl3.CoolBar
CoolBar
FontBand
FontHeader
Enabled
DataSource
DataMember
MSHFLXGD.OCX
MSHierarchicalFlexGridLib.MSHFlexGrid
MSHFlexGrid
ExtendedRTFDemo
ExtendedRTFSupportMod
ExtendedRTFNotSoUsefulMod
ClsExtendedRTF
ClsRTFFontPainter
ClsAPIHighlight
ClsAPIZoom
ColourPanel
TextLookPanel
ClsManifestation
OLDbits1
koshuta
Module1
Class1
ExtendeRTF
Label4
d:\Visual Basic installed\VB6.OLB
Combo1
Label1
Label6
Label5
RichTextBox1
r(C:\Windows\SysWow64\Richtx32.oca
RichTextLib
Label2
italic
hlpmnu
Label3
Toolbar1
d:\Visual Basic installed\mscomctl.oca
MSComctlLib
probul
Frame1
Check1
Formatmnu
Ulsmnu
Command1
Check2
__vbaVarNot
C:\Windows\SysWow64\Msvbvm60.dll\3
user32
SendMessageA
AssignControls
ZoomDo
ZoomSlug
FileSave
FileSaveAs
HasHiddenText
IsCharAlphaNumericA
kernel32
FormatMessageA
FileOpen
FileReLoad
FileSafeSave
ActOnTag
AddSlug
APIerrorDescription
ApplyTag
C:\Windows\SysWow64\Comdlg32.oca
MSComDlg
ColourNamed
ColoursUsed
ColourUser
CurrentUnderlineStyle
CycleSelColor
DocPercent
ExtendedQuoteToggle
FileLoad
FileName
FileNameDefault
FileNameShort
FileNew
HasHighlitText
HiddenTextShow
InstantTran
KeyDown
LineNumbers
MouseMove
RichWordOverMod
SelQuoteDbl
SelQuoteSng
SelRTFToggle
ShowFileInCaption
VisibleParagraphMarks
Option1
Picture1
Picture2
UpDown1
C:\Windows\SysWow64\MSCOMCT2.oca
MSComCtl2
FrmUnderlines
UpDown2
FrmStandard
Frame6
Frame5
UpDown3
DemoRTB
Frame2
Command2
Frame4
Frame3
chkAccumulatestyles
UDmode
btnEditMaterialsOpen
LstSubStyle
btnEditMaterialsPanel
CmdCreateStyle
cmdStyleAction
OptTextBack
Chk_LR0_IO1
TxtMode
LblDescription
FrmMode
ChkPreserveColour
LstStyle
UDMaterialValue
LblAsteriskMessage
frmDescription
PctMaterialChkOpt
LblMaterialValues
FrmBuildstyle
FrmNewMaterial
optNewMaterialTxtBck
txtMaterialsName
TxtMaterialValue
chkNewMaterial
FrmStyle
txtStyleName
lblStyle
CmdStyleer
CmdOpenStyle
RTBClrDemo
CmdClrPanel
FrmMaterialButtons
FrmStyleButtons
GetSysColor
Blender
BlenderAuto
BlenderHardAuto
Materials
BlenderHardHard
ColourRemove
ColourRemoveAll
ColourTEMPLATE
Descriptor
Dither
Dither2
Dither2Hard
DitherHard
ExcessSpaceDelete
FontLookArray
FontSizeAll
FontSizeStep
FormatRemove
FuzzyHard
FuzzyUser
HardenStyle
IsSelection
LastBlendEndColour
LastBlendStartColour
LastDitherColour
LastFuzzyColour
LastHighlightColour
LastHighlightForeColour
LastTextColour
MaterialsAll
MaterialsCount
MaterialsCreator
MaterialsDefaultName
MaterialsDelete
MaterialsKnownColourNames
MaterialsReader
MaterialsRestore
MaterialsSafeValues
MaterialStorageFile
NoFormatting
RainBow
RainBowIO
RandomColour
Ransom
RippleEngine
RTFHighlightHard
RTFHighlightHardAuto
RTFHighlightHardHard
RTFHighlightRemove
RTFHighlightUser
RTFHighlightUserAuto
StylesDelete
RTFHighlightUserUser
SelBackColor
SelBold
SelCaps
SelColor
SelDash
SelDashd
SelDashdd
SelDelete
SelDot
SelDown
SelFontSize
SelHair
SelItalic
SelStrikeThru
SelSub
SelSuper
SelThick
SelUlDouble
SelUlWord
SelUnderline
SelVisible
SelWave
SetForeColor
SetForeColorHard
SpectrumSector
StylesAll
StylesCount
StylesCreator
StylesDefaultName
StylesEngine
StylesGet
StylesKnownNames
StylesPainter
StylesPainterPreserveColours
StylesReader
StylesRestore
comctl32.dll
InitCommonControls
shell32.dll
ShellExecuteA
GetVersionExA
Action
CheckBox
CommandButton
DemoDisplayManifest
DemoVB6Manifest
Listbox
Manifest
Menu1item
Menu2items
OptionButtons
ToolBarButton
ToolBarButtonMenu
Timer1
olepro32.dll
OleTranslateColor
APIHighlightAuto
APIHighlightHard
APIHighlightHardHard
APIHighlightRemove
APIHighlightUser
APIHighlightUserAuto
APIHighlightUserUser
GetHighLightColorLong
GetHighLightColorRGB
HighLightDescription
HighLightSlug
IsHighlight
NamedColour
UserColor
__vbaVarMul
VBA6.DLL
__vbaStrCmp
__vbaLenBstr
__vbaI4Var
__vbaStrI4
__vbaStrCat
__vbaVarCat
__vbaStrVarVal
__vbaBoolVarNull
__vbaErrorOverflow
__vbaR4Var
__vbaFpR8
__vbaFpI4
__vbaObjSetAddref
__vbaOnError
__vbaCastObj
__vbaFreeObj
__vbaEnd
__vbaFreeStrList
__vbaStrMove
__vbaVarDup
__vbaFreeObjList
__vbaCastObjVar
__vbaStrCopy
__vbaI2I4
__vbaFreeStr
__vbaFreeVar
__vbaFreeVarList
__vbaObjSet
__vbaLateIdCallLd
__vbaStrVarMove
__vbaLateIdSt
__vbaHresultCheckObj
__vbaNew2
__vbaCheckType
__vbaLateMemSt
__vbaLateMemCallLd
__vbaVarCmpGt
__vbaVarAnd
__vbaLateMemCall
__vbaInStr
__vbaBoolVar
__vbaVargVarCopy
__vbaVarCopy
__vbaVarTstNe
__vbaUI1I2
__vbaAryLock
__vbaRedimPreserve
__vbaStrI2
__vbaI4Str
__vbaVarLateMemSt
__vbaVarLateMemCallLd
__vbaVarAdd
__vbaVarSub
__vbaVarTstEq
__vbaVarDiv
__vbaI4ErrVar
__vbaAryUnlock
__vbaVarIndexStore
__vbaVarIndexLoadRefLock
__vbaVarIndexLoad
__vbaRefVarAry
__vbaLenVar
__vbaExitProc
__vbaLateIdCall
__vbaR8IntI2
__vbaVarMove
__vbaFpI2
__vbaI2Abs
__vbaGenerateBoundsError
__vbaLbound
__vbaUbound
__vbaRedim
__vbaVargVarMove
__vbaStrToUnicode
__vbaSetSystemError
__vbaStrToAnsi
__vbaVarVargNofree
__vbaInStrVar
__vbaVarCmpEq
__vbaI2ErrVar
__vbaI2Var
__vbaErase
__vbaFPInt
__vbaStrR4
__vbaR8IntI4
__vbaVarCmpLt
__vbaVarTstLe
__vbaNextEachAry
__vbaExitEachAry
__vbaForEachAry
__vbaStrR8
__vbaFpCDblR8
__vbaVarTstGt
__vbaVarTstLt
__vbaMidStmtBstr
__vbaPrintFile
__vbaVarIndexLoadRef
__vbaLineInputVar
__vbaRedimVar
__vbaFileClose
__vbaLineInputStr
__vbaFileOpen
__vbaObjIs
__vbaStrVarCopy
__vbaStrErrVarCopy
__vbaNextEachVar
__vbaFpR4
__vbaForEachVar
__vbaAryDestruct
__vbaI2Str
__vbaObjVar
__vbaVarSetObjAddref
__vbaNextEachCollObj
__vbaForEachCollObj
__vbaVargVar
__vbaVarZero
__vbaLateMemCallSt
__vbaRecAnsiToUni
__vbaRecUniToAnsi
MDIForm
VBInternal
GetCompressedFileSizeA
GetShortPathNameA
GetModuleHandleA
analadventure
aaaaaaaaaaaaaaaa
usnxsnuar
CoPiTo
gsP4zOxSo
buVbInZ3a
TsrMPA2hF
trmwrntyq
hjvqolutf
catezuchy
bolitafresca
c:\windows\system32\USER32
CallWindowProcW
__vbaAryConstruct2
__vbaVarForNext
__vbaVarPow
__vbaVarForInit
__vbaVar2Vec
__vbaAryMove
& : &
__vbaVarSetVar
__vbaR8Str
__vbaAryVar
__vbaAryCopy
__vbaGet3
[Esc | Space | Enter| mouse touch to continue
RichTextBox1
RichTextLib.RichTextBox
{\rtf1\ansi\ansicpg1252\deff0{\fonttbl{\f0\fnil\fcharset0 Courier;}}
\viewkind4\uc1\pard\lang3081\b\f0\fs24 Welcome! This is a demo program based on manipulating the RTF code underlying the VB RichTextBox.
\par }
Courier
Command1
Timer1
TextLookPanel
Text Appearance Panel
Command2
Clear Format
chkAccumulatestyles
Accumulate Styles
FrmStandard
Standard Properies
Label4
The standard VB SelXXX properties have been added here for completeness. They are actually being done from shadow routines in the class.
FrmUnderlines
Underlines
Label3
Word && Double are only partially supported by the RichTextBox. They appear as the standard Underline, but if you check the TextRTF you will see that they are in the code and if you load into a more compliant RTF reader, such as Word, you will see them properly.
Check2
show TextRTF
Frame5
Ripple Values
Picture2
Check1
Down 1st
Frame6
Wave Len
UpDown3
MSComCtl2.UpDown
Frame2
Amplitude
UpDown1
MSComCtl2.UpDown
Frame3
Start Value
UpDown2
MSComCtl2.UpDown
Label2
Amplitude = height of effect. Wavelen = rate of change StartValue = initial Amp UpDown 1st =initial direction If a value exceeds the limits of other settings it does nothing
Frame4
Ransom Colour
Picture1
Option1
Rnd Fore & Back
Option1
Rnd Back
Option1
Rnd Text
Option1
No Colour
Label1
Remember that Ransom colours and text are random. The sample is not exactly what you will get.
Frame1
Sample
DemoRTB
RichTextLib.RichTextBox
{\rtf1\ansi\ansicpg1252\deff0{\fonttbl{\f0\fnil\fcharset0 Tahoma;}}
\viewkind4\uc1\pard\lang3081\f0\fs29 The effect will look like this.
\par }
Tahoma
Command1
&Cancel
Command1
ColourPanel
Colour Style Selector
FrmMaterialButtons
Materials
btnEditMaterialsOpen
btnEditMaterialsOpen
btnEditMaterialsOpen
Delete
btnEditMaterialsOpen
Restore
FrmStyleButtons
CmdCreateStyle
Restore
CmdCreateStyle
Delete
CmdCreateStyle
To Edit, Clcik this then Release the part you wish to change.
CmdCreateStyle
FrmStyle
cmdStyleAction
cmdStyleAction
cmdStyleAction
cmdStyleAction
txtStyleName
CmdStyleer
Store Back
CmdStyleer
Store Text
lblStyle
lblStyle
FrmNewMaterial
Material
PctMaterialChkOpt
chkNewMaterial
LightDark
chkNewMaterial
optNewMaterialTxtBck
optNewMaterialTxtBck
btnEditMaterialsPanel
&Close
btnEditMaterialsPanel
txtMaterialsName
btnEditMaterialsPanel
UDMaterialValue
MSComCtl2.UpDown
TxtMaterialValue
TxtMaterialValue
TxtMaterialValue
TxtMaterialValue
TxtMaterialValue
TxtMaterialValue
UDMaterialValue
MSComCtl2.UpDown
UDMaterialValue
MSComCtl2.UpDown
UDMaterialValue
MSComCtl2.UpDown
UDMaterialValue
MSComCtl2.UpDown
UDMaterialValue
MSComCtl2.UpDown
LblMaterialValues
Min 0-255 | Max 0-255 | Red 0-255 | Green 0-255 | Blue 0-255 | Multiplier/10
ChkPreserveColour
Preserve Colour Selection
FrmMode
UDmode
MSComCtl2.UpDown
TxtMode
RTBClrDemo
RichTextLib.RichTextBox
{\rtf1\ansi\ansicpg1252\deff0{\fonttbl{\f0\fnil\fcharset0 MS Sans Serif;}}
\viewkind4\uc1\pard\lang3081\f0\fs24 Remember coloured Text may not be easily read without contrasting back colour
\par }
MS Sans Serif
frmDescription
Description
LblDescription
LblDescription
LstSubStyle
CmdClrPanel
&Cancel
CmdClrPanel
OptTextBack
OptTextBack
Chk_LR0_IO1
Chk_LR0_IO1
LeftRight
LstStyle
FrmBuildstyle
Style Builder
CmdOpenStyle
LblAsteriskMessage
Styles marked * launch one colour dialogue as soon as you select them Styles marked ** launch two colour dialogs as soon as you select them The colour selection(s) remains in force as long as Preserve Colour Selection is Checked. UnCheck to try different colour(s).
ExtendedRTFDemo
ClsExtendedRTF Demo
Frame1
RichWordOver InstantTranlator
Label6
Label6
Label1
current word
Check2
HighLighted Text
Check1
Hidden Text
Command1
Reset TextRTF
Read the document before playing with me
Command1
Reset SelRTF
Read the document before playing with me
RichTextLib.RichTextBox
{\rtf1\ansi\ansicpg1252\deff0{\fonttbl{\f0\fnil\fcharset0 MS Sans Serif;}}
\viewkind4\uc1\pard\lang3081\f0\fs17 RichTextBox2
\par }
RichTextBox1
RichTextLib.RichTextBox
C:\Program Files\Microsoft Visual Studio\VB98\QND Programs\ExtendedRTF\Extended RTF code for VB6.rtf
{\rtf1\ansi\ansicpg1252\deff0\deflang1033\deflangfe1033{\fonttbl{\f0\froman\fprq2\fcharset0 Times New Roman;}}
{\colortbl ;\red255\green0\blue219;\red192\green192\blue192;\red255\green0\blue255;\red219\green0\blue255;\red182\green0\blue255;\red146\green0\blue255;\red109\green0\blue255;\red73\green0\blue255;\red36\green0\blue255;\red0\green36\blue255;\red0\green73\blue255;\red0\green109\blue255;\red0\green182\blue255;\red0\green219\blue255;\red0\green255\blue255;\red0\green255\blue219;\red0\green255\blue182;\red0\green255\blue109;\red0\green255\blue73;\red0\green255\blue36;\red36\green255\blue0;\red73\green255\blue0;\red109\green255\blue0;\red255\green0\blue0;\red255\green128\blue0;\red255\green255\blue0;\red127\green255\blue0;\red0\green255\blue0;\red0\green255\blue128;\red0\green0\blue255;\red255\green36\blue0;\red128\green255\blue0;\red0\green0\blue0;\red255\green200\blue255;\red255\green255\blue255;\red255\green128\blue255;\red255\green200\blue100;\red128\green128\blue255;\red226\green199\blue233;\red127\green127\blue127;\red128\green128\blue128;\red107\green100\blue187;\red148\green155\blue68;\red36\green232\blue1
{\stylesheet{ Normal;}{\s1 heading 1;}{\s2 heading 2;}{\s3 heading 3;}}
\viewkind4\uc1\pard\nowidctlpar\cf1\highlight2\lang3081\super\b\i\caps\dn3\f0\fs83 \uldashdd E\cf3\uldash\up4\fs81 x\cf4\uld\dn1\fs86 t\cf5\uldashd\dn4\fs87 e\cf6\ul\up3\fs89 n\cf7\uldashdd\up2\fs80 d\cf8\uldashd\up0\fs81 e\cf9\ul\dn5\fs78 d\ulnone\b0\i0\caps0\up0 \cf10\uldashd\b\i\caps\dn1\fs85 R\cf11\uldash\fs81 T\cf12\uldashdd\up1\fs82 F\ulnone\b0\i0\caps0\up0 \cf13\uld\b\i\caps\dn1\fs80 c\cf14\ul\up4\fs76 o\cf15\ulth\up3\fs85 d\cf16\ul\up0\fs81 e\cf17\uldash\fs79 s\ulnone\b0\i0\caps0 \cf18\ulhair\b\i\caps\dn3 f\cf19\ul\dn1\fs86 o\cf20\uldash\dn5\fs84 r\ulnone\b0\i0\caps0\up0 \cf21\uldash\b\i\caps\dn1\fs88 V\cf22\uldashd\up0\fs81 B\cf23\up2\fs84 6\ulnone\b0\i0\caps0\up0 \cf24\ulth\b\i\caps\up2\fs29 V\cf25\ul\up3\fs33 e\cf26\ulth\fs23 r\cf27\uld\up1\fs34 s\cf28\ul\dn5\fs33 i\cf29\ulhair\dn2\fs26 o\cf15\up2 n\ulnone\b0\i0\caps0\up0 \cf30\uldash\b\i\caps\dn2\fs27 2\ulnone\i0\caps0\up5\fs40 \cf31 \cf3\fs66
\par \cf32\highlight24\lang1033\nosupersub\b0\up0\fs62 WORK IN PROGRESS MAY NOT ALWAYS DO WHAT IT SHOULD \cf24\lang3081\fs46
\par \cf0\highlight0\b\fs38\tab\tab\tab\tab\tab\tab\tab\tab\cf33\highlight34 PLEASE READ BEFORE PLAYING\b0\fs20
\par \cf0\highlight0 [Although this document is preloaded in the IDE have a look at cls.SetRTB and cls.Load to see how it is automatically reloaded so that what you see here when running the program is always the real document not the IDE copy. What you see in the IDE may be a much older version if you (or I) have not reloaded it in the IDE. The reason for this reload is to get a copy of the default format of the RichTtextBox for the cls.NoFormatting routine]
\par [PS I'm Australian so 'colour' not color except where VB insists]
\par \cf30\highlight30\caps
\par \cf33\highlight24\caps0\fs26 KNOWN PROBLEMS
\par \cf0\highlight0 Left this in as hints to others if modifications go wrong.
\par 1. \cf26\highlight30 Highlighter exposing RTF code \cf0\highlight0 :FIX End of colorTbl can take two formats ';\}; or ";\}\}".Tested for correct format in dividing RTFCode. No More Problem
\par 2. \cf26\highlight30 Occasional overtyping\cf0\highlight0 : FIX Hot Keys for [W][S] and [P] lead to an error in programming logic which fired .SelLength =1. Corrected Logic. No More Problem
\par 3. \cf26\highlight30 Slow (veeerrryyy sssllooowwww) typing speed\cf0\highlight0 : FIX Massive colortbl in TextRTF slows as it updates with ever change in RichTextBox. Added ActiveUpdate variable controlled through the Traffic light button. Also Added a Busy signal to the class so that it independantly disables update while involved in intense work(Mostly using .SelXXX properties to directly manipulate text.) Normal documents will not have the amount of colour that this document does nor the need to update another textbox, so this should not be a consideration in real world applications.
\par INDEX\tab\tab\tab\tab\tab Use Jump Menu (positions are approximate. I could make it more precise but this is Demo-land)
\par Introducton\tab\tab\tab\tab\tab\tab 10%
\par Usage \tab\tab\tab\tab\tab\tab\tab 20%
\par setting up
\par [MUST DO]
\par [SHOULD DO]\tab\tab\tab\tab\tab 30%
\par [OPTIONAL]
\par \tab Underline\tab\tab\tab\tab\tab 40%
\par \tab Colour Highlight\tab\tab\tab\tab 50%
\par \tab Visible\tab\tab\tab\tab\tab 60%
\par \tab Miscellaneous\tab\tab\tab\tab 70%
\par \tab Weird Text\tab\tab\tab\tab\tab 80%
\par \tab Quote Tools
\par Demo Program Description\tab\tab\tab\tab 90%\tab
\par Source & Credits\tab\tab\tab\tab\tab 90%\tab
\par Contact\tab\tab\tab\tab\tab\tab 100%
\par \fs44\tab\tab\tab\tab\tab\tab\tab\tab\cf35\highlight33\caps Introduction\cf33\caps0\fs20
\par \cf0\highlight0\fs26 The VB RichTextBox supports (sometimes only partially) many more RTF codes than the small set of .SelXXXX properties. For example you know you can set .SelUnderline to underline text but what about wavy, dashed, dotted and their weirder cousins?
\par This document has been constructed using the code in ClsExtendedRTF.cls which allows you to use some of the RTF formatting that VB does not provide automatically.
\par Basically I was just looking for a way to highlight (not select) words in text based on various catagories in another project. I am releasing this as a work in progress, so I can get back to the main project.
\par Not all of this code is original to me, I have tried to credit all sources for code I have used (See Sources & Thanks at end of document) but some bits I have had, used and modified for so long that the original source is lost in the mists of time. The Highlighter, ExtendedRTFToggle, KeyDown, CaseCycle,Visible, RippleEngine, Ransom, ExcessSpace, ExtendedQuote, Applytag,ActonTag and various SelUnderline routines and most of their support routines are certainly mine. Searching the web I found no reference to manipulating RTF code in VB and a lot of confusion between highlighting and selecting text. Having tried to do it the quick way (find, copy and adapt) but finding nothing came even close, I was inspired to build them (anything is better than working on the big project). I have incorperated some of the clever stuff I found while searching.
\par \pard\nowidctlpar\li800\ri800
\par developed this code as a class rather than a OCX because it is easier to test and easier for others to read and understand. I have not fully implimented the class, it extends but does not relace references to the RichtextBox, I just call RichTextBox.SomeProperty if I want a built-in property and MyRTB.SomeProperty if I want an extendedRTF property. As time goes by I may try to make it more complete. Feel free to adopt ideas from the code even if you don't want it all. Just leave the copyright notices in the code, credit me in your documentation and drop me an e-mail if you make major use of it or have any suggestions.
\par I have not yet worked out how to make my code behave completely like the .SelXXX properties. The return value does not describe the current insertion point but the whole document. So the 'Hidden Text' checkbox below(in demo) only tells you that some where in this document there is hidden text but not whether you are over it(on second thought I don't think it could anyway). Like wise 'Highlighted Text' only tells you that there is some not that you are over it. If you know of a way of testing format at insertion point without selecting(I tried it, its much too time consuming for real world use) please send your suggestions to contact address at the end of the document.
\par \ul\b USAGE
\par \ulnone\b0 Add Class to Project\ul
\par \ulnone\b\fs42\tab\tab\tab\tab\tab\tab\tab\tab\tab\cf35\highlight33 SETTING UP\cf0\highlight0\tab\tab\tab\tab\tab\tab\tab\tab
\par \b0\fs26 1. [MUST DO] Place this at the top of any Module or Form.
\par \tab\tab\b Public MyRTB As New ClsExtendedRTF
\par \b0 [WHY] allow access to class.
\par 2. [MUST DO] Place in Sub Main or where ever your program starts
\par \tab\tab\b MyRTB.SetRTB RichTextBox1
\par \b0 [WHY] Provide RichTextBox for class to work with.\b
\par \b0
\par 3.\b \b0 [MUST DO] Place in RichTextBox1_KeyDown()
\par \b\tab\tab\tab MyRTB.KeyDown KeyCode, Shift\b0
\par [WHY] Allows you to program Shift+Key, Alt+Key Ctrl+Key and more complex shift combinations. (RichTextBox has the WordStar edit keys Ctrl+X, Ctrl+C and Ctrl+V built in but with this routine I have added Ctrl+B and Ctrl+U). Also allows \cf33\highlight35 typing TAB character when you press the TAB key rather than jumping to next control in tab order.
\par \highlight36 NOTE: RichTextBox is preset to use the non-intuitive Ctrl+I for tab insertion. To override this and make Ctrl+I convert selected text to italic you need to have a menu entry with its Hot Key set to Ctrl+I. So even though you may never use it you should create a 'Format' menu if you want to use the WordStar sytle hot keys (this menu must be visible to work so don't try to hide it. If you know another way to overcome this let me know. I'd like to be able to just add the Hot Key the same way I did for Bold and Italic)
\par \cf0\highlight0
\par The class 'as is' contains the following Hot Keys
\par [TAB] Use TAB key to enter tab character\tab (replaces RichTextBox default TAB jump to next control in TabIndex >this is now [CTRL]+[TAB])
\par SHIFT+[TAB] delete previous tab
\par [CTRL]+[TAB] junp to next control in TabOrder (replaces RichTextBox default TAB insert >this is now [TAB])
\par [Ctrl]+[B] bold selected text
\par [Ctrl]+[U] underline selected text
\par [Shift]+[F3] Reproduces the MS Word case cycle of selected text from lower to UPPER to Proper Case.
\par [Ctrl]+P select from current insertion point to end of paragraph. (Base on the Span Example in VB Help with extentions)
\par [Ctrl]+[Shift]+[P] select from current insertion point to start of paragraph.
\par [Ctrl]+[Alt]+[P] select paragraph surrounding the insertion point.
\par [Ctrl]+[S] select from current insertion point to end of sentence.
\par [Ctrl]+[Shift]+[S] select from current insertion point to start of sentence.
\par [Ctrl]+[Alt]+[S] select from sentence surrounding the insertion point.
\par [Ctrl]+[W] select from current insertion point to end of word.
\par [Ctrl]+[Shift]+[W] select from current insertion point to start of word.
\par [Ctrl]+[Alt]+[W] select word surrounding the insertion point.
\par While it may not be pure, in that you violate modularity, you can call routines outside the class from within it by using hot keys. Try Ctrl+Alt+F4 in the Demo program to see this in action.
\par (See Private Subs KeysFunction, KeysLetter, KeysOther for details)\b
\par \b0
\par \b\tab\tab\tab\tab\tab\tab\tab\tab\cf35\highlight33\fs40 [SHOULD DO]\lang1033\b0\fs24 [\cf33\lang3081\b\fs38
\par \cf0\highlight0\b0\fs26 4.\b \b0 [SHOULD DO] Place in RichTextBox1_Change()
\par \b\tab\tab\tab MyRTB.Dirty = True\b0
\par [WHY] allows Sub SafeSave to operate; offer to save if there is unsaved editing.\b
\par \b0
\par 5. [SHOULD DO] Place in Form_UnLoad, Just before you Load a new document and jsut before you create a new document.\b
\par \tab\tab\tab MyRTB.SafeSave
\par \b0
\par [WHY] Warns you that you are about to lose your edits and gives you a chance to save them.
\par \b
\par \b0
\par 6. [SHOULD DO] Place just after you load a document\b
\par \tab\tab\tab MyRTB.Filename=CommanDialog1.filename
\par \b0 [WHY] provides a filename for SafeSave
\par 7. [SHOULD DO] Place in RichTextBox1.MouseMove\b
\par \tab\tab MyRTB.MouseMove Button, Shift, X, Y
\par \b0 [WHY] allows current word to be detected by Sub RichWordOver
\par [Not really urgent, its not needed for anything else, yet]\b
\par \b0
\par \b
\par \fs48\tab\tab\tab\tab\tab\tab\tab\tab\tab\cf35\highlight33 [OPTIONAL]\fs26 \cf0\highlight0\b0
\par These are the important parts of using the class but you do not need to impliment them all, you might even be happy with just the KeyDown code above.
\par These can be placed in Menus/ ToolBars/ Buttons, Hot Keys or where ever you like to activate them from.
\par If you use Hot Keys leave the MyRTB off, you are already in the class so don't need to reference it.\b
\par \b0
\par 8.\b \ul UNDERLINES\ulnone \tab\b0 [OPTIONAL] \ul
\par \ulnone
\par \pard\keepn\nowidctlpar\s3\ul\b Insert in your code \tab\tab\tab\tab\tab\tab\tab RTFCode\tab LongName\tab\tab Demo\b0
\par \ulnone\b MyRTB.SelUnderline = Not MyRTB.Selunderline\tab\tab\b0 ul\tab\tab standard\tab\tab\ul Demo\ulnone\tab\tab included for consistence it echoes RichTextBox.SelUnderline
\par \ul
\par \pard\nowidctlpar\ulnone\b MyRTB.SelDot = Not MyRTB.SelDot\tab\tab\tab\tab\b0 uld \tab\tab dotted\tab\tab\tab\uld Demo\tab\ulnone\tab
\par \pard\b MyRTB.SelDash = Not MyRTB.SelDash\tab\tab\tab\b0 uldash\tab\tab dash \tab\tab\tab\uldash Demo
\par \pard\nowidctlpar\ulnone\b MyRTB.SelDashd = Not MyRTB.SelDashd\tab\tab\tab\b0 uldashd\tab dashdot\tab\tab\uldashd Demo
\par \ulnone\b MyRTB.SelDashdd = Not MyRTB.SelDashdd\tab\tab\tab\b0 uldashdd\tab dashdotdot\tab\tab\uldashdd Demo
\par \ulnone\b MyRTB.SelThick = Not MyRTB.SelThick\tab\tab\tab\b0 ulth \tab\tab thick\tab\tab\tab\ulth Demo
\par \ulnone\b MyRTB.SelHair = Not MyRTB.SelHair\tab\tab\tab\b0 ulhair\tab\tab hair\tab\tab\tab\ulhair Demo\ulnone\tab\tab only visibly different at large font sizes
\par \b MyRTB.SelWave = Not MyRTB.SelWave\tab\tab\tab\b0 ulwave\tab\tab wave\tab\tab\tab\ulwave Demo
\par \ulnone\b MyRTB.SelUlWord = Not MyRTB.SelUlWord\tab\tab\b0 ulw \tab\tab word \tab\tab\tab\ulw Demo\ulnone\tab\tab partial support see below
\par \b MyRTB.SelUlDouble = Not MyRTB.SelUlDouble\tab\tab\b0 uldb\tab\tab double\tab\tab\tab\uldb Demo\ulnone\tab\tab partial support see below\uldb
\par \pard\ulnone
\par Notes \b .SelUnderline=False \b0 can remove any of these underlines.
\par \pard\nowidctlpar\b\tab Value = .SelUnderline \b0 return True/False for any underline at insertion point but does not distinguish between the different types of underline.
\par \tab \b Value = .SelDot (Dash \b0 etc\b ) \b0 return True/False but is testing the whole document if there is no selection.
\par \ul
\par partial support\ulnone
\par 'word' and 'double' are not fully supported. In RichTextBox they appear as single underlines, but the underlying code is preserved. If you later load them into a more compliant word processor (not WordPad) they appear in their true form. 'word' still looks the same and I don't know how you would know if it was faking it or not but 'double' is easy to see.
\par \pard\b
\par \b0
\par 9.\ul\b COLOUR HIGHLIGHTS\ulnone\tab \b0 [OPTIONAL]
\par \pard\nowidctlpar
\par Highlighter allows you to emphasis a word by colouring its background. In the Demo I've used fairly bright colours but more subtle ones are probably better.\ul
\par \pard\keepn\nowidctlpar\s3\b
\par Insert in your code \tab\tab\tab\tab\tab\tab Code\tab\tab LongName\tab\tab Demo
\par \pard\ulnone\b0\tab\b\tab\tab\tab\tab\tab\tab\tab\b0 Highlight\i N\tab\i0 highlightOn
\par \pard\keepn\nowidctlpar\s3\ul\b
\par \pard\ulnone MyRTB.HighLightHard VbRed\tab\tab\tab\b0\tab\tab\tab\tab\tab\cf33\highlight24 Demo\cf0\highlight0\tab using VBRed
\par \b MyRTB.HighLightHard RGB( 175, 175, 175)\tab\tab\tab\tab\tab\tab\cf33\highlight37\b0 Demo\highlight0 \cf0 using RGB(R,B,G)
\par \pard\nowidctlpar\b MyRTB.HighlighterHardHard VbRed, VbGreen\tab\tab\tab\b0\tab\tab\cf29\highlight24 Demo\cf0\highlight0\tab using VBRed, VbGreen \cf26\highlight38 set both the highlighter and the text colours.\cf0\highlight0\b \cf26\highlight38\b0
\par \pard\cf0\highlight0\b MyRTB.HighlighterHardAuto VbRed\tab\tab\tab\tab\tab\tab\tab\cf15\highlight24\b0 Demo\cf0\highlight0 using VbRed\b \cf35\highlight33\b0 set the highlighter and routine sets contrasted text colour
\par \cf0\highlight0\b MyRTB.HighLightUser\tab\tab\tab\tab\tab\tab\tab\tab\tab\cf33\highlight39\b0 Demo\highlight0 using CommonDialog\cf24
\par \pard\nowidctlpar\cf0\b MyRTB.HighLightUserUser
\par MyRTB.HighLightUserAuto
\par Highlight has 3 ways of obtaining a colour
\par Hard\tab\b0 hardcoded colour\b
\par User \b0 launches Colour dialog to get colour
\par \b Auto \b0 automatically inverts a colour supplied from Hard or User
\par \pard\tab\tab\tab\tab\tab\tab\tab\tab\tab\tab\tab I have not fully tested the Auto (inverts colour) routine but except for colour blindness, optical illusions \tab\tab\tab\tab\tab\tab\tab\tab\tab\tab\tab\tab\tab and tastefulness issues it should always work.
\par \b MyRTB.HighLightOff\b0 \tab\tab\tab\tab\tab\tab\tab\tab\tab Demo\tab This just calls \b HighLightHard VbWhite\b0 but is named for easier coding.
\par \b
\par \tab\tab\tab\tab\tab\tab\tab \tab\cf33\b0 H\cf0 ighlight0\tab highlightOff\tab\tab (you do set this code; the RTF engine adds it to the end of you selection automatically.)
\par \pard\nowidctlpar\tab\tab\tab\tab\tab\tab\tab\tab\tab\tab\tab\tab\tab
\par \i N= \i0 the colour's psition in the RTF \b colortbl\b0 . You do not set this, the RTF engine maintains the list order internally. The class uses the trick of setting the .\b SelColor \b0 to insert the colour into the \b colortbl \b0 then resetting .\b SelColor \b0 to its original colour. This can be seen if you highlight a large slab of text; the text will vanish then reappear, but on small pieces of text it is too fast to notice.
\par you want to use highlight for marking text to indicate specific meanings or problems then permanently assign colours using VBColor or RGB(R,G,B).
\par Test before setting in code many combinations are not readable. This grey box \cf40\highlight41 BANG \cf0\highlight0 contains a dark grey text on dark grey.
\par The HighLighter2A InvertColour routine has guards against colours being too close. Keep in mind colour blindness (the RedGreen Demo above may not be visible to about 10% of people) and asthetics when creating your highlights.
\par If you want to allow user's to choose freely then do it using Commondialog.ShowColor as in the code examples below. Warn them in documentation about the potential readability problems.
\par \cf33\highlight28 Highlighter\cf0\highlight0\b
\par \b0\tab \b \tab With CommonDialog1
\par \tab\tab\tab .ShowColor
\par \tab\tab\tab MyRTB.HighLighter .Color
\par \tab\tab End With
\par \cf33\highlight28\b0 Highlighter2\cf0\highlight0\b
\par \b0 \b \tab\tab With CommonDialog1
\par \tab\tab\tab .ShowColor
\par \tab\tab\tab Hcolor = .Color
\par \tab\tab\tab MyRTB.Highlighter2 Hcolor, .Color
\par \tab\tab End With
\par \cf33\highlight28\b0 Highlighter2A\cf0\highlight0\b
\par \b0 \b \tab\tab With CommonDialog1
\par \tab\tab\tab .ShowColor
\par \tab\tab\tab MyRTB.Highlighter2A .Color
\par \tab\tab End With
\par \cf33\highlight26\b0 NOTES\cf0\highlight0
\par a. Highlight should not be confused with the VB Select behaviour; it is a permanent colourful text marker.
\par b. If you select a highlight it will appear as white text on a reverse colour decided by the RTF engine not necessarily the standard white text on a black field. Pale colours usually do go black or very dark.
\par c. Becasue the RichTextBox includes the space after a word if you double-click to select you should use one of the following methods to select for highlighting:
\par \tab i. drag & select with the mouse
\par \tab ii. Shift+LeftArrow or Shift+RightArrow
\par \tab iii. Double-Click and Shift+RightArrow
\par .\ul\b VISIBLE\ulnone\b0 \tab [OPTIONAL]\ul\b
\par \ulnone\b0
\par Visible allows you to hide text in text. Not particularly useful but very cute. You may find some use for it.
\par \pard\keepn\nowidctlpar\s3\ul\b Insert in your code \tab\tab\tab\tab\tab\tab Code\tab\tab LongName\tab\tab Demo
\par \pard\nowidctlpar\ulnone MyRTB.SelVisible = Not MyRTB.Selvisible\tab\tab\b0 v\tab\tab visible\tab\tab\tab De\cf33\highlight25\v BOO!\cf0\highlight0\v0 mo Something hidden here, select demonstration word then menu Visible|Hide(Toggle).
\par \pard . [OPTIONAL]\b \b0 apply a pair of tags around selected text then apply a format to the tagged code.\b
\par \pard\nowidctlpar\b0 I have included a way of tagging a piece of text with visible marker tags\fs36 \fs20 * I*\fs36 \fs26 and\fs32 \fs18 *V*\fs26 which the class can search for and hide automatically.
\par Try it and the word 'and' in the last sentence will vanish. You can change the tags but follow these rules;
\par \pard\b
\par \tab MyRTB.ApplyTag StartTag, EndTag
\par \tab MyRTB.ActOnTag StartTag, EndTag, RTFCode, BlnTagDelete
\par StartTag: Mark start of text section\b0
\par \b EndTag: MArk end of text section\b0
\par \b RTFCode:\b0 What action to take.
\par \b BlnTagDelete: \b0 by default this is false because the Hide text needs to preserve itself. However for other format changes you porbably want to turn it on so that once it hits the tag vanishes.\b
\par \b0
\par Just to show a different approach there is a bolding version at the bottom of the Miscellaneous menu which will hit on this <b>boldme<\\b> but of course only once because BlnTagDelete is True.\b \b0 You could develop a whole HTML colouring system off this. I have only used a very simple routine (RTFize) to convert HTML code to RTF format, it does not deal with more complex HTML codes. See comments in Visible section below for more details.
\par \pard\nowidctlpar
\par 1. Don't use genuine RTFcodes it will certainly confuse the class and the RTF engine.
\par 3. Be careful using backslash \\ or curly brackets \{\}, Tab or Newline characters they might confuse the RTF engine.
\par 3. Make the end and start different it makes it easier to find and manipulate.
\par Suggestions:
\par a. If you use FontSizeStep routine you can make the tags very small.
\par b. You could build a simple animation in your text by switching tagged text on and off from a routine.
\par c. If you program several different tags to toggle visibility at different times this might even be impressive.
\par \pard
\par 12. [OPTIONAL]To use some of the other supplied codes
\par \pard\keepn\nowidctlpar\s1\ul\b MISCELLANEOUS\b0
\par \pard\keepn\nowidctlpar\s2\b Insert in your code \tab\tab\tab\tab\tab\tab Code\tab\tab LongName\tab\tab Demo
\par \pard\nowidctlpar\ulnone MyRTB.SelCaps= Not MyRTB.SelCaps\tab\tab\tab\b0 caps \tab\tab allcaps\tab\tab\tab\caps Demo \tab\caps0 In underlying text this is really 'Demo' not 'DEMO'.
\par \b MyRTB.SelSub= Not MyRTB.SelCaps\tab\tab\tab\b0 sub\tab\tab subscript\tab\tab De\sub m\nosupersub o\tab\tab move baseline and shrink font less fiddly then .Sel
\par \b MyRTB.SelSuper= Not MyRTB.SelCaps\tab\tab\b0 super\tab\tab superscript \tab De\super m\nosupersub o
\par \b MyRTB.SelUp 5\tab\tab\tab\tab\tab\tab\b0 up\tab\tab up\tab\tab\tab De\up5 m\up0 o\tab\tab move base line for character no size change\tab
\par \b MyRTB.SelDown 5\tab\tab\tab\tab\tab\tab\b0 dn\tab\tab down\tab\tab\tab De\dn5 m\up0 o
\par \b MyRTB.ExcessSpaceDelete\tab\tab\tab\tab\tab\tab\tab\tab\tab\tab\tab\b0 Remove any space of 2 or more blanks spaces. Select this sentence and try it.
\par \pard\b
\par \b0
\par 13. [OPTIONAL]To use your own selection of RTF code
\par \b
\par \tab MyRTB.ToggleExtendedRTF "\\RTFcode[#]" = Not (MyRTB.ToggleExtendedRTF "\\RTFcode[#]" )
\par \b0
\par This routine is capable of turning the RTFCode on or off if your selection is partially formatted it will turn off.
\par Note the "\\" in the code. If the code needs a numeral component you will need to supply it either by hardcoding or reading it from somewhere else\b
\par \b0 14. [OPTIONAL]to change font size of selected text by one point
\par \b\tab MyRTB.FontSizeStep True \b0 increase size
\par \b\tab MyRTB.FontSizeStep False \b0 decrease size
\par The Demo has these behind the ToolBar buttons with the A and arrows.\b
\par \b0 A mixture of sizes stops VB's .SelfontSize from working by returning a Null value . This routine uses .SelFontSize if all the font is the same size but could just as well be edited to always use direct manipulation of the RTFCode)\b
\par \b0 15.\b \b0 [OPTIONAL]\b MyRTB.HiddenTextShow
\par \b0 This routine has only one use; reveal any hidden text. Probably not much use n the real world. \b
\par \b0 16. [OPTIONAL] Place in RichtextBox1.MouseMove
\par \tab\tab\tab shows the text that the mouse cursor is over without selection.
\par \b\tab\tab\tab Label1.Caption= MyRTB.RichWordOver
\par \b0 This is not mine (see sources at end of document) but its very cute and I'm sure I'll find a use for it someday soon.\b
\par \b0
\par \b\tab\tab\tab\tab\tab\tab\tab\tab\fs48\tab\cf35\highlight33\ul WEIRD TEXT\cf0\highlight0
\par \ulnone\b0\fs26 17. [OPTIONAL] Place in a menu/toolbar/button
\par \b\tab\tab\tab MyRTB.RippleBaseline
\par \b0\dn1 T\dn2 h\dn3 i\dn4 s\dn5 \dn4 p\dn3 u\dn2 t\dn1 s\up0 \up1 a\up2 \up3 w\up4 a\up5 v\up4 e\up3 \up2 i\up1 n\up0 \dn1 t\dn2 h\dn3 e\dn4 \dn5 s\dn4 e\dn3 l\dn2 e\dn1 c\up0 t\up1 e\up2 d\up3 \up4 t\up5 e\up4 x\up3 t\up2 .\up1 \up0 B\dn1 y\dn2 \dn3 d\dn4 e\dn5 f\dn4 a\dn3 u\dn2 l\dn1 t\up0 \up1 i\up2 t\up3 \up4 i\up5 s\up4 \up3 s\up2 e\up1 t\up0 \dn1 t\dn2 o\dn3 \dn4 a\dn5 m\dn4 p\dn3 l\dn2 i\dn1 t\up0 u\up1 d\up2 e\up3 \up4 5\up5 ,\up4 \up3 u\up2 p\up1 \up0 f\dn1 i\dn2 r\dn3 s\dn4 t\dn5 \dn4 b\dn3 u\dn2 t\dn1 \up0 y\up1 o\up2 u\up3 \up4 c\up5 a\up4 n\up3 \up2 s\up1 e\up0 t\dn1 \dn2 b\dn3 o\dn4 t\dn5 h\dn4 \dn3 w\dn2 i\dn1 t\up0 h\up1 \up2 o\up3 p\up4 t\up5 i\up4 o\up3 n\up2 a\up1 l\up0 \dn1 p\dn2 a\dn3 r\dn4 a\dn5 m\dn4 e\dn3 t\dn2 e\dn1 r\up0 s\up1 .\up0
\par 18. [OPTIONAL] Place in a menu/toolbar/button
\par \b\tab\tab\tab MyRTB.RippleTextHeight
\par \b0\fs34 T\fs36 H\fs38 i\fs40 s\fs42 \fs40 p\fs38 u\fs36 t\fs34 s\fs32 \fs34 a\fs36 \fs38 w\fs40 a\fs42 v\fs40 e\fs38 \fs36 a\fs34 c\fs32 r\fs34 o\fs36 s\fs38 s\fs40 \fs42 t\fs40 h\fs38 e\fs36 \fs34 t\fs32 o\fs34 p\fs36 \fs38 o\fs40 f\fs42 \fs40 a\fs38 \fs36 l\fs34 i\fs32 n\fs34 e\fs36 \fs38 o\fs40 f\fs42 \fs40 t\fs38 e\fs36 x\fs34 t\fs32 .\b\fs26
\par \b0
\par 19. [OPTIONAL] Place in a menu/toolbar/button
\par \b\tab\tab\tab MyRTB.Ransom
\par \ulth\i\caps\dn1\fs24 T\ul\up0\fs33 h\uldashd\up3\fs24 i\dn4\fs28 s\ulnone\b0\i0\caps0\up0 \ul\b\i\caps\dn1\fs25 r\ulhair\dn5\fs24 a\uldashd\up0\fs22 n\uldashdd\dn3\fs30 d\up4 o\ulth\up3\fs21 m\ul l\uldash\dn4\fs33 y\ulnone\b0\i0\caps0\up0 \uldashd\b\i\caps\dn2\fs22 a\uldash\dn3\fs35 l\up4\fs33 t\ulhair\dn4\fs29 e\uldashdd\dn2\fs25 r\uldash\dn1\fs32 s\ulnone\b0\i0\caps0\up0 \ul\b\i\caps\up2\fs28 s\uldashdd\fs24 i\ul\dn3\fs35 z\uldashdd\dn1\fs24 e\ulhair\dn5\fs23 ,\ulnone\b0\i0\caps0\up0 \uld\b\i\caps\fs33 b\ulhair\up3\fs28 a\dn5\fs23 s\ul\dn2\fs22 e\uldash\dn1\fs28 l\ulhair\dn2\fs29 i\uldash\dn4\fs31 n\uldashd\up2\fs35 e\ulhair\dn5 ,\up0\fs28 b\ul\dn3\fs32 o\ulth\fs28 l\ul\up1\fs34 d\ulhair\up2\fs33 ,\ulnone\b0\i0\caps0\up0 \ulhair\b\i\caps\up3\fs28 i\uldashd\dn2\fs31 t\ul\up4\fs33 a\uldashd\dn1\fs34 l\uldash\dn4\fs21 i\up0\fs30 c\ul\fs35 ,\ulnone\b0\i0\caps0 \uldashd\b\i\caps\dn5\fs22 s\uldashdd\dn1\fs33 t\uldashd\dn5\fs32 r\ulhair\dn2\fs28 i\uldashdd\dn5\fs30 k\ul\up2\fs21 e\up0\fs30 t\uldash\up4
\par \fs26
\par 20. [OPTIONAL] Place in a menu/toolbar/button
\par \b\tab\tab\tab MyRTB.Ransom True
\par \uldashdd\i\caps\dn3\fs29 T\uldash\up4\fs27 h\uld\dn1\fs32 i\cf42\highlight43\uldashd\dn4\fs33 s\ulnone\b0\i0\caps0\up0 \ul\b\i\caps\up3\fs35 a\uldashdd\up2\fs26 d\uldashd\up0\fs27 d\ul\dn5\fs24 s\ulnone\b0\i0\caps0\up0 \uldashd\b\i\caps\dn1\fs31 r\uldash\fs27 a\uldashdd\up1\fs28 n\uld\dn1\fs26 d\ul\up4\fs22 o\cf0\highlight0\ulth\up3\fs31 m\cf44\highlight45\ulnone\b0\i0\caps0\up0 \ul\b\i\caps\fs27 c\uldash\fs25 o\ulhair\dn3 l\ul\dn1\fs32 o\uldash\dn5\fs30 u\dn1\fs34 r\uldashd\up0\fs27 s\ulnone\b0\i0\caps0 \uldashd\b\i\caps\up2\fs30 t\ulth\fs29 o\ulnone\b0\i0\caps0\up0 \cf0\highlight0\ul\b\i\caps\up3\fs33 t\ulth\fs23 h\uld\up1\fs34 e\ulnone\b0\i0\caps0\up0 \cf46\highlight47\ul\b\i\caps\dn5\fs33 r\ulhair\dn2\fs26 a\up2 n\uldash\dn2\fs27 d\ulhair\dn3\fs21 o\uld\dn4\fs27 m\ulnone\b0\i0\caps0\up0 \uldash\b\i\caps\dn1 f\cf0\highlight0\ulhair\up1\fs32 o\cf48\highlight49\ul\dn1\fs34 n\uldash\dn3\fs33 t\ulnone\b0\i0\caps0\up0 \ul\b\i\caps\up1\fs31 a\ulth\dn5\fs30 p\ul\up2\fs26 p\uldash\dn2\fs34 e\uld\up3\
\par \fs26
\par 21. [OPTIONAL] Place in a menu/toolbar/button
\par \b\tab\tab\tab MyRTB.RandomForeColour
\par \cf52\highlight35\b0 T\cf53 h\cf54 i\cf55 s\cf56 \cf57 r\cf58 a\cf59 n\cf60 d\cf61 o\cf62 m\cf63 l\cf64 y\cf65 \cf66 c\cf67 o\cf68 l\cf69 o\cf70 u\cf71 r\cf72 s\cf73 \cf74 e\cf75 a\cf76 c\cf77 h\cf78 \cf79 c\cf80 h\cf81 a\cf82 r\cf83 a\cf84 c\cf85 t\cf86 e\cf87 r\cf88 \cf89 i\cf90 n\cf91 \cf92 t\cf93 h\cf94 e\cf95 \cf96 s\cf97 e\cf98 l\cf99 e\cf100 c\cf101 t\cf102 i\cf103 o\cf104 n\cf105 .\cf0\highlight0\b
\par \b0\dn1
\par \up0 22. [OPTIONAL] Place in a menu/toolbar/button
\par \b\tab\tab\tab MyRTB.Rainbow (True|False)\tab\b0 default True
\par \b This colours the selection with a value (True), \cf24 t\cf106 h\cf107 e\cf108 \cf109 l\cf25 o\cf110 n\cf111 g\cf112 e\cf113 r\cf26 \cf114 t\cf115 h\cf116 e\cf117 \cf27 s\cf118 e\cf119 l\cf120 e\cf121 c\cf28 t\cf122 i\cf123 o\cf124 n\cf125 \cf29 t\cf126 h\cf127 e\cf128 \cf129 b\cf15 e\cf130 t\cf131 t\cf132 e\cf133 r\cf134 \cf135 t\cf136 h\cf137 e\cf138 \cf30 s\cf139 p\cf140 e\cf141 c\cf142 t\cf143 r\cf144 u\cf145 m
\par \cf0 This colours the selection with a value(False), \cf146 t\cf147 h\cf145 e\cf144 \cf143 l\cf142 o\cf141 n\cf140 g\cf139 e\cf30 r\cf138 \cf137 t\cf136 h\cf135 e\cf134 \cf133 s\cf132 e\cf131 l\cf130 e\cf15 c\cf129 t\cf128 i\cf127 o\cf126 n\cf29 \cf125 t\cf124 h\cf123 e\cf122 \cf28 b\cf121 e\cf120 t\cf119 t\cf118 e\cf27 r\cf117 \cf116 t\cf115 h\cf114 e\cf26 \cf113 s\cf112 p\cf111 e\cf110 c\cf25 t\cf109 r\cf108 u\cf107 m\cf148
\par \cf0 A very long selection Default value
\par \cf24 1\cf149 2\cf150 3\cf151 4\cf152 5\cf153 6\cf154 7\cf155 8\cf156 9\cf157 0\cf158 A\cf159 B\cf160 C\cf161 D\cf162 E\cf163 F\cf164 G\cf165 H\cf166 I\cf167 J\cf168 K\cf169 L\cf170 M\cf171 N\cf172 O\cf173 P\cf174 Q\cf175 R\cf176 S\cf177 T\cf178 U\cf179 V\cf180 W\cf181 X\cf182 Y\cf183 Z\cf184 1\cf185 2\cf186 3\cf187 4\cf188 5\cf189 6\cf190 7\cf191 8\cf192 9\cf193 0\cf194 a\cf195 b\cf196 c\cf197 d\cf198 e\cf199 f\cf200 g\cf201 h\cf202 i\cf203 j\cf204 k\cf205 l\cf206 m\cf207 n\cf208 o\cf209 p\cf210 q\cf211 r\cf212 s\cf213 t\cf214 u\cf215 v\cf216 w\cf109 x\cf217 y\cf218 z\cf219 1\cf220 2\cf221 3\cf222 4\cf223 5\cf224 6\cf225 7\cf226 8\cf227 9\cf228 0\cf229 A\cf230 B\cf231 C\cf232 D\cf233 E\cf25 F\cf234 G\cf235 H\cf236 I\cf237 J\cf238 K\cf239 L\cf240 M\cf241 N\cf242 O\cf243 P\cf244 Q\cf245 R\cf246 S\cf247 T\cf248 U\cf249 V\cf110 W\cf250 X\cf251 Y\cf252 Z\cf253 1\cf254 2\cf255 3\cf256 4\cf257 5\cf258 6\cf259 7\cf260 8\cf261 9\cf262 0\cf263 A\cf264 B\cf265 C\cf111 D\cf266 E\cf267 F\cf268 G\cf269 H\cf270 I\cf27
\par \cf0
\par \b0\dn1 For single\cf33 \cf0 words\cf33\highlight35 \cf24 t\cf26 h\cf28 e\cf15 \cf24 s\cf25 p\cf26 e\cf27 c\cf28 t\cf29 r\cf15 u\cf134 m\cf30 \cf24 i\cf26 s\cf28 \cf24 s\cf25 h\cf26 o\cf27 r\cf28 t\cf29 e\cf15 n\cf134 e\cf30 d\cf33 \highlight0 s\cf0 tarting from the left so for words less than seven letters it's not so pretty, use candy instead.
\par \up0 23. [OPTIONAL] Place in a menu/toolbar/button
\par \b\tab\tab\tab MyRTB.RainBowSub Spectrum, Mode
\par \b0\dn1
\par Spectrum is a Public enum the s# is to let autocomplete present them in a logical manner.
\par mode 1 =left-right 2=right-left 3=left-right-left 4=right-left-right (direction through spectrum name.) the math of 3 & 4 mean that on short words the last letter may not colour properly.
\par \ul\b\up0 Spectrum mode | long selection | short selections> | | | | |\ulnone\dn1
\par \up0 s1RedYellow 1\tab\cf24 C\cf150 o\cf977 l\cf978 o\cf979 u\cf157 r\cf159 s\cf161 \cf162 t\cf164 e\cf166 x\cf168 t\cf170 \cf172 w\cf173 i\cf175 t\cf980 h\cf981 \cf202 s\cf982 u\cf206 b\cf208 set of \cf209 s\cf211 p\cf213 e\cf983 c\cf984 t\cf985 r\cf219 u\cf221 m\cf223 \cf986 i\cf987 n\cf988 \cf230 t\cf232 h\cf25 e\cf234 \cf236 n\cf989 a\cf990 m\cf991 e\cf243 d\cf245 \cf247 r\cf992 a\cf993 n\cf994 g\cf253 e\cf255 ;\cf257 \cf258 l\cf260 o\cf995 n\cf264 g\cf111 e\cf267 r\cf268 \cf270 s\cf272 e\cf996 l\cf997 e\cf998 c\cf279 t\cf281 i\cf283 o\cf999 n\cf1000 s\cf288 \cf290 b\cf292 r\cf293 o\cf295 a\cf297 d\cf299 e\cf300 r\cf302 \cf303 s\cf305 p\cf307 r\cf1001 e\cf1002 a\cf1003 d\cf314 .\cf0 Short selection may \cf24 n\cf206 o\cf260 t\cf996 \cf24 s\cf107 h\cf109 o\cf110 w\cf112 \cf24 v\cf170 i\cf1004 s\cf213 i\cf25 b\cf253 l\cf996 e\cf295 \cf24 d\cf106 i\cf107 f\cf108 f\cf109 e\cf25 r\cf110 e\cf111 n\cf112 c\cf113 e\cf0 .
\par s1RedYellow 2\tab\cf314 C\cf312 o\cf1002 l\cf1001 o\cf1005 u\cf1006 r\cf1007 s\cf301 \cf113 t\cf298 e\cf296 x\cf294 t\cf1008 \cf1009 w\cf1010 i\cf1000 t\cf999 h\cf283 \cf281 s\cf279 u\cf277 b\cf275 \cf996 s\cf1011 e\cf1012 t\cf1013 \cf1014 o\cf265 f\cf263 \cf261 s\cf259 p\cf257 e\cf1015 c\cf1016 t\cf994 r\cf993 u\cf992 m\cf247 \cf245 i\cf243 n\cf241 \cf239 t\cf989 h\cf1017 e\cf1018 \cf1019 n\cf1020 a\cf988 m\cf227 e\cf225 d\cf223 \cf221 r\cf219 a\cf985 n\cf984 g\cf983 e\cf1021 ;\cf1022 \cf209 l\cf207 o\cf205 n\cf203 g\cf201 e\cf108 r\cf1023 \cf1024 s\cf1025 e\cf1004 l\cf190 e\cf188 c\cf186 t\cf184 i\cf182 o\cf1026 n\cf981 s\cf980 \cf1027 b\cf31 r\cf171 o\cf169 a\cf167 d\cf165 e\cf163 r\cf1028 \cf1029 s\cf1030 p\cf979 r\cf978 e\cf152 a\cf150 d\cf24 .\cf0 Short selection may \cf996 n\cf25 o\cf1004 t\cf24 \cf112 s\cf110 h\cf109 o\cf107 w\cf24 \cf295 v\cf996 i\cf253 s\cf25 i\cf213 b\cf1004 l\cf170 e\cf24 \cf113 d\cf112 i\cf111 f\cf110 f\cf25 e\cf109 r\cf108 e\cf107 n\cf106 c\cf24 e\cf0
\par s1RedYellow 3\tab\cf24 C\cf152 o\cf979 l\cf1029 o\cf163 u\cf167 r\cf1031 s\cf1027 \cf178 t\cf182 e\cf185 x\cf1032 t\cf1025 \cf197 w\cf201 i\cf204 t\cf1033 h\cf212 \cf216 s\cf218 u\cf222 b\cf226 \cf230 s\cf25 e\cf236 t\cf240 \cf244 o\cf248 f\cf250 \cf254 s\cf1034 p\cf262 e\cf265 c\cf268 t\cf1011 r\cf997 u\cf280 m\cf283 \cf287 i\cf1009 n\cf1035 \cf298 t\cf301 h\cf1006 e\cf1001 \cf312 n\cf26 a\cf312 m\cf1001 e\cf1006 d\cf301 \cf298 r\cf1035 a\cf1009 n\cf287 g\cf283 e\cf280 ;\cf997 \cf1011 l\cf268 o\cf265 n\cf262 g\cf1034 e\cf254 r\cf250 \cf248 s\cf244 e\cf240 l\cf236 e\cf25 c\cf230 t\cf226 i\cf222 o\cf218 n\cf216 s\cf212 \cf1033 b\cf204 r\cf201 o\cf197 a\cf1025 d\cf1032 e\cf185 r\cf182 \cf178 s\cf1027 p\cf1031 r\cf167 e\cf163 a\cf1029 d\cf979 .\cf0 Short selection may \cf24 n\cf25 o\cf26 t\cf25 \cf24 s\cf25 h\cf26 o\cf25 w\cf24 v\cf1004 i\cf25 s\cf996 i\cf26 b\cf996 l\cf25 e\cf1004 \cf24 d\cf107 i\cf109 f\cf110 f\cf112 e\cf26 r\cf112 e\cf110 n\cf109 c\cf107 e\cf0 .
\par s1RedYellow 4\tab\cf26 C\cf1001 ol\cf301 ou\cf1035 rs\cf287 t\cf280 ex\cf1011 t \cf265 wi\cf1034 th\cf250 s\cf244 ub\cf236 s\cf230 et\cf222 o\cf216 f \cf1033 sp\cf201 ec\cf1025 tr\cf185 um\cf178 i\cf1031 n \cf163 th\cf979 e n\cf1029 a\cf163 m\cf167 e\cf1031 d\cf1027 \cf178 r\cf182 a\cf185 n\cf1032 g\cf1025 e\cf197 ;\cf201 \cf204 l\cf1033 o\cf212 n\cf216 g\cf218 e\cf222 r\cf226 \cf230 s\cf25 e\cf236 l\cf240 e\cf244 c\cf248 t\cf250 i\cf254 o\cf1034 n\cf262 s\cf265 \cf268 b\cf1011 r\cf997 o\cf280 a\cf283 d\cf287 e\cf1009 r\cf1035 \cf298 s\cf301 p\cf1006 r\cf1001 e\cf312 a\cf26 d\cf312 .\cf0 Short selection may \cf26 n\cf25 o\cf26 t\cf25 \cf26 sh\cf24 o\cf25 w\cf26 v\cf996 i\cf25 s\cf1004 i\cf25 b\cf996 l\cf26 e\cf996 \cf26 d\cf112 i\cf110 f\cf109 f\cf107 e\cf109 r\cf110 e\cf112 n\cf26 c\cf112 e\cf0 .
\par \dn1 s2YellowGreen 1\tab\cf26\up0 C\cf317 o\cf319 l\cf1036 o\cf1037 u\cf1038 r\cf1039 s\cf1040 \cf330 t\cf332 e\cf334 x\cf336 t\cf338 \cf1041 w\cf1042 i\cf1043 t\cf1044 h\cf1045 \cf349 s\cf351 u\cf353 b\cf355 \cf357 s\cf1046 e\cf1047 t\cf1048 \cf1049 o\cf116 f\cf368 \cf370 s\cf372 p\cf374 e\cf376 c\cf1050 t\cf1051 r\cf1052 u\cf1053 m\cf1054 \cf386 i\cf388 n\cf390 \cf392 t\cf394 h\cf1055 e\cf1056 \cf1057 n\cf1058 a\cf1059 m\cf1060 e\cf405 d\cf407 \cf409 r\cf23 a\cf412 n\cf1061 g\cf1062 e\cf1063 ;\cf1064 \cf1065 l\cf422 o\cf424 n\cf426 g\cf428 e\cf430 r\cf1066 \cf22 s\cf1067 e\cf1068 l\cf1069 e\cf440 c\cf442 t\cf444 i\cf446 o\cf448 n\cf1070 s\cf1071 \cf1072 b\cf1073 r\cf21 o\cf459 a\cf461 d\cf463 e\cf121 r\cf466 \cf1074 s\cf1075 p\cf1076 r\cf1077 e\cf1078 a\cf477 d\cf479 .\cf0 Short selection may \cf26 n\cf1046 o\cf27 t\cf1069 \cf26 s\cf115 h\cf117 o\cf118 w\cf120 \cf26 v\cf337 i\cf1046 s\cf380 i\cf27 b\cf418 l\cf1069 e\cf460 \cf26 d\cf114 i\cf115 f\cf116 f\cf117 e\cf27 r\cf118 e\cf119 n\
\par \dn1 s2YellowGreen 2\tab\cf479\up0 C\cf477 o\cf1078 l\cf1077 o\cf1076 u\cf1075 r\cf1074 s\cf466 \cf121 t\cf463 e\cf461 x\cf459 t\cf21 \cf1073 w\cf1072 i\cf1071 t\cf1070 h\cf448 \cf446 s\cf444 u\cf442 b\cf440 \cf1069 s\cf1068 e\cf1067 t\cf22 \cf1066 o\cf430 f\cf428 \cf426 s\cf424 p\cf422 e\cf1065 c\cf1064 t\cf1063 r\cf1062 u\cf1061 m\cf412 \cf23 i\cf409 n\cf407 \cf405 t\cf1060 h\cf1059 e\cf1058 \cf1057 n\cf1056 a\cf1055 m\cf394 e\cf392 d\cf390 \cf388 r\cf386 a\cf1054 n\cf1053 g\cf1052 e\cf1051 ;\cf1050 \cf376 l\cf374 o\cf372 n\cf370 g\cf368 e\cf116 r\cf1049 \cf1048 s\cf1047 e\cf1046 l\cf357 e\cf355 c\cf353 t\cf351 i\cf349 o\cf1045 n\cf1044 s\cf1043 \cf1042 b\cf1041 r\cf338 o\cf336 a\cf334 d\cf332 e\cf330 r\cf1040 \cf1039 s\cf1038 p\cf1037 r\cf1036 e\cf319 a\cf317 d\cf26 .\cf0 Short selection may \cf1069 n\cf27 o\cf1046 t\cf26 \cf120 s\cf118 h\cf117 o\cf115 w\cf26 \cf460 v\cf1069 i\cf418 s\cf27 i\cf380 b\cf1046 l\cf337 e\cf26 \cf121 d\cf120 i\cf119 f\cf118 f\cf27 e\cf117 r\cf116 e\cf115 n
\par \dn1 s2YellowGreen 3\tab\cf26\up0 C\cf319 o\cf1037 l\cf1039 o\cf330 u\cf334 r\cf1079 s\cf1042 \cf345 t\cf349 e\cf352 x\cf1080 t\cf1047 \cf364 w\cf368 i\cf371 t\cf1081 h\cf379 \cf383 s\cf385 u\cf389 b\cf393 \cf397 s\cf27 e\cf402 t\cf406 \cf410 o\cf413 f\cf415 \cf419 s\cf1082 p\cf427 e\cf430 c\cf433 t\cf1068 r\cf1083 u\cf445 m\cf448 \cf452 i\cf1073 n\cf1084 \cf463 t\cf466 h\cf1075 e\cf1077 \cf477 n\cf28 a\cf477 m\cf1077 e\cf1075 d\cf466 \cf463 r\cf1084 a\cf1073 n\cf452 g\cf448 e\cf445 ;\cf1083 \cf1068 l\cf433 o\cf430 n\cf427 g\cf1082 e\cf419 r\cf415 \cf413 s\cf410 e\cf406 l\cf402 e\cf27 c\cf397 t\cf393 i\cf389 o\cf385 n\cf383 s\cf379 \cf1081 b\cf371 r\cf368 o\cf364 a\cf1047 d\cf1080 e\cf352 r\cf349 \cf345 s\cf1042 p\cf1079 r\cf334 e\cf330 a\cf1039 d\cf1037 .\cf0 Short selection may \cf26 n\cf27 o\cf28 t\cf27 \cf26 s\cf27 h\cf28 o\cf27 w\cf26 v\cf1046 i\cf27 s\cf1069 i\cf28 b\cf1069 l\cf27 e\cf1046 \cf26 d\cf115 i\cf117 f\cf118 f\cf120 e\cf28 r\cf120 e\cf118 n\cf117 c\cf115 e\cf0 .
\par \dn1 s2YellowGreen 4\tab\cf477\up0 Co\cf1075 lo\cf463 ur\cf1073 s \cf448 te\cf1083 xt\cf433 w\cf427 it\cf419 h \cf413 su\cf406 b \cf27 se\cf393 t \cf385 of\cf379 s\cf371 pe\cf364 ct\cf1080 ru\cf349 m \cf1042 in\cf334 t\cf1039 he\cf319 \cf1037 n\cf1039 a\cf330 m\cf334 e\cf1079 d\cf1042 \cf345 r\cf349 a\cf352 n\cf1080 g\cf1047 e\cf364 ;\cf368 \cf371 l\cf1081 o\cf379 n\cf383 g\cf385 e\cf389 r\cf393 \cf397 s\cf27 e\cf402 l\cf406 e\cf410 c\cf413 t\cf415 i\cf419 o\cf1082 n\cf427 s\cf430 \cf433 b\cf1068 r\cf1083 o\cf445 a\cf448 d\cf452 e\cf1073 r\cf1084 \cf463 s\cf466 p\cf1075 r\cf1077 e\cf477 a\cf28 d\cf477 .\cf0 Short selection may \cf28 n\cf27 o\cf28 t\cf27 sh\cf26 o\cf27 w\cf28 v\cf1069 i\cf27 s\cf1046 i\cf27 b\cf1069 l\cf28 e\cf1069 \cf28 d\cf120 i\cf118 f\cf117 f\cf115 e\cf117 r\cf118 e\cf120 n\cf28 c\cf120 e\cf0 .
\par \dn1 s3GreenCyan 1\tab\cf123 \cf28\up0 C\cf482 o\cf484 l\cf1085 o\cf1086 u\cf1087 r\cf1088 s \cf1089 t\cf1090 e\cf122 x\cf499 t \cf501 w\cf503 i\cf505 t\cf507 h \cf1091 s\cf1092 u\cf1093 b \cf123 s\cf1094 e\cf519 t \cf521 o\cf522 f \cf524 s\cf526 p\cf528 e\cf530 c\cf124 t\cf1095 r\cf1096 u\cf538 m \cf540 i\cf542 n \cf544 t\cf545 h\cf547 e \cf125 n\cf550 a\cf552 m\cf1097 e\cf555 d \cf557 r\cf559 a\cf561 n\cf563 g\cf29 e\cf565 ; \cf567 l\cf569 o\cf571 n\cf573 g\cf575 e\cf577 r \cf579 s\cf126 e\cf582 l\cf584 e\cf586 c\cf587 t\cf589 i\cf591 o\cf1098 n\cf1099 s \cf127 b\cf598 r\cf600 o\cf602 a\cf604 d\cf606 e\cf608 r \cf609 s\cf1100 p\cf128 r\cf1101 e\cf1102 a\cf619 d\cf0 . Short selection may not show visible \cf28 d\cf122 i\cf123 f\cf124 f\cf125 e\cf29 r\cf126 e\cf127 n\cf128 c\cf129 e\cf0 .
\par \dn1 s3GreenCyan 2\tab\cf645 \up0 C\cf643 o\cf1103 l\cf1104 o\cf1105 u\cf1106 r\cf1107 s \cf632 t\cf129 e\cf629 x\cf627 t \cf625 w\cf16 i\cf1108 t\cf1109 h \cf1102 s\cf1101 u\cf614 b \cf612 s\cf610 e\cf608 t \cf606 o\cf1110 f \cf1111 s\cf1112 p\cf17 e\cf1113 c\cf596 t\cf594 r\cf592 u\cf590 m \cf588 i\cf1114 n \cf1115 t\cf1116 h\cf1117 e \cf1118 n\cf578 a\cf576 m\cf574 e\cf572 d \cf570 r\cf1119 a\cf1120 n\cf1121 g\cf1122 e\cf1123 ; \cf1124 l\cf558 o\cf556 n\cf554 g\cf18 e\cf551 r \cf1125 s\cf1126 e\cf1127 l\cf1128 e\cf1129 c\cf541 t\cf539 i\cf537 o\cf535 n\cf533 s \cf124 b\cf19 r\cf1130 o\cf1131 a\cf1132 d\cf522 e\cf520 r \cf518 s\cf516 p\cf514 r\cf1093 e\cf1092 a\cf1091 d\cf1133 .\cf0 Short selection may not show visible difference.
\par \dn1 s3GreenCyan 3\tab\lang1033\b0\up0\fs24 \cf28\lang3081\b\fs26 C\cf484 o\cf1086 l\cf1088 o\cf495 u\cf499 r\cf1134 s \cf1133 t\cf510 e\cf514 x\cf517 t \cf1135 w\cf1131 i\cf529 t\cf533 h \cf536 s\cf1136 u\cf544 b \cf548 s\cf550 e\cf553 t \cf557 o\cf561 f \cf29 s\cf567 p\cf571 e\cf575 c\cf579 t\cf581 r\cf585 u\cf1137 m \cf593 i\cf596 n \cf599 t\cf1111 h\cf1138 e \cf611 n\cf614 a\cf618 m\cf1108 e\cf1139 d \cf629 r\cf632 a\cf1106 n\cf1104 g\cf643 e\cf15 ; \cf643 l\cf1104 o\cf1106 n\cf632 g\cf629 e\cf1139 r \cf1108 s\cf618 e\cf614 l\cf611 e\cf1138 c\cf1111 t\cf599 i\cf596 o\cf593 n\cf1137 s \cf585 b\cf581 r\cf579 o\cf575 a\cf571 d\cf567 e\cf29 r \cf561 s\cf557 p\cf553 r\cf550 e\cf548 a\cf544 d\cf1136 .\cf0 Short selection may not show visible difference.
\par \dn1 s3GreenCyan 4\tab\cf15 \cf643\up0 Co\cf1106 lo\cf629 ur\cf1108 s t\cf614 ex\cf1138 t w\cf599 it\cf593 h s\cf585 ub \cf579 se\cf571 t o\cf29 f s\cf557 pe\cf550 ct\cf544 ru\cf536 m i\cf529 n t\cf1135 he \cf514 na\cf1133 me\cf499 d r\cf1088 an\cf484 g\cf1086 e\cf1088 ; \cf495 l\cf499 o\cf1134 n\cf1133 g\cf510 e\cf514 r \cf517 s\cf1135 e\cf1131 l\cf529 e\cf533 c\cf536 t\cf1136 i\cf544 o\cf548 n\cf550 s \cf553 b\cf557 r\cf561 o\cf29 a\cf567 d\cf571 e\cf575 r \cf579 s\cf581 p\cf585 r\cf1137 e\cf593 a\cf596 d\cf599 .\cf0 Short selection may not show visible difference.
\par \dn1
\par s4CyanBlue\tab 1\tab\cf15\up0 C\cf648 o\cf650 l\cf1140 o\cf1141 u\cf1142 r\cf1143 s \cf1144 t\cf661 e\cf663 x\cf665 t \cf667 w\cf669 i\cf14 t\cf1145 h \cf1146 s\cf1147 u\cf1148 b \cf680 s\cf682 e\cf684 t \cf686 o\cf688 f \cf1149 s\cf1150 p\cf1151 e\cf13 c\cf132 t\cf699 r\cf701 u\cf703 m \cf705 i\cf707 n \cf1152 t\cf1153 h\cf1154 e \cf1155 n\cf1156 a\cf717 m\cf719 e\cf721 d \cf723 r\cf725 a\cf1157 n\cf1158 g\cf1159 e\cf1160 ; \cf1161 l\cf1162 o\cf737 n\cf739 g\cf741 e\cf12 r \cf744 s\cf1163 e\cf1164 l\cf1165 e\cf1166 c\cf1167 t\cf754 i\cf756 o\cf758 n\cf760 s \cf762 b\cf1168 r\cf11 o\cf1169 a\cf1170 d\cf1171 e\cf772 r \cf774 s\cf776 p\cf778 r\cf780 e\cf1172 a\cf1173 d\cf1174 .\cf0 Short selection may not show visible difference.
\par \dn1 s4CyanBlue\tab 2\tab\cf811\up0 C\cf809 o\cf1175 l\cf1176 o\cf1177 u\cf1178 r\cf1179 s \cf798 t\cf138 e\cf795 x\cf793 t \cf791 w\cf10 i\cf1180 t\cf1174 h \cf1173 s\cf1172 u\cf780 b \cf778 s\cf776 e\cf774 t \cf772 o\cf1171 f \cf1170 s\cf1169 p\cf11 e\cf1168 c\cf762 t\cf760 r\cf758 u\cf756 m \cf754 i\cf1167 n \cf1166 t\cf1165 h\cf1164 e \cf1163 n\cf744 a\cf12 m\cf741 e\cf739 d \cf737 r\cf1162 a\cf1161 n\cf1160 g\cf1159 e\cf1158 ; \cf1157 l\cf725 o\cf723 n\cf721 g\cf719 e\cf717 r \cf1156 s\cf1155 e\cf1154 l\cf1153 e\cf1152 c\cf707 t\cf705 i\cf703 o\cf701 n\cf699 s \cf132 b\cf13 r\cf1151 o\cf1150 a\cf1149 d\cf688 e\cf686 r \cf684 s\cf682 p\cf680 r\cf1148 e\cf1147 a\cf1146 d\cf1145 .\cf0 Short selection may not show visible difference.
\par \dn1 s4CyanBlue\tab 3\tab\cf15\up0 C\cf650 o\cf1141 l\cf1143 o\cf661 u\cf665 r\cf1181 s \cf1145 t\cf676 e\cf680 x\cf683 t \cf1182 w\cf1150 i\cf695 t\cf699 h \cf702 s\cf1183 u\cf710 b \cf714 s\cf716 e\cf720 t \cf724 o\cf728 f \cf134 s\cf734 p\cf738 e\cf742 c\cf745 t\cf747 r\cf751 u\cf1184 m \cf759 i\cf762 n \cf765 t\cf1170 h\cf1185 e \cf777 n\cf780 a\cf784 m\cf1180 e\cf1186 d \cf795 r\cf798 a\cf1178 n\cf1176 g\cf809 e\cf30 ; \cf809 l\cf1176 o\cf1178 n\cf798 g\cf795 e\cf1186 r \cf1180 s\cf784 e\cf780 l\cf777 e\cf1185 c\cf1170 t\cf765 i\cf762 o\cf759 n\cf1184 s \cf751 b\cf747 r\cf745 o\cf742 a\cf738 d\cf734 e\cf134 r \cf728 s\cf724 p\cf720 r\cf716 e\cf714 a\cf710 d\cf1183 .\cf0 Short selection may not show visible difference.
\par \dn1 s4CyanBlue\tab 4\tab\cf30\up0 C\cf1176 ol\cf798 ou\cf1186 rs \cf784 te\cf777 xt \cf1170 wi\cf762 th \cf1184 su\cf747 b s\cf742 et \cf734 of \cf728 sp\cf720 ec\cf714 tr\cf1183 um \cf699 in \cf1150 th\cf683 e n\cf676 am\cf1181 ed \cf661 ra\cf1141 nge\cf1143 ; \cf661 l\cf665 o\cf1181 n\cf1145 g\cf676 e\cf680 r \cf683 s\cf1182 e\cf1150 l\cf695 e\cf699 c\cf702 t\cf1183 i\cf710 o\cf714 n\cf716 s \cf720 b\cf724 r\cf728 o\cf134 a\cf734 d\cf738 e\cf742 r \cf745 s\cf747 p\cf751 r\cf1184 e\cf759 a\cf762 d\cf765 .\cf0 Short selection may not show visible difference.
\par \dn1
\par s5BlueMagenta 1\tab\cf30\up0 C\cf814 o\cf816 l\cf1187 o\cf1188 u\cf1189 r\cf1190 s \cf1191 t\cf827 e\cf829 x\cf831 t \cf833 w\cf835 i\cf9 t\cf1192 h \cf1193 s\cf1194 u\cf1195 b \cf846 s\cf848 e\cf850 t \cf852 o\cf854 f \cf1196 s\cf1197 p\cf1198 e\cf8 c\cf141 t\cf865 r\cf867 u\cf869 m \cf871 i\cf873 n \cf1199 t\cf1200 h\cf1201 e \cf1202 n\cf1203 a\cf883 m\cf7 e\cf886 d \cf888 r\cf890 a\cf1204 n\cf1205 g\cf1206 e\cf1207 ; \cf1208 l\cf1209 o\cf902 n\cf904 g\cf906 e\cf6 r \cf909 s\cf1210 e\cf1211 l\cf1212 e\cf1213 c\cf1214 t\cf919 i\cf921 o\cf923 n\cf925 s \cf927 b\cf1215 r\cf5 o\cf1216 a\cf1217 d\cf1218 e\cf937 r \cf939 s\cf941 p\cf943 r\cf945 e\cf1219 a\cf1220 d\cf1221 .\cf0 Short selection may not show visible difference.
\par \dn1 s5BlueMagenta 2\tab\cf976\up0 C\cf974 o\cf1222 l\cf1223 o\cf1224 u\cf1225 r\cf1226 s \cf963 t\cf146 e\cf960 x\cf958 t \cf956 w\cf4 i\cf1227 t\cf1221 h \cf1220 s\cf1219 u\cf945 b \cf943 s\cf941 e\cf939 t \cf937 o\cf1218 f \cf1217 s\cf1216 p\cf5 e\cf1215 c\cf927 t\cf925 r\cf923 u\cf921 m \cf919 i\cf1214 n \cf1213 t\cf1212 h\cf1211 e \cf1210 n\cf909 a\cf6 m\cf906 e\cf904 d \cf902 r\cf1209 a\cf1208 n\cf1207 g\cf1206 e\cf1205 ; \cf1204 l\cf890 o\cf888 n\cf886 g\cf7 e\cf883 r \cf1203 s\cf1202 e\cf1201 l\cf1200 e\cf1199 c\cf873 t\cf871 i\cf869 o\cf867 n\cf865 s \cf141 b\cf8 r\cf1198 o\cf1197 a\cf1196 d\cf854 e\cf852 r \cf850 s\cf848 p\cf846 r\cf1195 e\cf1194 a\cf1193 d\cf1192 .\cf0 Short selection may not show visible difference.
\par \dn1 s5BlueMagenta 3\tab\cf30\up0 C\cf816 o\cf1188 l\cf1190 o\cf827 u\cf831 r\cf1228 s \cf1192 t\cf842 e\cf846 x\cf849 t \cf1229 w\cf1197 i\cf861 t\cf865 h \cf868 s\cf1230 u\cf876 b \cf880 s\cf882 e\cf885 t \cf889 o\cf893 f \cf143 s\cf899 p\cf903 e\cf907 c\cf910 t\cf912 r\cf916 u\cf1231 m \cf924 i\cf927 n \cf930 t\cf1217 h\cf1232 e \cf942 n\cf945 a\cf949 m\cf1227 e\cf1233 d \cf960 r\cf963 a\cf1225 n\cf1223 g\cf974 e\cf3 ; \cf974 l\cf1223 o\cf1225 n\cf963 g\cf960 e\cf1233 r \cf1227 s\cf949 e\cf945 l\cf942 e\cf1232 c\cf1217 t\cf930 i\cf927 o\cf924 n\cf1231 s \cf916 b\cf912 r\cf910 o\cf907 a\cf903 d\cf899 e\cf143 r \cf893 s\cf889 p\cf885 r\cf882 e\cf880 a\cf876 d\cf1230 .\cf0 Short selection may not show visible difference.
\par \dn1 s5BlueMagenta 4\tab\cf3\up0 C\cf1223 ol\cf963 ou\cf1233 rs \cf949 te\cf942 xt \cf1217 wi\cf927 th \cf1231 su\cf912 b s\cf907 et \cf899 of \cf893 sp\cf885 ec\cf880 tr\cf1230 um \cf865 in \cf1197 th\cf849 e n\cf842 am\cf1228 ed \cf827 ra\cf1188 nge\cf1190 ; \cf827 l\cf831 o\cf1228 n\cf1192 g\cf842 e\cf846 r \cf849 s\cf1229 e\cf1197 l\cf861 e\cf865 c\cf868 t\cf1230 i\cf876 o\cf880 n\cf882 s \cf885 b\cf889 r\cf893 o\cf143 a\cf899 d\cf903 e\cf907 r \cf910 s\cf912 p\cf916 r\cf1231 e\cf924 a\cf927 d\cf930 .\cf0 Short selection may not show visible difference.
\par \dn1
\par s6MagentaRed 1\tab\cf3\up0 C\cf1234 o\cf1235 l\cf1236 o\cf1237 u\cf1238 r\cf1239 s \cf1240 t\cf1241 e\cf1242 x\cf1243 t \cf1244 w\cf1245 i\cf1 t\cf1246 h \cf1247 s\cf1248 u\cf1249 b \cf1250 s\cf1251 e\cf1252 t \cf1253 o\cf1254 f \cf1255 s\cf1256 p\cf1257 e\cf1258 c\cf148 t\cf1259 r\cf1260 u\cf1261 m \cf1262 i\cf1263 n \cf1264 t\cf1265 h\cf1266 e \cf1267 n\cf1268 a\cf1269 m\cf1270 e\cf1271 d \cf1272 r\cf1273 a\cf1274 n\cf1275 g\cf1276 e\cf1277 ; \cf1278 l\cf1279 o\cf1280 n\cf1281 g\cf1282 e\cf1283 r \cf1284 s\cf1285 e\cf1286 l\cf1287 e\cf1288 c\cf1289 t\cf1290 i\cf1291 o\cf1292 n\cf1293 s \cf1294 b\cf1295 r\cf1296 o\cf1297 a\cf1298 d\cf1299 e\cf1300 r \cf1301 s\cf1302 p\cf1303 r\cf1304 e\cf1305 a\cf1306 d\cf1307 .\cf0 Short selection may not show visible difference.
\par \dn1 s6MagentaRed 2\tab\cf1308\up0 C\cf1309 o\cf1310 l\cf1311 o\cf1312 u\cf1313 r\cf1314 s \cf1315 t\cf1316 e\cf1317 x\cf1318 t \cf1319 w\cf1320 i\cf1321 t\cf1307 h \cf1306 s\cf1305 u\cf1304 b \cf1303 s\cf1302 e\cf1301 t \cf1300 o\cf1299 f \cf1298 s\cf1297 p\cf1296 e\cf1295 c\cf1294 t\cf1293 r\cf1292 u\cf1291 m \cf1290 i\cf1289 n \cf1288 t\cf1287 h\cf1286 e \cf1285 n\cf1284 a\cf1283 m\cf1282 e\cf1281 d \cf1280 r\cf1279 a\cf1278 n\cf1277 g\cf1276 e\cf1275 ; \cf1274 l\cf1273 o\cf1272 n\cf1271 g\cf1270 e\cf1269 r \cf1268 s\cf1267 e\cf1266 l\cf1265 e\cf1264 c\cf1263 t\cf1262 i\cf1261 o\cf1260 n\cf1259 s \cf148 b\cf1258 r\cf1257 o\cf1256 a\cf1255 d\cf1254 e\cf1253 r \cf1252 s\cf1251 p\cf1250 r\cf1249 e\cf1248 a\cf1247 d\cf1246 .\cf0 Short selection may not show visible difference.
\par \dn1 s6MagentaRed 3\tab\cf3\up0 C\cf1235 o\cf1237 l\cf1239 o\cf1241 u\cf1243 r\cf1322 s \cf1246 t\cf1323 e\cf1250 x\cf1324 t \cf1325 w\cf1256 i\cf1326 t\cf1259 h \cf1327 s\cf1328 u\cf1329 b \cf1330 s\cf1331 e\cf1332 t \cf1333 o\cf1334 f \cf1335 s\cf1336 p\cf1337 e\cf1338 c\cf1339 t\cf1340 r\cf1341 u\cf1342 m \cf1343 i\cf1294 n \cf1344 t\cf1298 h\cf1345 e \cf1346 n\cf1304 a\cf1347 m\cf1321 e\cf1348 d \cf1317 r\cf1315 a\cf1313 n\cf1311 g\cf1309 e\cf24 ; \cf1309 l\cf1311 o\cf1313 n\cf1315 g\cf1317 e\cf1348 r \cf1321 s\cf1347 e\cf1304 l\cf1346 e\cf1345 c\cf1298 t\cf1344 i\cf1294 o\cf1343 n\cf1342 s \cf1341 b\cf1340 r\cf1339 o\cf1338 a\cf1337 d\cf1336 e\cf1335 r \cf1334 s\cf1333 p\cf1332 r\cf1331 e\cf1330 a\cf1329 d\cf1328 .\cf0 Short selection may not show visible difference.
\par \dn1 s6MagentaRed 4\tab\cf24\up0 C\cf1311 ol\cf1315 ou\cf1348 rs \cf1347 te\cf1346 xt \cf1298 wi\cf1294 th \cf1342 su\cf1340 b s\cf1338 et \cf1336 of \cf1334 sp\cf1332 ec\cf1330 tr\cf1328 um \cf1259 in \cf1256 th\cf1324 e n\cf1323 am\cf1322 ed \cf1241 ra\cf1237 nge\cf1239 ; \cf1241 l\cf1243 o\cf1322 n\cf1246 g\cf1323 e\cf1250 r \cf1324 s\cf1325 e\cf1256 l\cf1326 e\cf1259 c\cf1327 t\cf1328 i\cf1329 o\cf1330 n\cf1331 s \cf1332 b\cf1333 r\cf1334 o\cf1335 a\cf1336 d\cf1337 e\cf1338 r \cf1339 s\cf1340 p\cf1341 r\cf1342 e\cf1343 a\cf1294 d\cf1344 .\cf0 Short selection may not show visible difference.
\par \dn1
\par \b0
\par \up0 24. [OPTIONAL] Place in a menu/toolbar/button
\par \b\tab\tab\tab MyRTB.Candy ( s1RedYellow)
\par \b0\dn1
\par \ul\b\up0 paramater | long selection | short selections> | | | | |\ulnone\dn1
\par \up0 s1RedYellow \tab\cf107 C\cf176 o\cf169 l\cf1028 o\cf155 u\cf24 r\cf309 s\cf1007 \cf296 t\cf289 e\cf112 x\cf997 t\cf269 \cf995 w\cf1015 i\cf110 t\cf243 h\cf236 \cf230 a\cf223 l\cf109 t\cf1022 e\cf982 r\cf196 n\cf1032 a\cf107 t\cf176 i\cf169 n\cf1028 g\cf155 \cf24 s\cf309 u\cf1007 b\cf296 \cf289 s\cf112 p\cf997 e\cf269 c\cf995 t\cf1015 r\cf110 u\cf243 m\cf236 \cf230 i\cf223 n\cf109 \cf1022 t\cf982 h\cf196 e\cf1032 \cf107 n\cf176 a\cf169 m\cf1028 e\cf155 d\cf24 \cf309 r\cf1007 a\cf296 n\cf289 g\cf112 e\cf997 ;\cf269 \cf995 l\cf1015 o\cf110 n\cf243 g\cf236 e\cf230 r\cf223 \cf109 s\cf1022 e\cf982 l\cf196 e\cf1032 c\cf107 t\cf176 i\cf169 o\cf1028 n\cf155 s\cf24 \cf309 b\cf1007 r\cf296 o\cf289 a\cf112 d\cf997 e\cf269 r\cf995 \cf1015 s\cf110 p\cf243 r\cf236 e\cf230 a\cf223 d\cf109 .\cf236 \cf0 Short selection may \cf155 n\cf1028 o\cf169 t\cf176 \cf106 s\cf174 h\cf107 o\cf1004 w\cf108 \cf176 v\cf1032 i\cf982 s\cf109 i\cf230 b\cf243 l\cf1015 e\cf269 \cf108 d\cf109 i\cf25 f\cf110 f\cf111 e
\par \dn1 s2YellowGreen \tab\cf115\up0 C\cf343 o\cf336 l\cf1040 o\cf322 u\cf26 r\cf474 s\cf1074 \cf461 t\cf454 e\cf120 x\cf1083 t\cf434 \cf1349 w\cf1065 i\cf118 t\cf409 h\cf402 \cf397 a\cf390 l\cf117 t\cf1050 e\cf1350 r\cf363 n\cf1080 a\cf115 t\cf343 i\cf336 n\cf1040 g\cf322 \cf26 s\cf474 u\cf1074 b\cf461 \cf454 s\cf120 p\cf1083 e\cf434 c\cf1349 t\cf1065 r\cf118 u\cf409 m\cf402 \cf397 i\cf390 n\cf117 \cf1050 t\cf1350 h\cf363 e\cf1080 \cf115 n\cf343 a\cf336 m\cf1040 e\cf322 d\cf26 \cf474 r\cf1074 a\cf461 n\cf454 g\cf120 e\cf1083 ;\cf434 \cf1349 l\cf1065 o\cf118 n\cf409 g\cf402 e\cf397 r\cf390 \cf117 s\cf1050 e\cf1350 l\cf363 e\cf1080 c\cf115 t\cf343 i\cf336 o\cf1040 n\cf322 s\cf26 \cf474 b\cf1074 r\cf461 o\cf454 a\cf120 d\cf1083 e\cf434 r\cf1349 \cf1065 s\cf118 p\cf409 r\cf402 e\cf397 a\cf390 d\cf117 .\cf0 Short selection may \cf322 n\cf1040 o\cf336 t\cf343 \cf114 s\cf341 h\cf115 o\cf1046 w\cf116 \cf343 v\cf1080 i\cf1350 s\cf117 i\cf397 b\cf409 l\cf1065 e\cf434 \cf116 d\cf117 i\cf27 f\cf118 f\
\par \dn1 s3GreenCyan \tab\cf123 \cf508\up0 C\cf501 o\cf1089 l\cf487 o\cf28 u\cf640 r\cf1107 s\cf627 \cf620 t\cf128 e\cf1138 x\cf600 t\cf1098 \cf1114 w\cf126 i\cf574 t\cf567 h\cf561 \cf554 a\cf125 l\cf1129 t\cf1096 e\cf528 r\cf1135 n\cf123 a\cf508 t\cf501 i\cf1089 n\cf487 g\cf28 \cf640 s\cf1107 u\cf627 b\cf620 \cf128 s\cf1138 p\cf600 e\cf1098 c\cf1114 t\cf126 r\cf574 u\cf567 m\cf561 \cf554 i\cf125 n\cf1129 \cf1096 t\cf528 h\cf1135 e\cf123 \cf508 n\cf501 a\cf1089 m\cf487 e\cf28 d\cf640 \cf1107 r\cf627 a\cf620 n\cf128 g\cf1138 e\cf600 ;\cf1098 l\cf1114 o\cf126 n\cf574 g\cf567 e\cf561 r\cf554 \cf125 s\cf1129 e\cf1096 l\cf528 e\cf1135 c\cf123 t\cf508 i\cf501 o\cf1089 n\cf487 s\cf28 \cf640 b\cf1107 r\cf627 o\cf620 a\cf128 d\cf1138 e\cf600 r\cf1098 \cf1114 s\cf126 p\cf574 r\cf567 e\cf561 a\cf554 d\cf125 .\cf0 Short selection may \cf487 n\cf1089 o\cf501 t\cf508 \cf122 s\cf506 h\cf123 o\cf1132 w\cf124 \cf508 v\cf1135 i\cf1096 s\cf125 i\cf561 b\cf574 l\cf1114 e\cf600 \cf124 d\cf125 i\cf29 f\cf126 f
\par \dn1 s4CyanBlue\tab\tab\cf131\up0 C\cf674 o\cf667 l\cf1144 o\cf653 u\cf15 r\cf806 s\cf1179 \cf793 t\cf786 e\cf137 x\cf1185 t\cf766 \cf1351 w\cf1167 i\cf135 t\cf741 h\cf734 \cf728 a\cf721 l\cf133 t\cf1152 e\cf1352 r\cf694 n\cf1182 a\cf131 t\cf674 i\cf667 n\cf1144 g\cf653 \cf15 s\cf806 u\cf1179 b\cf793 \cf786 s\cf137 p\cf1185 e\cf766 c\cf1351 t\cf1167 r\cf135 u\cf741 m\cf734 \cf728 i\cf721 n\cf133 \cf1152 t\cf1352 h\cf694 e\cf1182 \cf131 n\cf674 a\cf667 m\cf1144 e\cf653 d\cf15 \cf806 r\cf1179 a\cf793 n\cf786 g\cf137 e\cf1185 ;\cf766 \cf1351 l\cf1167 o\cf135 n\cf741 g\cf734 e\cf728 r\cf721 \cf133 s\cf1152 e\cf1352 l\cf694 e\cf1182 c\cf131 t\cf674 i\cf667 o\cf1144 n\cf653 s\cf15 \cf806 b\cf1179 r\cf793 o\cf786 a\cf137 d\cf1185 e\cf766 r\cf1351 \cf1167 s\cf135 p\cf741 r\cf734 e\cf728 a\cf721 d\cf133 .\cf0 Short selection may \cf653 n\cf1144 o\cf667 t\cf674 \cf130 s\cf672 h\cf131 o\cf1149 w\cf132 \cf674 v\cf1182 i\cf1352 s\cf133 i\cf728 b\cf741 l\cf1167 e\cf766 \cf132 d\cf133 i\cf134 f\cf135 f
\par \dn1 s5BlueMagenta\tab\cf140\up0 C\cf840 o\cf833 l\cf1191 o\cf819 u\cf30 r\cf971 s\cf1226 \cf958 t\cf951 e\cf147 x\cf1232 t\cf931 \cf1353 w\cf1214 i\cf144 t\cf906 h\cf899 \cf893 a\cf886 l\cf142 t\cf1199 e\cf1354 r\cf860 n\cf1229 a\cf140 t\cf840 i\cf833 n\cf1191 g\cf819 \cf30 s\cf971 u\cf1226 b\cf958 \cf951 s\cf147 p\cf1232 e\cf931 c\cf1353 t\cf1214 r\cf144 u\cf906 m\cf899 \cf893 i\cf886 n\cf142 \cf1199 t\cf1354 h\cf860 e\cf1229 \cf140 n\cf840 a\cf833 m\cf1191 e\cf819 d\cf30 \cf971 r\cf1226 a\cf958 n\cf951 g\cf147 e\cf1232 ;\cf931 \cf1353 l\cf1214 o\cf144 n\cf906 g\cf899 e\cf893 r\cf886 \cf142 s\cf1199 e\cf1354 l\cf860 e\cf1229 c\cf140 t\cf840 i\cf833 o\cf1191 n\cf819 s\cf30 \cf971 b\cf1226 r\cf958 o\cf951 a\cf147 d\cf1232 e\cf931 r\cf1353 \cf1214 s\cf144 p\cf906 r\cf899 e\cf893 a\cf886 d\cf142 .\cf0 Short selection may \cf819 n\cf1191 o\cf833 t\cf840 \cf139 s\cf838 h\cf140 o\cf1196 w\cf141 \cf840 v\cf1229 i\cf1354 s\cf142 i\cf893 b\cf906 l\cf1214 e\cf931 \cf141 d\cf142 i\cf143 f\cf144 f\
\par \dn1 s6MAgentaRed\tab\cf1355\up0 C\cf1356 o\cf1244 l\cf1240 o\cf1357 u\cf3 r\cf1358 s\cf1314 \cf1318 t\cf1359 e\cf1360 x\cf1345 t\cf1361 \cf1362 w\cf1289 i\cf1363 t\cf1282 h\cf1336 \cf1334 a\cf1271 l\cf1364 t\cf1264 e\cf1365 r\cf1366 n\cf1325 a\cf1355 t\cf1356 i\cf1244 n\cf1240 g\cf1357 \cf3 s\cf1358 u\cf1314 b\cf1318 \cf1359 s\cf1360 p\cf1345 e\cf1361 c\cf1362 t\cf1289 r\cf1363 u\cf1282 m\cf1336 \cf1334 i\cf1271 n\cf1364 \cf1264 t\cf1365 h\cf1366 e\cf1325 \cf1355 n\cf1356 a\cf1244 m\cf1240 e\cf1357 d\cf3 \cf1358 r\cf1314 a\cf1318 n\cf1359 g\cf1360 e\cf1345 ;\cf1361 \cf1362 l\cf1289 o\cf1363 n\cf1282 g\cf1336 e\cf1334 r\cf1271 \cf1364 s\cf1264 e\cf1365 l\cf1366 e\cf1325 c\cf1355 t\cf1356 i\cf1244 o\cf1240 n\cf1357 s\cf3 \cf1358 b\cf1314 r\cf1318 o\cf1359 a\cf1360 d\cf1345 e\cf1361 r\cf1362 \cf1289 s\cf1363 p\cf1282 r\cf1336 e\cf1334 a\cf1271 d\cf1364 .\cf0 Short selection may \cf1357 n\cf1240 o\cf1244 t\cf1356 \cf1367 s\cf1368 h\cf1355 o\cf1255 w\cf148 \cf1356 v\cf1325 i\cf1365 s\cf1364 i
\par \dn1
\par \b0\up0 24. [OPTIONAL] Place in a menu/toolbar/button
\par \b\tab\tab\tab MyRTB.Material ("Namestring", [InOut =T|F] T=Defualt
\par \b0 This is a more subtle colour tool the long selection in the example does not really show the effect try selecting the whole example space and applying the routine.
\par diamond is near white so is on a black highlighter\b
\par \b0\dn1
\par \ul\b\up0 paramater | long selection | short selections> | | | | |\ulnone\dn1
\par "gold", T\tab\tab\cf1370 The Mat\cf1371 erial colour routine uses a gradient formulae to colour text;l\up0 ong\cf1271 \cf1371 selecti\cf1372 ons\cf3 \cf1372 wider\cf1362 \cf1372 spread.\cf0 Short selection may \cf1357 n\cf1240 o\cf1244 t\cf1356 \cf1367 s\cf1368 h\cf1355 o\cf1255 w\cf148 \cf1356 v\cf1325 i\cf1365 s\cf1364 i\cf1334 b\cf1282 l\cf1289 e\cf1361 \cf148 d\cf1364 i\cf1335 f\cf1363 f\cf1369 e\cf1360 r\cf1316 e\cf3 n\cf1242 c\cf1355 e\cf0 .
\par \dn1 "gold", T\tab\tab\cf1373 The Material co\cf1374 lour routine uses a gradient formulae to colour text;l\up0 ong\cf1271 \cf1374 selecti\cf1375 ons\cf3 \cf1375 wider\cf1362 \cf1375 spread.\cf0 Short selection may \cf1357 n\cf1240 o\cf1244 t\cf1356 \cf1367 s\cf1368 h\cf1355 o\cf1255 w\cf148 \cf1356 v\cf1325 i\cf1365 s\cf1364 i\cf1334 b\cf1282 l\cf1289 e\cf1361 \cf148 d\cf1364 i\cf1335 f\cf1363 f\cf1369 e\cf1360 r\cf1316 e\cf3 n\cf1242 c\cf1355 e\cf0 .
\par \dn1 "slate", T\tab\tab\cf1376 The Material colour routine uses a gradi\cf1377 ent formulae to colour text;l\up0 ong\cf1271 \cf1377 selections\cf3 \cf1377 wider\cf1362 \cf1377 spread\cf1364 .\cf0 Short selection may \cf1357 n\cf1240 o\cf1244 t\cf1356 \cf1367 s\cf1368 h\cf1355 o\cf1255 w\cf148 \cf1356 v\cf1325 i\cf1365 s\cf1364 i\cf1334 b\cf1282 l\cf1289 e\cf1361 \cf148 d\cf1364 i\cf1335 f\cf1363 f\cf1369 e\cf1360 r\cf1316 e\cf3 n\cf1242 c\cf1355 e\cf0 .
\par \dn1 "slate", T\tab\tab\cf1376 The Material colour routine uses a gradie\cf1377 nt formulae to colour text;l\up0 ong\cf1271 \cf1377 selections\cf3 \cf1377 wider\cf1362 \cf1377 spread.\cf0 Short selection may \cf1357 n\cf1240 o\cf1244 t\cf1356 \cf1367 s\cf1368 h\cf1355 o\cf1255 w\cf148 \cf1356 v\cf1325 i\cf1365 s\cf1364 i\cf1334 b\cf1282 l\cf1289 e\cf1361 \cf148 d\cf1364 i\cf1335 f\cf1363 f\cf1369 e\cf1360 r\cf1316 e\cf3 n\cf1242 c\cf1355 e\cf0 .
\par \dn1 "rubber", T\tab\tab\cf1378 The Material colour ro\cf1379 utine uses a gradient formulae to colour text;l\up0 ong\cf1271 \cf1379 selections\cf3 \cf1379 wider\cf1362 \cf1379 spread.\cf0 Short selection may \cf1357 n\cf1240 o\cf1244 t\cf1356 \cf1367 s\cf1368 h\cf1355 o\cf1255 w\cf148 \cf1356 v\cf1325 i\cf1365 s\cf1364 i\cf1334 b\cf1282 l\cf1289 e\cf1361 \cf148 d\cf1364 i\cf1335 f\cf1363 f\cf1369 e\cf1360 r\cf1316 e\cf3 n\cf1242 c\cf1355 e\cf0 .
\par \dn1 "rubber", T\tab\tab\cf1378 The Material colour r\cf1379 outine uses a gradient formulae to colour text;l\up0 ong\cf1271 \cf1379 selections\cf3 \cf1379 wider\cf1362 \cf1379 spread.\cf0 Short selection may \cf1357 n\cf1240 o\cf1244 t\cf1356 \cf1367 s\cf1368 h\cf1355 o\cf1255 w\cf148 \cf1356 v\cf1325 i\cf1365 s\cf1364 i\cf1334 b\cf1282 l\cf1289 e\cf1361 \cf148 d\cf1364 i\cf1335 f\cf1363 f\cf1369 e\cf1360 r\cf1316 e\cf3 n\cf1242 c\cf1355 e\cf0 .
\par \dn1 "blue steel", T\tab\cf1380 Th\cf1381 e Material colour routine uses a gradient formulae to colour text;l\up0 ong\cf1271 \cf1381 selec\cf1382 tions\cf3 \cf1382 wider\cf1362 \cf1382 spread.\cf0 Short selection may \cf1357 n\cf1240 o\cf1244 t\cf1356 \cf1367 s\cf1368 h\cf1355 o\cf1255 w\cf148 \cf1356 v\cf1325 i\cf1365 s\cf1364 i\cf1334 b\cf1282 l\cf1289 e\cf1361 \cf148 d\cf1364 i\cf1335 f\cf1363 f\cf1369 e\cf1360 r\cf1316 e\cf3 n\cf1242 c\cf1355 e\cf0 .
\par \dn1 "blue steel", T\tab\cf1381 The Material colour routine uses a gradient formulae to colour text;l\up0 ong\cf1271 \cf1381 sele\cf1382 ctions\cf3 \cf1382 wider\cf1362 \cf1382 spread\cf1377 .\cf0 Short selection may \cf1357 n\cf1240 o\cf1244 t\cf1356 \cf1367 s\cf1368 h\cf1355 o\cf1255 w\cf148 \cf1356 v\cf1325 i\cf1365 s\cf1364 i\cf1334 b\cf1282 l\cf1289 e\cf1361 \cf148 d\cf1364 i\cf1335 f\cf1363 f\cf1369 e\cf1360 r\cf1316 e\cf3 n\cf1242 c\cf1355 e\cf0 .
\par \dn1 "silver", T\tab\tab\cf1383 T\cf1384 he Material colour routine uses a gradient formulae to colour text;l\up0 ong\cf1271 \cf1384 selec\cf1385 tions\cf3 \cf1385 wider\cf1362 \cf1385 spread.\cf0 Short selection may \cf1357 n\cf1240 o\cf1244 t\cf1356 \cf1367 s\cf1368 h\cf1355 o\cf1255 w\cf148 \cf1356 v\cf1325 i\cf1365 s\cf1364 i\cf1334 b\cf1282 l\cf1289 e\cf1361 \cf148 d\cf1364 i\cf1335 f\cf1363 f\cf1369 e\cf1360 r\cf1316 e\cf3 n\cf1242 c\cf1355 e\cf0 .
\par \dn1 "silver", T\tab\tab\cf1384 The Material colour routine uses a gradient formulae to colour text;l\up0 ong\cf1271 \cf1384 sele\cf1385 ctions\cf3 \cf1385 wider\cf1362 \cf1385 spread\cf1377 .\cf0 Short selection may \cf1357 n\cf1240 o\cf1244 t\cf1356 \cf1367 s\cf1368 h\cf1355 o\cf1255 w\cf148 \cf1356 v\cf1325 i\cf1365 s\cf1364 i\cf1334 b\cf1282 l\cf1289 e\cf1361 \cf148 d\cf1364 i\cf1335 f\cf1363 f\cf1369 e\cf1360 r\cf1316 e\cf3 n\cf1242 c\cf1355 e\cf0 .
\par \dn1 "ice", T\tab\tab\cf1386 The Material colour routine uses a gradient formulae to colour text;l\up0 ong\cf1271 \cf1386 selections\cf3 \cf1386 wider\cf1362 \cf1386 spread.\cf0 Short selection may \cf1357 n\cf1240 o\cf1244 t\cf1356 \cf1367 s\cf1368 h\cf1355 o\cf1255 w\cf148 \cf1356 v\cf1325 i\cf1365 s\cf1364 i\cf1334 b\cf1282 l\cf1289 e\cf1361 \cf148 d\cf1364 i\cf1335 f\cf1363 f\cf1369 e\cf1360 r\cf1316 e\cf3 n\cf1242 c\cf1355 e\cf0 .
\par \dn1 "ice", T\tab\tab\cf1386 The Material colour routine uses a gradient formulae to colour text;l\up0 ong\cf1271 \cf1386 selections\cf3 \cf1386 wider\cf1362 \cf1386 spread.\cf0 Short selection may \cf1357 n\cf1240 o\cf1244 t\cf1356 \cf1367 s\cf1368 h\cf1355 o\cf1255 w\cf148 \cf1356 v\cf1325 i\cf1365 s\cf1364 i\cf1334 b\cf1282 l\cf1289 e\cf1361 \cf148 d\cf1364 i\cf1335 f\cf1363 f\cf1369 e\cf1360 r\cf1316 e\cf3 n\cf1242 c\cf1355 e\cf0 .
\par \dn1 "diamond", T\tab\cf35\highlight33 The Material colour routine uses a gradient formulae to colour text;l\up0 ong\cf1271 \cf35 selections\cf3 \cf35 wider\cf1362 \cf35 spread\highlight0 .\cf0 Short selection may \cf1357 n\cf1240 o\cf1244 t\cf1356 \cf1367 s\cf1368 h\cf1355 o\cf1255 w\cf148 \cf1356 v\cf1325 i\cf1365 s\cf1364 i\cf1334 b\cf1282 l\cf1289 e\cf1361 \cf148 d\cf1364 i\cf1335 f\cf1363 f\cf1369 e\cf1360 r\cf1316 e\cf3 n\cf1242 c\cf1355 e\cf0 .
\par \dn1 "diamond", T\tab\cf35\highlight33 The Material colour routine uses a gradient formulae to colour text;l\up0 ong selections wider spread.\cf0\highlight0 Short selection may \cf1357 n\cf1240 o\cf1244 t\cf1356 \cf1367 s\cf1368 h\cf1355 o\cf1255 w\cf148 \cf1356 v\cf1325 i\cf1365 s\cf1364 i\cf1334 b\cf1282 l\cf1289 e\cf1361 \cf148 d\cf1364 i\cf1335 f\cf1363 f\cf1369 e\cf1360 r\cf1316 e\cf3 n\cf1242 c\cf1355 e\cf0 .
\par \dn1 "lead", T\tab\tab\cf1387 The Material col\cf1388 our routine uses a gradient formulae to colour text;l\up0 ong\cf1271 \cf1388 selections\cf3 \cf1388 wider\cf1362 \cf1388 spread.\cf0 Short selection may \cf1357 n\cf1240 o\cf1244 t\cf1356 \cf1367 s\cf1368 h\cf1355 o\cf1255 w\cf148 \cf1356 v\cf1325 i\cf1365 s\cf1364 i\cf1334 b\cf1282 l\cf1289 e\cf1361 \cf148 d\cf1364 i\cf1335 f\cf1363 f\cf1369 e\cf1360 r\cf1316 e\cf3 n\cf1242 c\cf1355 e\cf0 .
\par \dn1 "lead", T\tab\tab\cf1389 The Material colour routine uses a gradient formulae to colour text;l\up0 ong\cf1271 \cf1389 selections\cf3 \cf1389 wider\cf1362 \cf1389 spread\cf1386 .\cf0 Short selection may \cf1357 n\cf1240 o\cf1244 t\cf1356 \cf1367 s\cf1368 h\cf1355 o\cf1255 w\cf148 \cf1356 v\cf1325 i\cf1365 s\cf1364 i\cf1334 b\cf1282 l\cf1289 e\cf1361 \cf148 d\cf1364 i\cf1335 f\cf1363 f\cf1369 e\cf1360 r\cf1316 e\cf3 n\cf1242 c\cf1355 e\cf0 .
\par \dn1
\par \b0\up0 22. [OPTIONAL] \fs30 quote tools.
\par \ul\b\fs26 Insert in your code \tab\tab\tab\tab\tab\tab Code\tab\tab LongName\tab\tab Demo\ulnone
\par .SelQuoteSng\tab\tab\tab\tab\tab\tab\tab\tab\tab\tab 'Demo'\tab\b0 These routines insert quotes around selections. They have been optimised to \b MyRTB.SelQuoteDbl\b0\tab\tab\tab\tab\tab\tab\tab\tab\tab\tab "Demo"\tab move left quotes against the first word and right quotes against the last word.\b
\par \b0\tab\tab\tab\tab\tab\tab\tab\tab *lquote\tab leftquote\tab\tab
\par \tab\tab\tab\tab\tab\tab\tab\tab *rquote\tab rightquote
\par \tab\tab\tab\tab\tab\tab\tab\tab l*dblquote\tab leftdoublequote
\par \tab\tab\tab\tab\tab\tab\tab\tab *rdblquote\tab rightdoublequote
\par *Not fully supported they are automatically converted by the RTF engine to the standard quote characters. So you can insert quotes around the selected text but unlike the real VB .SelXXX properties you cannot select and remove.
\par 23. [OPTIONAL]
\par See Jump Menu and 'Document Postion' Label below.
\par \b
\par label1.Caption= MyRTB.DocPercent &"%"\tab\tab\tab\b0 return the postion of the selection point as a percentage
\par \pard\nowidctlpar\b MyRTB.DocPercent = 50\tab\tab\tab\tab\tab\tab\b0 Set the postion of the selection point as a percentage
\par \b
\par \tab\tab\tab\tab\tab\tab\tab\cf35\highlight33\ul\fs38 DEMO PROGRAM DESCRIPTION\cf0\highlight0\fs26
\par \ulnone\b0\caps TEXTBOXS and Reset Buttons\caps0
\par the text boxes below contain the full RTF code for this document(upper) and the current SelRTF text(middle) and the current SelText (bottom).
\par The Text boxes are updated automatically from RichTextBox1_SelChange. Because of the enormous amount of colour used in this demo document the TextRTF TextBox doesn't reset its position acurately to the current position in this document but even this far ito the document it is only two screens away (Select TextRTF then PageDown twice).
\par However if you edit in the TextRTF or SelRTF text then click the related \cf33\highlight2 Reset button\cf0\highlight0 (before moving the mouse over the RichTextBox) the change will be sent to this window. You can use this method to experiment with RTF, it is what I did to develop the class. If your editing is not supported you will see it is automatically deleted or it may be restructured into the RTF engines prefered order of code. If you damage the integrity of the RTF code this text may be turned to garbage. If you do that DO NOT SAVE or you'll lose this document. However you will still have the original text if you restart the program because a copy is stored in the rfthighlightX.frx file.
\par \caps CheckBoxes
\par \caps0 These use the HasXXXXX properties to report on ExtendedRTF properties of the whole document. They are works in progress towards proper SelXXXX style properties.
\par RichWOrdOver Frame
\par This shows the word under the mouse cursor. As programmed it does not match exactly RichTextBox's definition of a word. The Underscore character is recognised as part of a word and punctuation is ignored. Try selecting SelChange in RichTextBox1_SelChange or this ampersand &.
\par \b\tab\tab\tab\tab\tab\tab\tab\tab\tab\cf35\highlight33\ul\fs46 SOURCES & THANKS\cf0\highlight0\ulnone\b0
\par \fs26 Search VB's Help for "Supported RTF Codes" article
\par \pard\nowidctlpar\sb100\sa100\fs24 Rich Text Format (RTF) Version 1.5 Specification from Microsoft
\par *Q154884 - HOWTO: Find and Highlight Text in the RichTextBox Control All Products This was not helpful it is about selecting text and changing it ForeColor.
\par \ul Unknown Sources and inspirations too numerous and deep seated to reference specifically\ulnone
\par Visual Basic Programmer's Journal
\par VB2Max
\par PlanetCodeSource
\par \fs26 VB-helper\fs24
\par \ul\b Known Code Sources\ulnone\b0
\par \pard\nowidctlpar\fs26 Public Function RichWordOver() As String
\par 'Ready-To-Run Visual Basic Algorithms, Second Edition
\par 'http://www.vb-helper.com/vba.htm
\par modified for class usage by adding Sub \b MouseMove\b0 to the class as it needs to know about X and Y for mouse. \b
\par \b0 Span Example in VB Help for code behind Ctrl+W and Ctrl+S Hotkeys
\par \b
\par \b0 Enforce Case for Enums (does not compile) Barry Garvin VBPJ 101 Tech Tips 11 March 2001 p1
\par \b
\par \tab\tab\tab\tab\tab\tab\tab\tab\tab\ul CONTACT\ulnone\b0
\par \tab\tab\tab\tab\tab\tab\tab
\par \tab\tab\tab\tab\tab\tab\tab RE: ClsExtendedRTF Comments
\par \tab\tab\tab\tab\tab\tab\tab e-mail address: rojagilkrist@hotmail.com
\par \pard\nowidctlpar\qc\cf3\b\fs36
\par }
Toolbar1
MSComctlLib.Toolbar
Combo1
ImageList1
MSComctlLib.ImageList
wwwwwwwwwwwwwwwwwwwwwwww}
wwwwuWUwwwwwp
wwwwww
wwwwwwp
wwwwwwwwwwwwwwwwwwwwwwwwwww
pp""pp
p""""p
p""""p
pr"" p
pppppp
ps330p
p3333p
p3333p
pp33pp
ps330p
p3333p
p3333p
pp33pp
wwwwwp
wwwwwwpw
wwwwwww
wwwwwwpw
wwpwww
wwwwpw
CommonDialog1
MSComDlg.CommonDialog
Label4
RichTextBox1.Text
Label5
Label5
Label2
RichTextBox1.TextRTF
Label3
RichTextBox1.SelRTF
&Restore
S&ave As
&UnderLines
Ulsmnu
Standard
Ulsmnu
dotted
Ulsmnu
Ulsmnu
DashDot
Ulsmnu
DashDotDot
Ulsmnu
Ulsmnu
Ulsmnu
Ulsmnu
Ulsmnu
Problematic
probul
probul
double
Ulsmnu
Ulsmnu
Remove AnyUnderline
&HighLighter
Yellow
Marigold
Select Highlight...
Select Highlight Auto Text Colour...
Select Highlight and Text Colour...
Clear Highlight
&Visible
Hide (Toggle)
Show All Hidden
Tag Selected
Hide Tagged
&Miscellaneous
Single Quote
Double Quote
Bold <b> <\b>
LineNumbers
Show Para Marks
Italic Hotkey
italic
Italic
Formatmnu
Font Painter
Text Look Panel
Text Colour Panel
Remove All Formatting
Remove UpDownSubSuper
Remove All Colour Formats
Remove Text Colour Formats
Remove Back Colour Formats
Remove Excess Spaces
hlpmnu
ClsManifestation
clsAPIHighlight
Programmer
End-User
ClsAPIZoom
Programmer
End-User
ClsRTFFontPainter
CslExtendedRTF
0&&&&&+
&&&&&+
0###&&&&&+
00&&((###
FileName
ActiveUpdate
EndUser
MainStr
PercentT_RatioF
StartTag
EndTag
RTFCode
DeleteTag
AtStart
FullAssign
ColStr
FullDoc
UlStyle
CColour
vNewValue
DefFileName
KeyCode
Button
ShwFName
LeftRight
ForeBack
CStart
Spread
StyleName
SubStyleName
SubStyleValue
StylePrivate
TextBack
blnHarden
LightDark
BigTSmallF
MaterialName
Multiplier
RedMagenta
ColorSet
Colorise
Amplitude
UPDOWN
InitialNum
WaveLength
styles
PreserveColour
ClrBack
ClrText
ButtonKey
Inverse
SubToggle
Destinaq
v6vIX4TWp
sxjBijX8F
aAMQXco2v
cWVaTUS
conchety
turrasca
} j|hx,A
}#jthx,A
}#jthx,A
} jphx,A
}#jthx,A
Z9=,PI
,9=,PI
jThx,A
jPhx,A
jThx,A
jThx,A
j4hx.A
WQh05A
PRh\5A
jPhx5A
T$0_^]
jXhx5A
VQh\5A
PRhh5A
WRh05A
PQhh5A
RPhh5A
PRhh9A
jPhx5A
jPhx5A
~HRhh5A
T$$_^f
VQh\5A
PRhh5A
RPh05A
SQh\5A
PRhh5A
VQh\5A
PRhh5A
T$$RV3
T$$PQj
L$(_^3
T$$PQj
L$(_^3
T$0_^]
PRhh9A
T$0_^]
jTh0'A
jThx,A
jThx,A
jThx,A
jPhx,A
jPhx,A
jPhx,A
jPhx,A
jPhx,A
jPhx,A
jThx,A
jPhx,A
jPhx,A
jPhx,A
jPhx,A
09=(PI
|9=(PI
V4h0'A
V4h|'A
jXhx5A
RthXqG
jPhx5A
jPhx5A
jXhx5A
jPhx5A
jPhx5A
jXhx5A
FtHtfH
jPhx5A
jXhx5A
MSVBVM60.DLL
__vbaVarTstGt
__vbaVarSub
__vbaStrI2
__vbaNextEachAry
_CIcos
_adj_fptan
__vbaVarMove
__vbaStrI4
__vbaVarVargNofree
__vbaAryMove
__vbaFreeVar
__vbaLineInputStr
__vbaLateIdCall
__vbaStrVarMove
__vbaLenBstr
__vbaFreeVarList
__vbaEnd
_adj_fdiv_m64
__vbaFpCDblR8
__vbaVarIndexStore
__vbaNextEachVar
__vbaLineInputVar
__vbaFreeObjList
__vbaStrErrVarCopy
__vbaVarIndexLoadRef
_adj_fprem1
__vbaRecAnsiToUni
__vbaI2Abs
__vbaStrCat
__vbaSetSystemError
__vbaHresultCheckObj
__vbaLenVar
__vbaVargVarCopy
_adj_fdiv_m32
__vbaAryVar
__vbaVarTstLe
__vbaAryDestruct
__vbaVarIndexLoadRefLock
__vbaLateMemSt
__vbaVarForInit
__vbaVarPow
__vbaForEachCollObj
__vbaExitProc
__vbaObjSet
__vbaOnError
_adj_fdiv_m16i
__vbaObjSetAddref
_adj_fdivr_m16i
__vbaVarIndexLoad
__vbaFpR4
__vbaBoolVar
__vbaVargVar
__vbaVarTstLt
__vbaRefVarAry
__vbaFpR8
__vbaBoolVarNull
_CIsin
__vbaErase
__vbaVarZero
__vbaNextEachCollObj
__vbaVargVarMove
__vbaVarCmpGt
__vbaChkstk
__vbaFileClose
EVENT_SINK_AddRef
__vbaGenerateBoundsError
__vbaGet3
__vbaStrCmp
__vbaAryConstruct2
__vbaVarTstEq
__vbaObjVar
__vbaI2I4
DllFunctionCall
__vbaVarLateMemSt
__vbaCastObjVar
__vbaStrR4
__vbaLbound
__vbaRedimPreserve
_adj_fpatan
__vbaR4Var
__vbaLateIdCallLd
__vbaStrR8
__vbaRedim
__vbaRecUniToAnsi
EVENT_SINK_Release
__vbaUI1I2
_CIsqrt
__vbaObjIs
__vbaRedimVar
__vbaVarAnd
EVENT_SINK_QueryInterface
__vbaVarMul
__vbaExceptHandler
__vbaPrintFile
__vbaStrToUnicode
__vbaExitEachAry
_adj_fprem
_adj_fdivr_m64
__vbaI2Str
__vbaVarDiv
__vbaFPException
__vbaInStrVar
__vbaUbound
__vbaStrVarVal
__vbaVarCat
__vbaCheckType
__vbaI2Var
_CIlog
__vbaErrorOverflow
__vbaFileOpen
__vbaR8Str
__vbaVar2Vec
__vbaInStr
__vbaNew2
_adj_fdiv_m32i
_adj_fdivr_m32i
__vbaStrCopy
__vbaI4Str
__vbaVarCmpLt
__vbaFreeStrList
__vbaVarNot
_adj_fdivr_m32
_adj_fdiv_r
__vbaVarTstNe
__vbaVarSetVar
__vbaI4Var
__vbaForEachAry
__vbaVarCmpEq
__vbaVarAdd
__vbaAryLock
__vbaLateMemCall
__vbaStrToAnsi
__vbaVarDup
__vbaFpI2
__vbaVarLateMemCallLd
__vbaVarCopy
__vbaFpI4
__vbaVarSetObjAddref
__vbaR8IntI2
__vbaLateMemCallLd
_CIatan
__vbaAryCopy
__vbaI2ErrVar
__vbaStrMove
__vbaCastObj
__vbaForEachVar
__vbaStrVarCopy
__vbaR8IntI4
_allmul
__vbaLateIdSt
__vbaLateMemCallSt
_CItan
__vbaFPInt
__vbaAryUnlock
__vbaVarForNext
_CIexp
__vbaMidStmtBstr
__vbaI4ErrVar
__vbaFreeStr
__vbaFreeObj
SU3s7iw
X!+24Zn#L
%C']py
e'GUr+
D(nz9`
h&1|Q9
UWo>+;
t -wl{
g^zb62z
D1ZQgV/
zCIt`J
|1Gs;2dEW5GK
e(5lvB
/Zr<o#k
2A(AA1
421/.#
a!uU,Y
0Jon7~
|]WB3NU
ibmI b
` r-h^
Z<)_>r
hdS+V[*
t}{d-9
"e?@\TDC
LSSBy_
kA4]>t
b} iM[
{NG".P
e?;Fx9
o%tjz>
/}x9>w
;MCg!r
2k6"Q!;WN
(7-X[1
"cQeALCl
"*;L*?
S4[Y\`
c";2+$.o
L<}! *
?G5>#"
y==?R_
S;K CsR
%k@*eU
|y~< z
o~wSzh
E);O?#
MoDuWFbKY
mSOUjWu
RuExYSWBAmgnLpqucdqndQryGMCKMlDuWBb
d,1:$b1
"m1>#L-
Y`^EqjWuNRuE(
ucdqndQr
GOB@LgDu
AbKQHudjwmm9VjWUNRuExYSW
AmGnLpsuc`qndQryGICKMlDuWB
HYHwdjwmSOWj
NReExISWBA}gn\pqucdq~dQryGMCKMlD
tmCJUjWuNRuExYSWBAmgnLp
vchqndQryGMCKMlDuWBbKYHudjwmSOUjWuNRuExYSWBAmgnLpqucdqnDQrqGMCKMlDuWBbCyHu,jwmSOUjWuNR[1
!'WBA)1mLpQucd)mdQpyGMCKMlDuWBbKYhud
Y =6jWu^WuEx
PWBGmgn
squcdqndQryGMC
$:HuhjwmS
VjWwNRu%{YSWBAmgnLpquc$qn&QryGMCKMlDuWBbKYh
gjwmSO
jWuLRpE
mgmLpqlcdwndQryGMCKMlDuWBbKYHudjwmSOUjWuNRuExYSWBAmgnLpquczsFeQrsmSAcIlD
kwmW<RjW
PuE|*[WBK
`Qr}mMCX}nDYWBbJYHdra\vSHB
VYLJ~E
VnCzlnKh
tOfZlO
xGMG$GlD
}QRIYdudjumS^Ca|nNUb
yuQOIAjq
M\sbhdvv
P^{lOh
3nDuS-iKYB_wZum
OUjTuNCcNSBSPU
lKlT{qru
pBfFyy@U
Janow|
fwmYeFZUubRuE|YSFTJF|nKg
tOfiedVd
FaA\FlCm
CNIrJ^
smSK:gWuDxfuzY}WBAhgn]fz^xdvy
P^{_FCL[
EYUUiK^P
eFuFQd
hT]_RuOPKSWHkmg}|rq]cdqhdQcoLfXKJ{
t{@z@YOc
k[oDDUmO
O~wnzr
UjRmgdfcAwcHqndVryV[H`VlCb
CNIACuc|
MBaWrV
tizrQ|
hgnNXeucn[}TSrQGMCCMlUc\iyK^_
eFuuXOR|
tbPbNx^K
CmoLlg
s]vdqdNBB{G
CKMeDuFTi`bHr}
vA[gTjW^dH~E
kLpjX|}zncF
xkO[@MkR
Vn`\RHr~
vAQdWA
wdRfuzYCWBAggn]scu
qtndJt
BMCPgrF]@BbAs[Efj8mSO^jWdXY^
ddquIckrGJZ
L@H]UBb`
Sud`mfSHB
VYLJ~E
VnCzlnKj
tOfZlO
bGMIaS
cKYDud{
B}NRwR
^SWFiCenJ
IKMhlZUBd
RHu`BXoSI
Omgjd^sue
KHu`BYoSI
yWuJz[Gx_
CBAiO^Npw
vdqjL`pyA
UKMhl[UBd
NHu`BEoSI
rWuJzFGx_
jndUZWEME
jwk{ZUjQ
RuCPNSWDW
gyGLIM[DjwWD
{WBEM,*
=Ykcd{
HQr}oyAKK
iuWFJ~[Hs
DwmWgchWs
}uE|qdUBG
WnLtYMadw
UQr}otAKK
vuWFJq[Hs
pxYWw@
QexIMj
s@j^IYN
br_PQOS
QlflwE~
UMj~ogh
vj]#fqh
SjwiyOUjDELRRExY^WBP{lEWpvb
e]l|Zr~Q
BgO{OuPZ
JuJ^fA
MOUn}u]bwE
YSWLAmvxGH
ucdqi~
sUJ3]KMhB
BbMBCuc}
MMaWrU
IBAi{eLwm
Vnk5GHu`F
~bSWD2
gnJzh~ccl
uWD|@YOc
k[oDDUmI
O~wn}a
GgnLcAwcCqnd^ryV[H`VlCb
CNIACuc|
MBaWrV
tizrQ|
?rgnHZqfSfq
dQriGMR]FT
uWBbLE
rSOQS"uNRhNx^J
qLpuYS~zncF
xkO[@MkY
udlifSHO
xYULIAj|
{qn`Myy@U
djqgJDUmA
O~wRsYTI
@AeEIH
[ndBB{G!CKM}DuFTo`
vAUMVE
UZLmnv
q]suf}e}\rp^
BgIGroZBkP
IY`|]q^O\|
tbPbHxPO
CmoLlg
zGMkTMlNr@
b@l]PO
iWu\RuTPxSWD^g|FTpqsED
adQZYGMIc
VbK]`Tdj}
fNRqm;[SQjbmgdd4sueLUnd[
vGMGchlD
`K_`Sdj}EtOU`
bNRq6PYS]HGy
Mqnn>XyGGE\"GDu]DAKYHud&
-<cUj]s!
uErFYOjYmghj
TMCO3cDuSTJeYH
lSO})UuHzVExS{
@AkOJLp{]LdqdIKZ:EMEcnlD
`K_`Qdj}EcOU`q
ARuAPhSWHm6
aLpu]QdqdoyAyGGPE[
I^ySlZT
CmSE:_WuDzGExS__EWEInLzgFem
XdQxhJZ
X@}IdY
yL]wmYgmjW
~uc`Y_dQxU\3LKMhlLWBh
Vm]Sjwg@K}RWuD
u;kYSS<Nmgj[XKucn
dQvUL3LKMhX]lBbA
D]Sjwg{wUj]
N,IExS{
pyA3LKMh+KWBh5eHunB>oSIB
juNXfCi_
LnLqbzrkgv
}KfPSdc
mOU`Fs!muEr
uAmmFtpq
adQvQsMCM3~DuSnz5JHu`
xmSKCByuNXck}qdWBG
inLtgF
QGMIXD}Ma
Mjwg<eUj]dGquExYS
KnLz`|t
QGMIXE}La
Mjwg<eUj]dFquExYS
KnLz`}t
Znd[ms_e[KMjb
wdl_-SO_Ym
fRuOkSB]V
NQrsVGc+
<cUj]dDE
nxYYHHYE
nLvW]}dqh{^oQ_MCMksxjCjzKYNSLqwmUgdjWs
]PmOYS]QJE_nLz
mqn`}9
oMCA^`UyC
YS)IAmcF
BdQxhKZ,`MlNd[-OKYB]rjwk<
RuORYSWC
mgnLqp:3e}tdQsyG9BG
mKoWBcKY
vaIOUkWu
zUIWB@mg
vl~qneBBzG*CKM
LAudheo{\UjQ
|WB@Gul7MqugL5nd[Z<GMI$
bKSZw TwmWg
fuuErq
WBKf`M
hMCJgz
6hdjsAYgIjWs
NuE|sSWYqng
Lpqacd`F/Sr
wuWCiLq
&SO_m@
*nLzvb
*qnnVmK(
CKGkl9UBd$
Hunm_ QOS
uNXr**YS]NI
&cd{F*Sr
QemKMfRFpJ
8SO_ySdJ=#ExS@RSDg
sOaEC";Du]
Je[Hsn
eEdOU`
[LRsOPaSWH
maDLpqtKdqld(ro
MIKMlDwW
djwmSOUj
N@oExXHgGAzfnLequrfY'dQx
tMCJGjl?WBh$
OU`QUn
Lp{s|V
cSWC.>gnFX?wcbgFJQrsQ
|uNSxF`A
BAgtj[ctcpcg
[QrxTKhwEeUs
<jwgBH?
RuOk\BRSF
ti]txdeL+nd[c|(
hBbJJNda|G
WDn{r_V
KeKhD &ucn
[jUKYB]\jwg
NRwExY
WBA>gnL
quchqndQryGOCKM
DuW8bKY
udj}mSOUjWuLRuE-YSW
cdqndQryGMCKMlD
VBbAXHuhjwmIOUkDELRWExYEWBP{lEWpvb
e]l|Zr~Q
BgO{OuPZ
JuJ^fA
GSONZTusRuExYSWj
oghd-quiL!ldWZ]GMIcPlDs
bKS`%fjqEwOU`
U{`BAgOVLp{
cNqndPbyGMCKM\tu[XbKXSEfj
mSOBjWd=
Lp{xarBcc>
yGGPOu
DuW@ux
jwg<,Uj]fFyUTp67WBK
%nLqbrrcY<fQt
"MCA"yDu]NsC6.ud`Z
CDb{r_Z
JRiL+NhB4d
?GMBc%lD
+bKS$VdjwmSO
VNRuExY
cd{F7Sr
ud`_9QOS`
x_yWC]mglLVqO
d}ndQryGMC
lVoWBcPiJu>jwmKOU{
gnF ucn{iL>ryMAKXKzWp|YsMHM
SO_lysG=CExSBRU
ktZNGMIXID|uWH
KsHuezwmSOUj
?N]oExX@g@A
gnLiqurr|V
QryGDX
WuD~$YuYZ@
@AevApxl
e]jr]htGD_
HVTH|~
vAWd|qZuGJ
DTQ{$BAgmwApxc
e]ls\rpZ
BgOGF^
GeNZTubRuEbYSF@BE
V]`BbAqfwdl}EkOU`
uHxtUxYSWBAu
n^jqub
syGVCK\D
uWDhM6=ud`|
]OUnAF\Nrm
YS]j{mghjHttcd
`dQvnt}k
OlB]}BbMq`udlp
$OU`O]|RuC^
WBAEPnLzYMcd{
Qry9CCKItw
^YHticaE
|Y,bEx]{
@AkO9Npw
XjQ OCM
e]].BbAUZw
|wmWg/jW
[om![SQ
nLzYZcdw
yEyGGksMlN
7<lKYLlW2p
0LRsm/[SQ-9mgdd*sueL
nd[~kEe
mSE}6UuHz\Ex_{
oLFnd[ZAGMI
U`Bdj}EkOU`
udRuE9=SWBAmgALpqTcdq>dQrvGMCQMlEuWBb,YHu=jwm
OUj[uNRoExXSWBA
gnL<qucDpnd]ryGWCKLlDuWBbKY|tdjClSOYjWuTRuDciUWWCmgrLp`gdLundW
GMI$2lD
ud`_iSOS
:xYYDHSgO
dqdLUryA"=KMf+
WBhXIZeL
wmYgQjWs!,uEr6,WBK~v|]X
dQxjAZ0
MlNfS<
wmYgwjWs]W}ZJ3
MCAGjVgATJ
uxe~EY}
WuDCfT
nLzzdec`kuU
WBh5WHu`|DL-HUjSLASuEb^<"BAgO
Lp{]YdqhBi
yGM=EMl@bd^J
[HsL@wmUg}jWsIE]wxYUqz
mgn2~qug|B
XlDtDWs^O`*fjq
R^TD=uWHq_K\
rjwi{5Uj]
Lp{]LdqhO7
wGMGR~2C
"BbA'_udn_(QOSB
CmaF5pq
pyAe9KMfl
UBdc%HunB
oSI}CWuHz
Gx_{-BAk
bdGquiLInd[
y@">KMf
zrjUKYBflBOmSE
j}uNR4qxYSWBA
fnL"quc
pnd]ryGWCKLlDuWBbKYMwdjroSOZjWuTRuDkiQW#AmgnLpq
WryCe@KMG9OWBf4_Hu`|
QuNV]WxYUqj
mgd3vqug JndU
dMCKMl
J/oSOdbA
IRuAS_D
EAmcDLpqnSaq4gQrdGMRccnDs]<jKYL]JhwkEg{jW
XiHFxY{
Npw]Gdqdo/zyGIO]@dVv
ljwi{kUj]
mg`vy]
/|yGIUxqklDWBhgAQrL
{AmmwdXquebYJdQxQ
MCAeVDuQdZt[Hu
dwmWXf8P]
RuOTq{3@AkODLpw]Kdqhcy
yGGkoMlNaAjPKYNScBNmSE}
UuHz_Ex_{
BAkaFhpq
wrY\dQt_
Hudm_\SO_F)n
GuEyJVFGWE
OCMe;FuQ-
dKK]<xYYDFSi
@wco+AKK
fjqE{OUlP]
RuOP1QWDi
gnFX_ucbvF]Qrs\
VKMmWpFGtc<Jub
fhD1BjWqf
df|Y6fQt
VHZc4lD
DFpO'^udn_
wcbYFdQt
o%AKKD8uWHJeYHs\
wmS1[jWqW
sAmmB&X
ucnYFdQt~o
CKGD`uWH
wE~6+WBKE=lLvY
cd{}`CvQ
jwg{&WjQ]gRuCP3QWDi
gnJwYLcd{F
QrsoeCKKjlQWBh$
`mSK}/UuHz"Gx_</BAgO4Npw]
dqdwU`}o
AKKD>uWHJ-[HsL
wmYg<hWsf{uE~q9UBGE
!ZNGMILP
QuWCqNHMc
Do@]%PuC
HVOj8mgd_tcq
|bF7pq
yGGIculD
AdjumSOajWunRuE,YSWHAmgnLpqucdq0dQr
WBbQYHtwZsm
MUjIuNCcV|a@UBAmvjSb
tOixqky
@uFF}_
IYich|-WUjS
QGfAxHWM
ucn}|fy
{GKk1MlN
LQfKHLju
vA^FJd)mNRq
gK@SBPix~
q]{j{|yLqryA
\Z^hDdS]m
Xdxmu{E!MUl
j^AqEi]L^
@AkgPX
qnBvyVI\\
xjwi-WUjS]2RuOsFKDFA|cv
{dQst^^GK\h_
VniBA6mdjs
O\QjFqY
ti{A@SBPiz
M\z|yLTnd[
gTICZIp
t{IkRq'wdl
p@KU{SjD
S{bqcuuqq
sULDk0MlN~HTqOYYq{|
A+wWuJk
ExYL@QEmvjSc
tOjxqtIZYGME
RxWqWSfR
IYocaE>MUl
o]VuT|F^
CmznqFXuucb