205
Is it possible to show just expressions
With Edit1
	.AddWild "<fgcolor=00FF00>("
	.AddWild "<fgcolor=00FF00>)"
	.AddExpression "<fgcolor=FF0000><b>(*","<fgcolor=FF0000> ","<fgcolor=FF0000><b>*)"
	.InsertText "some text ( another text ) other text\r\n",1
	.InsertText "some text (* another text *) other text\r\n",1
	.Show = "expression"
End With
204
How can I stop any highlight
With Edit1
	.AddWild "<fgcolor=00FF00>("
	.AddWild "<fgcolor=00FF00>)"
	.AddExpression "<fgcolor=FF0000><b>(*","<fgcolor=FF0000> ","<fgcolor=FF0000><b>*)"
	.InsertText "some text ( another text ) other text\r\n",1
	.InsertText "some text (* another text *) other text\r\n",1
	.Show = ""
End With
203
How can I highlight the start of the line until a specified character is found

With Edit1
	.AddExpression "^","<fgcolor=FF0000> ",":"
	.Refresh 
End With
202
Can I use code completion without any UI
With Edit1
	.CodeCompletion = exCodeCompletionEnableNoUI
	.AddKeyword "<b>class</b>","this is a bit of text that's shown when the cursor hovers the <b>class</b> keyword.","exontrol.edit"
	.Refresh 
	.Context().Add "class"
End With
201
How can I hide the control's horizontal scroll bar
With Edit1
	.ScrollBars = exVertical
End With
200
Is it possible to change the line's height

With Edit1
	.LineHeight = "value + 8 * dpi"
	.DrawGridLines = True
End With
199
How to bold everything between two * (asterisk) characters

With Edit1
	With .Font
		.Name = "Consolas"
		.Size = 12
	End With
	.AddExpression "<fgcolor=FF0000><b>*","<fgcolor=FF0000> ","<fgcolor=FF0000><b>*"
	.InsertText "some text * another text * other text\r\n",1
	.Refresh 
End With
198
How to bold everything that starts with * (asterisk), to the end of the line

With Edit1
	With .Font
		.Name = "Consolas"
		.Size = 12
	End With
	.AddWild "<fgcolor=FF0000><b>\**"
	.InsertText "some text * another text * other text\r\n",1
	.Refresh 
End With
197
How to make a * (asterisk) bold, not the entire / rest line

With Edit1
	With .Font
		.Name = "Consolas"
		.Size = 12
	End With
	.AddWild "<fgcolor=FF0000><b>\*"
	.InsertText "some text * another text * other text\r\n",1
	.Refresh 
End With
196
How can I change the control's font (template)

With Edit1
	.Template = "Font { Name = `Consolas`; Size = 12 }"
	.AddKeyword "<fgcolor=FF0000>class</fgcolor>"
	.Refresh 
End With
195
How can I change the control's font (runtime)

With Edit1
	With .Font
		.Name = "Consolas"
		.Size = 12
	End With
	.AddKeyword "<fgcolor=FF0000>class</fgcolor>"
	.Refresh 
End With
194
When I click and drag to try and select some text, sometimes my cursor turns into a hand and drags the whole text in the window around. I would like to disable this feature, could you tell me what it is called so I can disable it please
With Edit1
	.OLEDropMode = exOLEDropAutomatic
End With
193
How can I display information about events the control fires

' Event event - Notifies the application once the control fires an event.
Private Sub Edit1_Event(ByVal EventID As Long)
	With Edit1
		Debug.Print( .EventParam(-2) )
	End With
End Sub

With Edit1
	.AddWild "<fgcolor=808080>(?*)</fgcolor>"
	.AddKeyword "<b>class</b>","a set or category of things having some property or attribute in common and differentiated from others by kind, type, or qualit" & _
"y"
	.Refresh 
End With
192
How do I highlights words based on wild characters

With Edit1
	.AddWild "<fgcolor=0000FF><b>[MC]*_HANDLER*</b></fgcolor>(*)"
	.Refresh 
End With
191
How do I highlights words based on wild characters

With Edit1
	.AddWild "<fgcolor=0000FF><b> *</b></fgcolor>(*)*;"
	.Refresh 
End With
190
How can I provide different tooltip for the same keyword

