| 
	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
 
			 
		 
	 
   |