|
155
|
How can I add a sensitive context menu
with thisform.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")
endwith
|
|
154
|
Can I use wild characters to define keys in your control
with thisform.Edit1
.AddWild("<fgcolor=808080>(*)</fgcolor>")
.Refresh
endwith
|
|
153
|
Can I use wild characters to define keys in your control
with thisform.Edit1
.AddWild("_HANDLER<fgcolor=FF0000>(*)</fgcolor>")
.Refresh
endwith
|
|
152
|
How can I remove or delete all expressions
with thisform.Edit1
.AddExpression("(","<b><fgcolor=FF0000> </fgcolor></b>",")",.F.)
.ClearExpressions
.Refresh
endwith
|
|
151
|
How can I remove or delete an expression
with thisform.Edit1
.AddExpression("(","<b><fgcolor=FF0000> </fgcolor></b>",")",.F.)
.DeleteExpression("(")
.Refresh
endwith
|
|
150
|
How can I add an expression
with thisform.Edit1
.AddExpression("(","<b><fgcolor=FF0000> </fgcolor></b>",")",.F.)
.Refresh
endwith
|
|
149
|
How can I add an expression on multiple lines
with thisform.Edit1
.AddExpression("<fgcolor=800000><b>BEGIN_MSG_MAP</b></fgcolor>","<b><fgcolor=FF0000> </fgcolor></b>","<fgcolor=800000><b>END_MSG_MAP</b></fgcolor>",.T.)
.Refresh
endwith
|
|
148
|
How can I remove or delete all keywords
with thisform.Edit1
.AddKeyword("<b><fgcolor=FF0000>class</fgcolor></b>")
.ClearKeywords
.Refresh
endwith
|
|
147
|
How can I remove or delete keyword
with thisform.Edit1
.AddKeyword("<b><fgcolor=FF0000>class</fgcolor></b>")
.DeleteKeyword("class")
.Refresh
endwith
|
|
146
|
How do I add a keyword that's not case sensitive
with thisform.Edit1
.AddKeyword("<b><fgcolor=FF0000>class</fgcolor></b>","","",2)
.Refresh
.InsertText("ClasS\r\n",1)
.InsertText("CLASS\r\n",1)
endwith
|
|
145
|
How do I add a keyword that's not case sensitive
with thisform.Edit1
.AddKeyword("<fgcolor=FF0000>class</fgcolor>","","",1)
.Refresh
.InsertText("ClasS\r\n",1)
.InsertText("CLASS\r\n",1)
endwith
|
|
144
|
How can I assign a tooltip to a keyword
with thisform.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
endwith
|
|
143
|
How do I add a keyword
with thisform.Edit1
.AddKeyword("<fgcolor=FF0000>class</fgcolor>")
.Refresh
endwith
|
|
142
|
How do I add a keyword
with thisform.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
endwith
|
|
141
|
How can I display a tooltip as soon as the user types a keyword
with thisform.Edit1
.ToolTipDelay = 1
.ToolTipOnTyping = .T.
.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
endwith
|
|
140
|
How do I change the color for a locked or a read only line
with thisform.Edit1
.ForeColorLockedLine = RGB(0,0,0)
.BackColorLockedLine = RGB(255,0,0)
.Object.LockedLine(1) = .T.
endwith
|
|
139
|
How do I lock or make read only a line
with thisform.Edit1
.Object.LockedLine(1) = .T.
endwith
|
|
138
|
How do I start overtyping
with thisform.Edit1
.Overtype = .T.
endwith
|
|
137
|
How do I get the selection
with thisform.Edit1
.GetSelection(sy,sx,ey,ex)
DEBUGOUT( sy )
DEBUGOUT( sx )
DEBUGOUT( ey )
DEBUGOUT( ex )
endwith
|
|
136
|
How do I select multiple lines
with thisform.Edit1
.SetSelection(0,0,10,0)
.HideSelection = .F.
endwith
|
|
135
|
How can I change the shape of the cursor when it hovers the selected text
with thisform.Edit1
.Object.Cursor(4) = "exHelp"
.SelLength = 10
.HideSelection = .F.
endwith
|
|
134
|
How can I change the shape of the cursor when it hovers the incremental search area
with thisform.Edit1
.Object.Cursor(3) = "exHelp"
endwith
|
|
133
|
How can I change the shape of the cursor when it hovers the line numbers area
with thisform.Edit1
.Object.Cursor(2) = "exHelp"
.LineNumberWidth = 16
endwith
|
|
132
|
How can I change the shape of the cursor when it hovers the bookmark area
with thisform.Edit1
.Object.Cursor(1) = "exHelp"
.BookmarkWidth = 16
endwith
|
|
131
|
How can I change the shape of the cursor when it hovers the edit
with thisform.Edit1
.Object.Cursor(0) = "exHelp"
endwith
|
|
130
|
How can I enable or disable OLE drag and drop operations
with thisform.Edit1
.OLEDropMode = -1
endwith
|
|
129
|
How can I change the descriptions for items in the control's context menu
with thisform.Edit1
.Object.Caption(2,16384) = "U N D O"
.Object.Caption(2,16385) = "R E D O"
.Object.Caption(2,16387) = "C U T"
.Object.Caption(2,16388) = "C O P Y"
.Object.Caption(2,16389) = "P A S T E"
.Object.Caption(2,16390) = "D E L"
.Object.Caption(2,16392) = "A L L "
endwith
|
|
128
|
How can I change the descriptions for fields in the Replace dialog
with thisform.Edit1
.Object.Caption(1,202) = "What"
.Object.Caption(1,204) = "Replace"
.Object.Caption(1,104) = "Word"
.Object.Caption(1,105) = "Case"
.Object.Caption(1,103) = "Dir"
.Object.Caption(1,113) = "Sel"
.Object.Caption(1,114) = "File"
.Object.Caption(1,21199) = "Rep"
.Object.Caption(1,21200) = "All"
.Object.Caption(1,2) = "Abandon"
.Object.Caption(1,32000) = "Title"
.Object.Caption(1,32001) = "Failed!"
.Object.Caption(1,32001) = "Done"
endwith
|
|
127
|
How can I change the descriptions for fields in the Find dialog
with thisform.Edit1
.Object.Caption(0,202) = "What"
.Object.Caption(0,104) = "Word"
.Object.Caption(0,105) = "Case"
.Object.Caption(0,103) = "Dir"
.Object.Caption(0,113) = "U"
.Object.Caption(0,114) = "D"
.Object.Caption(0,103) = "Next"
.Object.Caption(0,21199) = "All"
.Object.Caption(0,2) = "Abandon"
.Object.Caption(0,32001) = "Failed!"
endwith
|
|
126
|
How can I change the caption for the Replace dialog
with thisform.Edit1
.Object.Caption(1,0) = "Search and Replace"
endwith
|
|
125
|
How can I change the caption for the Find dialog
with thisform.Edit1
.Object.Caption(0,0) = "Search"
endwith
|
|
124
|
How can I move the cursor when user invokes the control's context menu
with thisform.Edit1
.RClick = .T.
endwith
|
|
123
|
How can I disable indenting the selected text when the user presses the TAB key
with thisform.Edit1
.IndentOnTab = .F.
endwith
|
|
122
|
How can I indent a line
with thisform.Edit1
.LineNumberWidth = 18
.HideSelection = .F.
.SelectLine(3)
.IndentSel(.T.)
endwith
|
|
121
|
How can I show or hide the control's splitter
with thisform.Edit1
.AllowSplitter = 3
.SplitPaneHeight = 128
.SplitPaneWidth = 128
endwith
|
|
120
|
How can I select a line
with thisform.Edit1
.LineNumberWidth = 18
.HideSelection = .F.
.SelectLine(3)
endwith
|
|
119
|
How do I change the font to display the line numbers
with thisform.Edit1
.LineNumberFont.Name = "Tahoma"
.LineNumberWidth = 18
endwith
|
|
118
|
How can I change the height of the line
with thisform.Edit1
.Font.Size = 32
.DrawGridLines = .T.
.Refresh
endwith
|
|
117
|
How can I show or hide the grid lines
with thisform.Edit1
.DrawGridLines = .T.
endwith
|
|
116
|
How do I highlight the position of multiple lines expression on the vertical scroll bar
with thisform.Edit1
.AllowMark = .T.
.MarkContinueBlocks = .T.
.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>",.T.)
.Object.MarkColor("BEGIN_MSG_MAP") = RGB(255,0,0)
.Object.MarkColor("END_MSG_MAP") = RGB(128,0,0)
.Object.MarkColor("CAxWnd") = RGB(0,0,0)
.Refresh
endwith
|
|
115
|
How do I ignore \" in a string
with thisform.Edit1
.InsertText(""+chr(34)+"just a string \"+chr(34)+"expression"+chr(34)+"\r\n",1)
.AddExpression("<fgcolor=800000><b>"+chr(34)+"</b></fgcolor>","<b><fgcolor=FF0000> </fgcolor></b>","<fgcolor=800000><b>"+chr(34)+"</b></fgcolor>",.T.)
.Object.IgnorePrefixInExpression(""+chr(34)+"") = "\"
.Refresh
endwith
|
|
114
|
How can I change the color for the line number's border
with thisform.Edit1
.LineNumberBorderColor = RGB(255,0,0)
.LineNumberWidth = 18
endwith
|
|
113
|
How can I change the color for the bookmark's border
with thisform.Edit1
.BookmarkBorderColor = RGB(255,0,0)
.BookmarkWidth = 18
endwith
|
|
112
|
Can I display a custom icon or picture for bookmarks
with thisform.Edit1
var_s = "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTql"
var_s = var_s + "Vq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0"
var_s = var_s + "ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yN"
var_s = var_s + "AOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="
.Images(var_s)
.BookmarkImage = 1
.Object.Bookmark(2) = .T.
.Object.Bookmark(4) = .T.
.BookmarkWidth = 18
endwith
|
|
111
|
Can I display a custom icon or picture in the bookmark area
with thisform.Edit1
var_s = "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTql"
var_s = var_s + "Vq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0"
var_s = var_s + "ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yN"
var_s = var_s + "AOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="
.Images(var_s)
.Object.BookmarkImageLine(2) = 1
.Object.Bookmark(4) = .T.
.BookmarkWidth = 18
endwith
|
|
110
|
How do I remove the line's background color
with thisform.Edit1
.Object.BackColorLine(1) = RGB(255,0,0)
.ClearBackColorLine(1)
endwith
|
|
109
|
How do I change the foreground color for a line
with thisform.Edit1
.Object.ForeColorLine(1) = RGB(255,0,0)
endwith
|
|
108
|
How do I change the background color for a line
with thisform.Edit1
.Object.BackColorLine(1) = RGB(255,0,0)
endwith
|
|
107
|
How can I add my own items in the control's context menu
with thisform.Edit1
.ContextMenuItems = "New Item"
endwith
|
|
106
|
How do I ensure that a specified line is visible
with thisform.Edit1
.EnsureVisibleLine(.Count)
endwith
|
|
105
|
How can I programmatically perform a REDO operation
with thisform.Edit1
.Redo
endwith
|
|
104
|
How can I programmatically perform an UNDO operation
with thisform.Edit1
.Undo
endwith
|
|
103
|
How do I get the bookmarks as a list
with thisform.Edit1
.Object.Bookmark(2) = .T.
.Object.Bookmark(4) = .T.
.BookmarkWidth = 16
var_BookmarksList = .BookmarksList
endwith
|
|
102
|
How can I move to the previous bookmark
with thisform.Edit1
.Object.Bookmark(2) = .T.
.Object.Bookmark(4) = .T.
.BookmarkWidth = 16
.PrevBookmark
endwith
|
|
101
|
How can I move to the next bookmark
with thisform.Edit1
.Object.Bookmark(2) = .T.
.Object.Bookmark(4) = .T.
.BookmarkWidth = 16
.NextBookmark
endwith
|