' QueryContext event - Queries for the context at the specified location, to provide different tooltips for the same keyword on QueryContextToolTip event.
Private Sub Edit1_QueryContext(ByVal XCursor As Long,ByVal YCursor As Long,QContext As Variant)
	With Edit1
		QContext = YCursor
	End With
End Sub

' QueryContextToolTip event - Asks for the tooltip/title of the keyword on the context retrieved by the QueryContext event.
Private Sub Edit1_QueryContextToolTip(ByVal QContext As String,ByVal Keyword As String,QToolTip As Variant,QToolTipTitle As Variant)
	With Edit1
		QToolTip = QContext
		QToolTipTitle = "Keyword Found At Line:"
	End With
End Sub

With Edit1
	.LineNumberWidth = -1
	.LineNumberBackColor = RGB(240,240,240)
	.AddKeyword "<fgcolor=FF0000><b>keyword</b></fgcolor>"
	.Text = ""
	.InsertText "here's the keyword on the first line"
	.InsertText "\r\nhere's the keyword on the second line"
	.InsertText "\r\nhere's the keyword on the third line"
End With
189
Is it possible to left, right or center align the inline tooltip

With Edit1
	.LineNumberWidth = -1
	.LineNumberBackColor = RGB(240,240,240)
	.CaretLine = 6
	.Background(exTempInlineToolTipBackColor) = RGB(240,240,240)
	.TempInlineToolTip = "<font ;6>Left Alignment<br><c>Center Alignment<br><r>Right Alignment"
	.Refresh 
End With
188
Is it possible to display the inline tooltip with a different appearance than temporarily inline tooltip

With Edit1
	.LineNumberWidth = -1
	.LineNumberBackColor = RGB(240,240,240)
	.AddKeyword "<b>class</b>","<r>a set or category of things having some property or attribute in common and differentiated from others by kind, type, or qua" & _
"lity."
	.AllowInlineToolTip = AllowInlineToolTipEnum.exInlineToolTipWordWrap Or AllowInlineToolTipEnum.exInlineToolTip
	.Background(exInlineToolTipForeColor) = RGB(128,128,128)
	.Background(exInlineToolTipBackColor) = RGB(240,240,240)
	.CaretLine = 6
	.Background(exTempInlineToolTipBackColor) = RGB(255,40,0)
	.Background(exTempInlineToolTipForeColor) = RGB(0,0,1)
	.TempInlineToolTip = "<br><c><font ;12>This is a bit of text that's shown temporarily only. <br><c>Now, click the <off -4><b>class</b></off> keyword," & _
" in the top...<br>"
	.Refresh 
End With
187
How can I display the inline tooltip over the lines, instead pushing the lines

With Edit1
	.LineNumberWidth = -1
	.LineNumberBackColor = RGB(240,240,240)
	.Background(exTempInlineToolTipBackColor) = RGB(255,255,0)
	.CaretLine = 3
	.TempInlineToolTip = "This is a bit of text that's shown under the current line, and it is displayed as soon as the control's caret is changed."
	.AllowInlineToolTip = AllowInlineToolTipEnum.exInlineToolTipWordWrap Or AllowInlineToolTipEnum.exInlineToolTipOver
	.Refresh 
End With
186
Is it possible to display the inline tooltip all the time

' SelChange event - Occurs when the user selects text in the control.
Private Sub Edit1_SelChange()
	With Edit1
		.TempInlineToolTip = "This is a bit of text that's shown under the current line, and it is displayed as soon as the control's caret is changed."
	End With
End Sub

With Edit1
	.LineNumberWidth = -1
	.LineNumberBackColor = RGB(240,240,240)
	.Background(exTempInlineToolTipBackColor) = RGB(255,255,0)
	.CaretLine = 12
	.AllowInlineToolTip = exInlineToolTipWordWrap
	.Refresh 
End With
185
Is it possible to display images in the inline tooltip

With Edit1
	.VisualAppearance.Add 1,"c:\exontrol\images\normal.ebn"
	.Images "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTq" & _
"lVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m" & _
"0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/y" & _
"NAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="
	.LineNumberWidth = -1
	.LineNumberBackColor = RGB(240,240,240)
	.CaretLine = 4
	.Background(exTempInlineToolTipBackColor) = &H1000000
	.AllowInlineToolTip = exInlineToolTipWordWrap
	.TempInlineToolTip = "<img>1</img>This is a bit of text that's shown programatically under the current line"
