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
|