End With
184
How can I change the visual appearance of the temporarily inline tooltip

With Edit1
	.VisualAppearance.Add 1,"c:\exontrol\images\normal.ebn"
	.LineNumberWidth = -1
	.LineNumberBackColor = RGB(240,240,240)
	.CaretLine = 4
	.Background(exTempInlineToolTipBackColor) = &H1000000
	.AllowInlineToolTip = exInlineToolTipWordWrap
	.TempInlineToolTip = "This is a bit of text that's shown programatically under the current line"
End With
183
How can I display programmatically the inline tooltip, but using word-wrapping

With Edit1
	.LineNumberWidth = -1
	.LineNumberBackColor = RGB(240,240,240)
	.CaretLine = 4
	.Background(exTempInlineToolTipBackColor) = RGB(240,240,240)
	.AllowInlineToolTip = exInlineToolTipWordWrap
	.TempInlineToolTip = "This is a bit of text that's shown programatically under the current line"
End With
182
How can I display programmatically the inline tooltip

With Edit1
	.LineNumberWidth = -1
	.LineNumberBackColor = RGB(240,240,240)
	.CaretLine = 4
	.Background(exTempInlineToolTipBackColor) = RGB(240,240,240)
	.TempInlineToolTip = "<br><c>This is a bit of text that's shown programatically under the current line<br>"
End With
181
How can I show the inline tooltip with a different appearance

With Edit1
	.VisualAppearance.Add 1,"c:\exontrol\images\normal.ebn"
	.LineNumberWidth = -1
	.LineNumberBackColor = RGB(240,240,240)
	.AddKeyword "<b>class</b>","a set or category of things having some property or attribute in common and differentiated from others by kind, type, or qualit" & _
"y."
	.AllowInlineToolTip = AllowInlineToolTipEnum.exInlineToolTipWordWrap Or AllowInlineToolTipEnum.exInlineToolTip
	.Background(exInlineToolTipBackColor) = &H1000000
	.Background(exInlineToolTipForeColor) = RGB(128,0,0)
	.Refresh 
End With
180
Is it possible to prevent moving the lines after the inline tooltip

With Edit1
	.LineNumberWidth = -1
	.LineNumberBackColor = RGB(240,240,240)
	.AddKeyword "<b>class</b>","a set or category of things having some property or attribute in common and differentiated from others by kind, type, or qualit" & _
"y."
	.AllowInlineToolTip = AllowInlineToolTipEnum.exInlineToolTipWordWrap Or AllowInlineToolTipEnum.exInlineToolTipOver Or AllowInlineToolTipEnum.exInlineToolTip
	.Background(exInlineToolTipBackColor) = RGB(255,255,0)
	.Refresh 
End With
179
How can I display the inline tooltip, when typing only

With Edit1
	.LineNumberWidth = -1
	.LineNumberBackColor = RGB(240,240,240)
	.ToolTipOnTyping = False
	.AddKeyword "<b>class</b>","a set or category of things having some property or attribute in common and differentiated from others by kind, type, or qualit" & _
"y."
	.AllowInlineToolTip = AllowInlineToolTipEnum.exInlineToolTipWordWrap Or AllowInlineToolTipEnum.exInlineToolTipOnChange
	.Background(exInlineToolTipBackColor) = RGB(240,240,240)
	.Refresh 
End With
178
How do I enable the inline tooltip support

With Edit1
	.LineNumberWidth = -1
	.LineNumberBackColor = RGB(240,240,240)
	.AddKeyword "<b>class</b>","a set or category of things having some property or attribute in common and differentiated from others by kind, type, or qualit" & _
"y."
	.AllowInlineToolTip = AllowInlineToolTipEnum.exInlineToolTipWordWrap Or AllowInlineToolTipEnum.exInlineToolTip
	.Background(exInlineToolTipForeColor) = RGB(128,128,128)
	.Refresh 
End With
177
How do I display a tooltip for a non-keyword

' MouseMove event - Occurs when the user moves the mouse.
Private Sub Edit1_MouseMove(Button As Integer,Shift As Integer,X As Single,Y As Single)
	With Edit1
		.ShowToolTip .WordFromPoint(-1,-1),,,"+8","+8"
	End With
End Sub


176
How do I get the text from the cursor

' MouseMove event - Occurs when the user moves the mouse.
Private Sub Edit1_MouseMove(Button As Integer,Shift As Integer,X As Single,Y As Single)
	With Edit1
		Debug.Print( .WordFromPoint(-1,-1) )
	End With
End Sub


175
I've noticed that while I type, the control's sensitive context selects the item that contains the typing word, so the question is how can I disable it
With Edit1
	With .Context()
		.Add "exText"
		.Add "exHTML"
		.Options(exContextDisableIncrementalSearchContains) = True
	End With
	.Text = ""
	.InsertText "Press CTRL+SPACE, and type h, so the exHTML is not selected."
End With
174
I have a context that inserts some comments, it is possible to set the cursor before comment begins, when user selects a value from the control's sensitive context
With Edit1
	.AddExpression "<fgcolor=008000>'</fgcolor>","<fgcolor=008000> </fgcolor>",""
	With .Context()
		.Add "exText (0)","0 ' specifies the exText flag"
		.Add "exHTML (-1)","-1 ' specifies the exHTML flag"
		.Options(exContextInsertCaretPos) = "(0:=value lfind `'`) < 0 ? -1 : ( =:0 - (len(1:=(value left =:0)) - len(ltrim(reverse(=:1)))))"
	End With
	.Text = ""
	.InsertText "Press CTRL + SPACE, and select any item, a number is inserted"
End With
173
How can I show a different sensitive context when user press a key/character

' Change event - Indicates that the control's text have changed.
Private Sub Edit1_Change()
	With Edit1
		.ShowContext .ChangeOnKey
		.ActiveContextItems = ""
	End With
End Sub

With Edit1
	.Text = ""
	.InsertText "Press .(dot), :(color) or =(equal), to get different sensitive context"
	.ActiveContextItems = ""
	With .Context("61")
		.Add "Equal_1"
		.Add "Equal_2"
	End With
	With .Context("46")
		.Add "Dot_1"
		.Add "Dot_2"
	End With
	With .Context("58")
		.Add "Colon_1"
		.Add "Colon_2"
	End With
End With
172
How can I allow spaces when control's sentitive context is shown/opened

' Change event - Indicates that the control's text have changed.
Private Sub Edit1_Change()
	With Edit1
		.ShowContext .ChangeOnKey
		.ActiveContextItems = ""
	End With
End Sub

With Edit1
	With .Context("61")
		.Add "True (-1)","True"
		.Add "False (-1)","False"
		.Options(exContextAllowSpaceOnFront) = True
	End With
	.Text = ""
	.InsertText "Press the = key and after that press the space keys"
	.InsertText ""
End With
171
How can I display more pages on the control's senitive context

With Edit1
	With .Context()
		.Add "First_1"
		.Add "First_2"
	End With
	With .Context("Second")
		.Add "Second_1"
		.Add "Second_2"
		.Add "Second_3"
	End With
	.ActiveContextItems = "Second"
	.PagesContextItems = ":Page<font ;6><off -4>1</off></font>,Second:Page<font ;6><off -4>2</off></font>"
End With
170
Is it possible to disable showing tooltip for items in the control's senitive context
With Edit1
	With .Context()
		.Add "Column"
		.Options(exContextItemToolTip) = "This is bit of text that shown when user selects the <b>Column</b> item."
		.Add "Item"
		.Options(exContextItemToolTip) = "This is bit of text that shown when user selects the <b>Item</b> item."
		.Options(exContextAllowToolTip) = False
	End With
End With
169
How can I assign tooltips for items in the control's senitive context

With Edit1
	With .Context()
		.Add "Column"
		.Options(exContextItemToolTip) = "This is bit of text that shown when user selects the <b>Column</b> item."
		.Add "Item"
		.Options(exContextItemToolTip) = "This is bit of text that shown when user selects the <b>Item</b> item."
	End With
End With
168
By default, the control shows the Context(""). How can I display other items

' OnContext event - Occurs when the user invokes the control's context window.
Private Sub Edit1_OnContext(ByVal Start As Long,ByVal Context As String)
	With Edit1
		Debug.Print( "CurrentContext:" )
		Debug.Print( Context )
		.ActiveContextItems = "Second"
	End With
End Sub

With Edit1
	With .Context()
		.Add "First_1"
		.Add "First_2"
	End With
	With .Context("Second")
		.Add "Second_1"
		.Add "Second_2"
		.Add "Second_3"
	End With
End With
167
How can I show the control's sensitive context

' DblClick event - Occurs when the user double clicks the left mouse button over an object.
Private Sub Edit1_DblClick(Shift As Integer,X As Single,Y As Single)
	With Edit1
		.ShowContext "DB"
	End With
End Sub

With Edit1
	With .Context("DB")
		.Add "BEGIN_MSG_MAP"
		.Add "<fgcolor=808080>MESSAGE_HANDLER"
		.Add "<fgcolor=808080>COMMAND_HANDLER"
		.Add "END_MSG_MAP"
	End With
End With
166
How can I provide different sensitive context

' Change event - Indicates that the control's text have changed.
Private Sub Edit1_Change()
	With Edit1
		.ShowContext .ChangeOnKey
	End With
End Sub

With Edit1
	.Text = ""
	.InsertText "Press .(dot), :(colon) or CTRL + SPACE to invoke the control's context"
	With .Context()
		.Add "General_1"
		.Add "General_2"
	End With
	With .Context("46")
		.Add "Property_1"
		.Add "Property_2"
		.Add "Property_3"
	End With
	With .Context("58")
		.Add "Method_1"
		.Add "Method_2"
		.Add "Method_3"
	End With
End With
165
How can I change the control's background/foreground colors while the control is locked/read-only

With Edit1
	.Locked = True
	.SelBackColor = RGB(128,128,128)
	.ForeColorLockedLine = RGB(128,128,128)
	.BackColorLockedLine = RGB(255,255,255)
End With
164
How can change the color for selected text, when the control has no focus

With Edit1
	.HideSelection = False
	.SelLength = 10
	.SelBackColorHide = RGB(255,0,0)
End With
163
How do I change the "Incremental Search" caption

With Edit1
	.Cursor(exIncrementalSearchArea) = "exHelp"
	.Caption(exIncrementalSearchField,exCaption) = "Search for: %s"
	.IncrementalSearchError = RGB(255,0,0)
End With
162
How do I enable the scrollbar-extension, as thumb to be shown outside of the control's client area

With Edit1
	.ScrollBars = exBoth
	.ScrollPartVisible(exVScroll,exExtentThumbPart) = True
	.ScrollPartVisible(exHScroll,exExtentThumbPart) = True
	.ScrollPartVisible(&H2,exExtentThumbPart) = True
	.ScrollWidth = 4
	.Background(exVSBack) = RGB(240,240,240)
	.Background(exVSThumb) = RGB(128,128,128)
	.ScrollHeight = 4
	.Background(exHSBack) = .Background(exVSBack)
	.Background(exHSThumb) = .Background(exVSThumb)
	.Background(exSizeGrip) = .Background(exVSBack)
End With
161
How can I get ride of control's horizontal scroll bar

With Edit1
	.AddKeyword "<b>CExHelperDialog</b>"
	.Refresh 
	.ScrollBars = exVertical
End With
160
How do I specify the characters to close the sensitive context

With Edit1
	.Images "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTq" & _
"lVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m" & _
"0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/y" & _
"NAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="
	.AddKeyword "<b>class</b>","this is a bit of text that's shown when the cursor hovers the <b>class</b> keyword.","exontrol.edit"
	.AddKeyword "<b>public</b>","this is a bit of text that's shown when the cursor hovers the <b>class</b> keyword.","exontrol.edit"
	.Refresh 
	With .Context()
		.Add "<b>class</b>","",1
		.Add "<b>public</b>","",2
		.Options(exContextAllowChars) = "_ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz"
	End With
End With
159
How do I sort items in the sensitive context

With Edit1
	.Images "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTq" & _
"lVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m" & _
"0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/y" & _
"NAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="
	.AddKeyword "<b>class</b>","this is a bit of text that's shown when the cursor hovers the <b>class</b> keyword.","exontrol.edit"
	.AddKeyword "<b>public</b>","this is a bit of text that's shown when the cursor hovers the <b>class</b> keyword.","exontrol.edit"
	.Refresh 
	.Context().Add "<b>public</b>","",2
	.Context().Add "<b>class</b>","",1
	.Context().Sort True
End With
158
Can I add icons to the sensitive context

With Edit1
	.Images "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTq" & _
"lVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m" & _
"0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/y" & _
"NAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="
	.AddKeyword "<b>class</b>","this is a bit of text that's shown when the cursor hovers the <b>class</b> keyword.","exontrol.edit"
	.Refresh 
	.Context().Add "<b>class</b>","",1
End With
157
How can I change the keys combination that invokes the sensitive context

With Edit1
	.ContextKey = 544
	.AddKeyword "<b>class</b>","this is a bit of text that's shown when the cursor hovers the <b>class</b> keyword.","exontrol.edit"
	.Refresh 
	.Context().Add "class"
End With
156
How do I enable or disable the sensitive context menu
With Edit1
	.CodeCompletion = exCodeCompletionDisable
	.AddKeyword "<b>class</b>","this is a bit of text that's shown when the cursor hovers the <b>class</b> keyword.","exontrol.edit"
	.Refresh 
	.Context().Add "class"
End With
155
How can I add a sensitive context menu

With Edit1
	.AddKeyword "<b>class</b>","this is a bit of text that's shown when the cursor hovers the <b>class</b> keyword.","exontrol.edit"
	.Refresh 
	.Context().Add "class"
End With
154
Can I use wild characters to define keys in your control

With Edit1
	.AddWild "<fgcolor=808080>(*)</fgcolor>"
	.Refresh 
End With
153
Can I use wild characters to define keys in your control

With Edit1
	.AddWild "_HANDLER<fgcolor=FF0000>(*)</fgcolor>"
	.Refresh 
End With
152
How can I remove or delete all expressions

With Edit1
	.AddExpression "(","<b><fgcolor=FF0000> </fgcolor></b>",")",False
	.ClearExpressions 
	.Refresh 
End With
151
How can I remove or delete an expression

With Edit1
	.AddExpression "(","<b><fgcolor=FF0000> </fgcolor></b>",")",False
	.DeleteExpression "("
	.Refresh 
End With
150
How can I add an expression

With Edit1
	.AddExpression "(","<b><fgcolor=FF0000> </fgcolor></b>",")",False
	.Refresh 
End With
149
How can I add an expression on multiple lines

With Edit1
	.AddExpression "<fgcolor=800000><b>BEGIN_MSG_MAP</b></fgcolor>","<b><fgcolor=FF0000> </fgcolor></b>","<fgcolor=800000><b>END_MSG_MAP</b></fgcolor>",True
	.Refresh 
End With
148
How can I remove or delete all keywords
With Edit1
	.AddKeyword "<b><fgcolor=FF0000>class</fgcolor></b>"
	.ClearKeywords 
	.Refresh 
End With
147
How can I remove or delete keyword
With Edit1
	.AddKeyword "<b><fgcolor=FF0000>class</fgcolor></b>"
	.DeleteKeyword "class"
	.Refresh 
End With
146
How do I add a keyword that's not case sensitive

With Edit1
	.AddKeyword "<b><fgcolor=FF0000>class</fgcolor></b>","","",2
	.Refresh 
	.InsertText "ClasS\r\n",1
	.InsertText "CLASS\r\n",1
End With
145
How do I add a keyword that's not case sensitive

With Edit1
	.AddKeyword "<fgcolor=FF0000>class</fgcolor>","","",1
	.Refresh 
	.InsertText "ClasS\r\n",1
	.InsertText "CLASS\r\n",1
End With
144
How can I assign a tooltip to a keyword

With Edit1
	.AddKeyword "<fgcolor=FF0000>class</fgcolor>","this is a bit of text that's shown when the cursor hovers the <b>class</b> keyword.","exontrol.edit"
	.Refresh 
End With
143
How do I add a keyword

With Edit1
	.AddKeyword "<fgcolor=FF0000>class</fgcolor>"
	.Refresh 
End With
142
How do I add a keyword

With Edit1
	.AddKeyword "<b>class</b>","this is a bit of text that's shown when the cursor hovers the <b>class</b> keyword.","exontrol.edit"
	.Refresh 
End With
141
How can I display a tooltip as soon as the user types a keyword

With Edit1
	.ToolTipDelay = 1
	.ToolTipOnTyping = True
	.AddKeyword "<b>class</b>","this is a bit of text that's shown when the cursor hovers the <b>class</b> keyword.","exontrol.edit"
	.Refresh 
End With
140
How do I change the color for a locked or a read only line

With Edit1
	.ForeColorLockedLine = RGB(0,0,0)
	.BackColorLockedLine = RGB(255,0,0)
	.LockedLine(1) = True
End With
139
How do I lock or make read only a line

With Edit1
	.LockedLine(1) = True
End With
138
How do I start overtyping

With Edit1
	.Overtype = True
End With
137
How do I get the selection

With Edit1
	.GetSelection sy,sx,ey,ex
	Debug.Print( sy )
	Debug.Print( sx )
	Debug.Print( ey )
	Debug.Print( ex )
End With
136
How do I select multiple lines

With Edit1
	.SetSelection 0,0,10,0
	.HideSelection = False
End With
135
How can I change the shape of the cursor when it hovers the selected text

With Edit1
	.Cursor(exSelectedText) = "exHelp"
	.SelLength = 10
	.HideSelection = False
End With
134
How can I change the shape of the cursor when it hovers the incremental search area

With Edit1
	.Cursor(exIncrementalSearchArea) = "exHelp"
End With
133
How can I change the shape of the cursor when it hovers the line numbers area

With Edit1
	.Cursor(exLineNumberArea) = "exHelp"
	.LineNumberWidth = 16
End With
132
How can I change the shape of the cursor when it hovers the bookmark area

With Edit1
	.Cursor(exBookmarkArea) = "exHelp"
	.BookmarkWidth = 16
End With
131
How can I change the shape of the cursor when it hovers the edit
With Edit1
	.Cursor(exEditArea) = "exHelp"
End With
130
How can I enable or disable OLE drag and drop operations
With Edit1
	.OLEDropMode = exOLEDropAutomatic
End With
129
How can I change the descriptions for items in the control's context menu

With Edit1
	.Caption(exContextMenu,exContextUndo) = "U N D O"
	.Caption(exContextMenu,exContextRedo) = "R E D O"
	.Caption(exContextMenu,exContextCut) = "C U T"
	.Caption(exContextMenu,exContextCopy) = "C O P Y"
	.Caption(exContextMenu,exContextPaste) = "P A S T E"
	.Caption(exContextMenu,exContextDelete) = "D E L"
	.Caption(exContextMenu,exContextSelectAll) = "A L L "
End With
128
How can I change the descriptions for fields in the Replace dialog

With Edit1
	.Caption(exReplaceDialog,exFieldFindWhat) = "What"
	.Caption(exReplaceDialog,exFieldReplaceWith) = "Replace"
	.Caption(exReplaceDialog,exFieldWordOnly) = "Word"
	.Caption(exReplaceDialog,exFieldMatchCase) = "Case"
	.Caption(exReplaceDialog,exFieldFindNext) = "Dir"
	.Caption(exReplaceDialog,exFieldSelection) = "Sel"
	.Caption(exReplaceDialog,exFieldWholeFile) = "File"
	.Caption(exReplaceDialog,exFieldReplace) = "Rep"
	.Caption(exReplaceDialog,exFieldReplaceAll) = "All"
	.Caption(exReplaceDialog,exFieldCancel) = "Abandon"
	.Caption(exReplaceDialog,exErrorTitle) = "Title"
	.Caption(exReplaceDialog,exErrorFindNext) = "Failed!"
	.Caption(exReplaceDialog,exErrorFindNext) = "Done"
End With
127
How can I change the descriptions for fields in the Find dialog

With Edit1
	.Caption(exFindDialog,exFieldFindWhat) = "What"
	.Caption(exFindDialog,exFieldWordOnly) = "Word"
	.Caption(exFindDialog,exFieldMatchCase) = "Case"
	.Caption(exFindDialog,exFieldFindNext) = "Dir"
	.Caption(exFindDialog,exFieldSelection) = "U"
	.Caption(exFindDialog,exFieldWholeFile) = "D"
	.Caption(exFindDialog,exFieldFindNext) = "Next"
	.Caption(exFindDialog,exFieldReplace) = "All"
	.Caption(exFindDialog,exFieldCancel) = "Abandon"
	.Caption(exFindDialog,exErrorFindNext) = "Failed!"
End With
126
How can I change the caption for the Replace dialog

With Edit1
	.Caption(exReplaceDialog,exCaption) = "Search and Replace"
End With
125
How can I change the caption for the Find dialog

With Edit1
	.Caption(exFindDialog,exCaption) = "Search"
End With
124
How can I move the cursor when user invokes the control's context menu

With Edit1
	.RClick = True
End With
123
How can I disable indenting the selected text when the user presses the TAB key
With Edit1
	.IndentOnTab = False
End With
122
How can I indent a line

With Edit1
	.LineNumberWidth = 18
	.HideSelection = False
	.SelectLine 3
	.IndentSel True
End With
121
How can I show or hide the control's splitter

With Edit1
	.AllowSplitter = exBothSplitter
	.SplitPaneHeight = 128
	.SplitPaneWidth = 128
End With
120
How can I select a line

With Edit1
	.LineNumberWidth = 18
	.HideSelection = False
	.SelectLine 3
End With
119
How do I change the font to display the line numbers

With Edit1
	.LineNumberFont.Name = "Tahoma"
	.LineNumberWidth = 18
End With
118
How can I change the height of the line

With Edit1
	.Font.Size = 32
	.DrawGridLines = True
	.Refresh 
End With
117
How can I show or hide the grid lines

With Edit1
	.DrawGridLines = True
End With
116
How do I highlight the position of multiple lines expression on the vertical scroll bar

With Edit1
	.AllowMark = True
	.MarkContinueBlocks = True
	.AddKeyword "<b>CAxWnd"
	.AddExpression "<fgcolor=800000><b>BEGIN_MSG_MAP</b></fgcolor>","<b><fgcolor=FF0000> </fgcolor></b>","<fgcolor=800000><b>END_MSG_MAP</b></fgcolor>",True
	.MarkColor("BEGIN_MSG_MAP") = RGB(255,0,0)
	.MarkColor("END_MSG_MAP") = RGB(128,0,0)
	.MarkColor("CAxWnd") = RGB(0,0,0)
	.Refresh 
End With
115
How do I ignore \" in a string

With Edit1
	.InsertText """just a string \""expression""\r\n",1
	.AddExpression "<fgcolor=800000><b>""</b></fgcolor>","<b><fgcolor=FF0000> </fgcolor></b>","<fgcolor=800000><b>""</b></fgcolor>",True
	.IgnorePrefixInExpression("""") = "\"
	.Refresh 
End With
114
How can I change the color for the line number's border

With Edit1
	.LineNumberBorderColor = RGB(255,0,0)
	.LineNumberWidth = 18
End With
113
How can I change the color for the bookmark's border

With Edit1
	.BookmarkBorderColor = RGB(255,0,0)
	.BookmarkWidth = 18
End With
112
Can I display a custom icon or picture for bookmarks

With Edit1
	.Images "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTq" & _
"lVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m" & _
"0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/y" & _
"NAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="
	.BookmarkImage = 1
	.Bookmark(2) = True
	.Bookmark(4) = True
	.BookmarkWidth = 18
End With
111
Can I display a custom icon or picture in the bookmark area

With Edit1
	.Images "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTq" & _
"lVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m" & _
"0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/y" & _
"NAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="
	.BookmarkImageLine(2) = 1
	.Bookmark(4) = True
	.BookmarkWidth = 18
End With
110
How do I remove the line's background color
With Edit1
	.BackColorLine(1) = RGB(255,0,0)
	.ClearBackColorLine 1
End With
109
How do I change the foreground color for a line

With Edit1
	.ForeColorLine(1) = RGB(255,0,0)
End With
108
How do I change the background color for a line

With Edit1
	.BackColorLine(1) = RGB(255,0,0)
End With
107
How can I add my own items in the control's context menu

With Edit1
	.ContextMenuItems = "New Item"
End With
106
How do I ensure that a specified line is visible

With Edit1
	.EnsureVisibleLine .Count
End With
105
How can I programmatically perform a REDO operation
With Edit1
	.Redo 
End With
104
How can I programmatically perform an UNDO operation
With Edit1
	.Undo 
End With
103
How do I get the bookmarks as a list

With Edit1
	.Bookmark(2) = True
	.Bookmark(4) = True
	.BookmarkWidth = 16
	var_BookmarksList = .BookmarksList
End With
102
How can I move to the previous bookmark

With Edit1
	.Bookmark(2) = True
	.Bookmark(4) = True
	.BookmarkWidth = 16
	.PrevBookmark 
End With
101
How can I move to the next bookmark

With Edit1
	.Bookmark(2) = True
	.Bookmark(4) = True
	.BookmarkWidth = 16
	.NextBookmark 
End With