202:
Can I use code completion without any UI
Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.CodeCompletion = 1
oEdit.AddKeyword("<b>class</b>","this is a bit of text that's shown when the cursor hovers the <b>class</b> keyword.","exontrol.edit")
oEdit.Refresh()
oEdit.Context().Add("class")

201:
How can I hide the control's horizontal scroll bar
Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.ScrollBars = 2

200:
Is it possible to change the line's height

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.LineHeight = "value + 8 * dpi"
oEdit.DrawGridLines = .t.

199:
How to bold everything between two * (asterisk) characters

Dim oEdit as P
Dim var_StdFont as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
var_StdFont = oEdit.Font
	var_StdFont.Name = "Consolas"
	var_StdFont.Size = 12
oEdit.AddExpression("<fgcolor=FF0000><b>*","<fgcolor=FF0000> ","<fgcolor=FF0000><b>*")
oEdit.InsertText("some text * another text * other text\r\n",1)
oEdit.Refresh()

198:
How to bold everything that starts with * (asterisk), to the end of the line

Dim oEdit as P
Dim var_StdFont as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
var_StdFont = oEdit.Font
	var_StdFont.Name = "Consolas"
	var_StdFont.Size = 12
oEdit.AddWild("<fgcolor=FF0000><b>\**")
oEdit.InsertText("some text * another text * other text\r\n",1)
oEdit.Refresh()

197:
How to make a * (asterisk) bold, not the entire / rest line

Dim oEdit as P
Dim var_StdFont as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
var_StdFont = oEdit.Font
	var_StdFont.Name = "Consolas"
	var_StdFont.Size = 12
oEdit.AddWild("<fgcolor=FF0000><b>\*")
oEdit.InsertText("some text * another text * other text\r\n",1)
oEdit.Refresh()

196:
How can I change the control's font (template)

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.Template = "Font { Name = `Consolas`; Size = 12 }"
oEdit.AddKeyword("<fgcolor=FF0000>class</fgcolor>")
oEdit.Refresh()

195:
How can I change the control's font (runtime)

Dim oEdit as P
Dim var_StdFont as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
var_StdFont = oEdit.Font
	var_StdFont.Name = "Consolas"
	var_StdFont.Size = 12
oEdit.AddKeyword("<fgcolor=FF0000>class</fgcolor>")
oEdit.Refresh()

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
Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.OLEDropMode = -1

193:
How can I display information about events the control fires

' Notifies the application once the control fires an event.
function Event as v (EventID  as  N)
	oEdit = topparent:CONTROL_ACTIVEX1.activex
	? oEdit.EventParam(-2) 
end function

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.AddWild("<fgcolor=808080>(?*)</fgcolor>")
oEdit.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 quality")
oEdit.Refresh()

192:
How do I highlights words based on wild characters

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.AddWild("<fgcolor=0000FF><b>[MC]*_HANDLER*</b></fgcolor>(*)")
oEdit.Refresh()

191:
How do I highlights words based on wild characters

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.AddWild("<fgcolor=0000FF><b> *</b></fgcolor>(*)*;")
oEdit.Refresh()

190:
How can I provide different tooltip for the same keyword

' Queries for the context at the specified location, to provide different tooltips for the same keyword on QueryContextToolTip event.
function QueryContext as v (XCursor  as  N,YCursor  as  N,QContext  as  A)
	oEdit = topparent:CONTROL_ACTIVEX1.activex
	QContext = YCursor
end function

' Asks for the tooltip/title of the keyword on the context retrieved by the QueryContext event.
function QueryContextToolTip as v (QContext  as  C,Keyword  as  C,QToolTip  as  A,QToolTipTitle  as  A)
	oEdit = topparent:CONTROL_ACTIVEX1.activex
	QToolTip = QContext
	QToolTipTitle = "Keyword Found At Line:"
end function

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.LineNumberWidth = -1
oEdit.LineNumberBackColor = 15790320
oEdit.AddKeyword("<fgcolor=FF0000><b>keyword</b></fgcolor>")
oEdit.Text = ""
oEdit.InsertText("here's the keyword on the first line")
oEdit.InsertText("\r\nhere's the keyword on the second line")
oEdit.InsertText("\r\nhere's the keyword on the third line")

189:
Is it possible to left, right or center align the inline tooltip

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.LineNumberWidth = -1
oEdit.LineNumberBackColor = 15790320
oEdit.CaretLine = 6
oEdit.Template = "Background(160) = 15790320" // oEdit.Background(160) = 15790320
oEdit.TempInlineToolTip = "<font ;6>Left Alignment<br><c>Center Alignment<br><r>Right Alignment"
oEdit.Refresh()

188:
Is it possible to display the inline tooltip with a different appearance than temporarily inline tooltip

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.LineNumberWidth = -1
oEdit.LineNumberBackColor = 15790320
oEdit.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 quality.")
oEdit.AllowInlineToolTip = 513 'exInlineToolTipWordWrap + exInlineToolTip
oEdit.Template = "Background(159) = 8421504" // oEdit.Background(159) = 8421504
oEdit.Template = "Background(158) = 15790320" // oEdit.Background(158) = 15790320
oEdit.CaretLine = 6
oEdit.Template = "Background(160) = 10495" // oEdit.Background(160) = 10495
oEdit.Template = "Background(161) = 65536" // oEdit.Background(161) = 65536
oEdit.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>"
oEdit.Refresh()

187:
How can I display the inline tooltip over the lines, instead pushing the lines

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.LineNumberWidth = -1
oEdit.LineNumberBackColor = 15790320
oEdit.Template = "Background(160) = 65535" // oEdit.Background(160) = 65535
oEdit.CaretLine = 3
oEdit.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."
oEdit.AllowInlineToolTip = 768 'exInlineToolTipWordWrap + exInlineToolTipOver
oEdit.Refresh()

186:
Is it possible to display the inline tooltip all the time

' Occurs when the user selects text in the control.
function SelChange as v ()
	oEdit = topparent:CONTROL_ACTIVEX1.activex
	oEdit.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 function

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.LineNumberWidth = -1
oEdit.LineNumberBackColor = 15790320
oEdit.Template = "Background(160) = 65535" // oEdit.Background(160) = 65535
oEdit.CaretLine = 12
oEdit.AllowInlineToolTip = 512
oEdit.Refresh()

185:
Is it possible to display images in the inline tooltip

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
oEdit.Images("gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yNAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=")
oEdit.LineNumberWidth = -1
oEdit.LineNumberBackColor = 15790320
oEdit.CaretLine = 4
oEdit.Template = "Background(160) = 16777216" // oEdit.Background(160) = 16777216
oEdit.AllowInlineToolTip = 512
oEdit.TempInlineToolTip = "<img>1</img>This is a bit of text that's shown programatically under the current line"

184:
How can I change the visual appearance of the temporarily inline tooltip

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
oEdit.LineNumberWidth = -1
oEdit.LineNumberBackColor = 15790320
oEdit.CaretLine = 4
oEdit.Template = "Background(160) = 16777216" // oEdit.Background(160) = 16777216
oEdit.AllowInlineToolTip = 512
oEdit.TempInlineToolTip = "This is a bit of text that's shown programatically under the current line"

183:
How can I display programmatically the inline tooltip, but using word-wrapping

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.LineNumberWidth = -1
oEdit.LineNumberBackColor = 15790320
oEdit.CaretLine = 4
oEdit.Template = "Background(160) = 15790320" // oEdit.Background(160) = 15790320
oEdit.AllowInlineToolTip = 512
oEdit.TempInlineToolTip = "This is a bit of text that's shown programatically under the current line"

182:
How can I display programmatically the inline tooltip

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.LineNumberWidth = -1
oEdit.LineNumberBackColor = 15790320
oEdit.CaretLine = 4
oEdit.Template = "Background(160) = 15790320" // oEdit.Background(160) = 15790320
oEdit.TempInlineToolTip = "<br><c>This is a bit of text that's shown programatically under the current line<br>"

181:
How can I show the inline tooltip with a different appearance

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.VisualAppearance.Add(1,"c:\exontrol\images\normal.ebn")
oEdit.LineNumberWidth = -1
oEdit.LineNumberBackColor = 15790320
oEdit.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 quality.")
oEdit.AllowInlineToolTip = 513 'exInlineToolTipWordWrap + exInlineToolTip
oEdit.Template = "Background(158) = 16777216" // oEdit.Background(158) = 16777216
oEdit.Template = "Background(159) = 128" // oEdit.Background(159) = 128
oEdit.Refresh()

180:
Is it possible to prevent moving the lines after the inline tooltip

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.LineNumberWidth = -1
oEdit.LineNumberBackColor = 15790320
oEdit.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 quality.")
oEdit.AllowInlineToolTip = 769 'exInlineToolTipWordWrap + exInlineToolTipOver + exInlineToolTip
oEdit.Template = "Background(158) = 65535" // oEdit.Background(158) = 65535
oEdit.Refresh()

179:
How can I display the inline tooltip, when typing only

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.LineNumberWidth = -1
oEdit.LineNumberBackColor = 15790320
oEdit.ToolTipOnTyping = .f.
oEdit.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 quality.")
oEdit.AllowInlineToolTip = 514 'exInlineToolTipWordWrap + exInlineToolTipOnChange
oEdit.Template = "Background(158) = 15790320" // oEdit.Background(158) = 15790320
oEdit.Refresh()

178:
How do I enable the inline tooltip support

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.LineNumberWidth = -1
oEdit.LineNumberBackColor = 15790320
oEdit.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 quality.")
oEdit.AllowInlineToolTip = 513 'exInlineToolTipWordWrap + exInlineToolTip
oEdit.Template = "Background(159) = 8421504" // oEdit.Background(159) = 8421504
oEdit.Refresh()

177:
How do I display a tooltip for a non-keyword

' Occurs when the user moves the mouse.
function MouseMove as v (Button  as  N,Shift  as  N,X  as  OLE::Exontrol.Edit.1::OLE_XPOS_PIXELS,Y  as  OLE::Exontrol.Edit.1::OLE_YPOS_PIXELS)
	oEdit = topparent:CONTROL_ACTIVEX1.activex
	oEdit.ShowToolTip(oEdit.WordFromPoint(-1,-1),,,"+8","+8")
end function

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex

176:
How do I get the text from the cursor

' Occurs when the user moves the mouse.
function MouseMove as v (Button  as  N,Shift  as  N,X  as  OLE::Exontrol.Edit.1::OLE_XPOS_PIXELS,Y  as  OLE::Exontrol.Edit.1::OLE_YPOS_PIXELS)
	oEdit = topparent:CONTROL_ACTIVEX1.activex
	? oEdit.WordFromPoint(-1,-1) 
end function

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex

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
Dim oEdit as P
Dim var_Context as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
var_Context = oEdit.Context()
	var_Context.Add("exText")
	var_Context.Add("exHTML")
	' var_Context.Options(7) = .t.
	oEdit.TemplateDef = "dim var_Context"
	oEdit.TemplateDef = var_Context
	oEdit.Template = "var_Context.Options(7) = True"

oEdit.Text = ""
oEdit.InsertText("Press CTRL+SPACE, and type h, so the exHTML is not selected.")

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
Dim oEdit as P
Dim var_Context as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.AddExpression("<fgcolor=008000>'</fgcolor>","<fgcolor=008000> </fgcolor>","")
var_Context = oEdit.Context()
	var_Context.Add("exText (0)","0 ' specifies the exText flag")
	var_Context.Add("exHTML (-1)","-1 ' specifies the exHTML flag")
	' var_Context.Options(6) = "(0:=value lfind `'`) < 0 ? -1 : ( =:0 - (len(1:=(value left =:0)) - len(ltrim(reverse(=:1)))))"
	oEdit.TemplateDef = "dim var_Context"
	oEdit.TemplateDef = var_Context
	oEdit.Template = "var_Context.Options(6) = `(0:=value lfind ``'``) < 0 ? -1 : ( =:0 - (len(1:=(value left =:0)) - len(ltrim(reverse(=:1)))))`"

oEdit.Text = ""
oEdit.InsertText("Press CTRL + SPACE, and select any item, a number is inserted")

173:
How can I show a different sensitive context when user press a key/character

' Indicates that the control's text have changed.
function Change as v ()
	oEdit = topparent:CONTROL_ACTIVEX1.activex
	oEdit.ShowContext(oEdit.ChangeOnKey)
	oEdit.ActiveContextItems = ""
end function

Dim oEdit as P
Dim var_Context as P
Dim var_Context1 as P
Dim var_Context2 as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.Text = ""
oEdit.InsertText("Press .(dot), :(color) or =(equal), to get different sensitive context")
oEdit.ActiveContextItems = ""
var_Context = oEdit.Context("61")
	var_Context.Add("Equal_1")
	var_Context.Add("Equal_2")
var_Context1 = oEdit.Context("46")
	var_Context1.Add("Dot_1")
	var_Context1.Add("Dot_2")
var_Context2 = oEdit.Context("58")
	var_Context2.Add("Colon_1")
	var_Context2.Add("Colon_2")

172:
How can I allow spaces when control's sentitive context is shown/opened

' Indicates that the control's text have changed.
function Change as v ()
	oEdit = topparent:CONTROL_ACTIVEX1.activex
	oEdit.ShowContext(oEdit.ChangeOnKey)
	oEdit.ActiveContextItems = ""
end function

Dim oEdit as P
Dim var_Context as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
var_Context = oEdit.Context("61")
	var_Context.Add("True (-1)","True")
	var_Context.Add("False (-1)","False")
	' var_Context.Options(5) = .t.
	oEdit.TemplateDef = "dim var_Context"
	oEdit.TemplateDef = var_Context
	oEdit.Template = "var_Context.Options(5) = True"

oEdit.Text = ""
oEdit.InsertText("Press the = key and after that press the space keys")
oEdit.InsertText("")

171:
How can I display more pages on the control's senitive context

Dim oEdit as P
Dim var_Context as P
Dim var_Context1 as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
var_Context = oEdit.Context()
	var_Context.Add("First_1")
	var_Context.Add("First_2")
var_Context1 = oEdit.Context("Second")
	var_Context1.Add("Second_1")
	var_Context1.Add("Second_2")
	var_Context1.Add("Second_3")
oEdit.ActiveContextItems = "Second"
oEdit.PagesContextItems = ":Page<font ;6><off -4>1</off></font>,Second:Page<font ;6><off -4>2</off></font>"

170:
Is it possible to disable showing tooltip for items in the control's senitive context
Dim oEdit as P
Dim var_Context as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
var_Context = oEdit.Context()
	var_Context.Add("Column")
	' var_Context.Options(3) = "This is bit of text that shown when user selects the <b>Column</b> item."
	oEdit.TemplateDef = "dim var_Context"
	oEdit.TemplateDef = var_Context
	oEdit.Template = "var_Context.Options(3) = `This is bit of text that shown when user selects the <b>Column</b> item.`"

	var_Context.Add("Item")
	' var_Context.Options(3) = "This is bit of text that shown when user selects the <b>Item</b> item."
	oEdit.TemplateDef = "dim var_Context"
	oEdit.TemplateDef = var_Context
	oEdit.Template = "var_Context.Options(3) = `This is bit of text that shown when user selects the <b>Item</b> item.`"

	' var_Context.Options(2) = .f.
	oEdit.TemplateDef = "dim var_Context"
	oEdit.TemplateDef = var_Context
	oEdit.Template = "var_Context.Options(2) = False"


169:
How can I assign tooltips for items in the control's senitive context

Dim oEdit as P
Dim var_Context as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
var_Context = oEdit.Context()
	var_Context.Add("Column")
	' var_Context.Options(3) = "This is bit of text that shown when user selects the <b>Column</b> item."
	oEdit.TemplateDef = "dim var_Context"
	oEdit.TemplateDef = var_Context
	oEdit.Template = "var_Context.Options(3) = `This is bit of text that shown when user selects the <b>Column</b> item.`"

	var_Context.Add("Item")
	' var_Context.Options(3) = "This is bit of text that shown when user selects the <b>Item</b> item."
	oEdit.TemplateDef = "dim var_Context"
	oEdit.TemplateDef = var_Context
	oEdit.Template = "var_Context.Options(3) = `This is bit of text that shown when user selects the <b>Item</b> item.`"


168:
By default, the control shows the Context(""). How can I display other items

' Occurs when the user invokes the control's context window.
function OnContext as v (Start  as  N,Context  as  C)
	oEdit = topparent:CONTROL_ACTIVEX1.activex
	? "CurrentContext:" 
	? Context 
	oEdit.ActiveContextItems = "Second"
end function

Dim oEdit as P
Dim var_Context as P
Dim var_Context1 as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
var_Context = oEdit.Context()
	var_Context.Add("First_1")
	var_Context.Add("First_2")
var_Context1 = oEdit.Context("Second")
	var_Context1.Add("Second_1")
	var_Context1.Add("Second_2")
	var_Context1.Add("Second_3")

167:
How can I show the control's sensitive context

' Occurs when the user double clicks the left mouse button over an object.
function DblClick as v (Shift  as  N,X  as  OLE::Exontrol.Edit.1::OLE_XPOS_PIXELS,Y  as  OLE::Exontrol.Edit.1::OLE_YPOS_PIXELS)
	oEdit = topparent:CONTROL_ACTIVEX1.activex
	oEdit.ShowContext("DB")
end function

Dim oEdit as P
Dim var_Context as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
var_Context = oEdit.Context("DB")
	var_Context.Add("BEGIN_MSG_MAP")
	var_Context.Add("<fgcolor=808080>MESSAGE_HANDLER")
	var_Context.Add("<fgcolor=808080>COMMAND_HANDLER")
	var_Context.Add("END_MSG_MAP")

166:
How can I provide different sensitive context

' Indicates that the control's text have changed.
function Change as v ()
	oEdit = topparent:CONTROL_ACTIVEX1.activex
	oEdit.ShowContext(oEdit.ChangeOnKey)
end function

Dim oEdit as P
Dim var_Context as P
Dim var_Context1 as P
Dim var_Context2 as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.Text = ""
oEdit.InsertText("Press .(dot), :(colon) or CTRL + SPACE to invoke the control's context")
var_Context = oEdit.Context()
	var_Context.Add("General_1")
	var_Context.Add("General_2")
var_Context1 = oEdit.Context("46")
	var_Context1.Add("Property_1")
	var_Context1.Add("Property_2")
	var_Context1.Add("Property_3")
var_Context2 = oEdit.Context("58")
	var_Context2.Add("Method_1")
	var_Context2.Add("Method_2")
	var_Context2.Add("Method_3")

165:
How can I change the control's background/foreground colors while the control is locked/read-only

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.Locked = .t.
oEdit.SelBackColor = 8421504
oEdit.ForeColorLockedLine = 8421504
oEdit.BackColorLockedLine = 16777215

164:
How can change the color for selected text, when the control has no focus

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.HideSelection = .f.
oEdit.SelLength = 10
oEdit.SelBackColorHide = 255

163:
How do I change the "Incremental Search" caption

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.Template = "Cursor(3) = `exHelp`" // oEdit.Cursor(3) = "exHelp"
oEdit.Template = "Caption(3,0) = `Search for: %s`" // oEdit.Caption(3,0) = "Search for: %s"
oEdit.IncrementalSearchError = 255

162:
How do I enable the scrollbar-extension, as thumb to be shown outside of the control's client area

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.ScrollBars = 3
oEdit.Template = "ScrollPartVisible(0,65536) = True" // oEdit.ScrollPartVisible(0,65536) = .t.
oEdit.Template = "ScrollPartVisible(1,65536) = True" // oEdit.ScrollPartVisible(1,65536) = .t.
oEdit.Template = "ScrollPartVisible(2,65536) = True" // oEdit.ScrollPartVisible(2 '2 + ,65536) = .t.
oEdit.ScrollWidth = 4
oEdit.Template = "Background(276) = 15790320" // oEdit.Background(276) = 15790320
oEdit.Template = "Background(260) = 8421504" // oEdit.Background(260) = 8421504
oEdit.ScrollHeight = 4
oEdit.Template = "Background(404) = Background(276)" // oEdit.Background(404) = oEdit.Background(276)
oEdit.Template = "Background(388) = Background(260)" // oEdit.Background(388) = oEdit.Background(260)
oEdit.Template = "Background(3) = Background(276)" // oEdit.Background(3) = oEdit.Background(276)

161:
How can I get ride of control's horizontal scroll bar

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.AddKeyword("<b>CExHelperDialog</b>")
oEdit.Refresh()
oEdit.ScrollBars = 2

160:
How do I specify the characters to close the sensitive context

Dim oEdit as P
Dim var_Context as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.Images("gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yNAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=")
oEdit.AddKeyword("<b>class</b>","this is a bit of text that's shown when the cursor hovers the <b>class</b> keyword.","exontrol.edit")
oEdit.AddKeyword("<b>public</b>","this is a bit of text that's shown when the cursor hovers the <b>class</b> keyword.","exontrol.edit")
oEdit.Refresh()
var_Context = oEdit.Context()
	var_Context.Add("<b>class</b>","",1)
	var_Context.Add("<b>public</b>","",2)
	' var_Context.Options(1) = "_ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz"
	oEdit.TemplateDef = "dim var_Context"
	oEdit.TemplateDef = var_Context
	oEdit.Template = "var_Context.Options(1) = `_ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz`"


159:
How do I sort items in the sensitive context

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.Images("gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yNAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=")
oEdit.AddKeyword("<b>class</b>","this is a bit of text that's shown when the cursor hovers the <b>class</b> keyword.","exontrol.edit")
oEdit.AddKeyword("<b>public</b>","this is a bit of text that's shown when the cursor hovers the <b>class</b> keyword.","exontrol.edit")
oEdit.Refresh()
oEdit.Context().Add("<b>public</b>","",2)
oEdit.Context().Add("<b>class</b>","",1)
oEdit.Context().Sort(.t.)

158:
Can I add icons to the sensitive context

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.Images("gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yNAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=")
oEdit.AddKeyword("<b>class</b>","this is a bit of text that's shown when the cursor hovers the <b>class</b> keyword.","exontrol.edit")
oEdit.Refresh()
oEdit.Context().Add("<b>class</b>","",1)

157:
How can I change the keys combination that invokes the sensitive context

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.ContextKey = 544
oEdit.AddKeyword("<b>class</b>","this is a bit of text that's shown when the cursor hovers the <b>class</b> keyword.","exontrol.edit")
oEdit.Refresh()
oEdit.Context().Add("class")

156:
How do I enable or disable the sensitive context menu
Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.CodeCompletion = 0
oEdit.AddKeyword("<b>class</b>","this is a bit of text that's shown when the cursor hovers the <b>class</b> keyword.","exontrol.edit")
oEdit.Refresh()
oEdit.Context().Add("class")

155:
How can I add a sensitive context menu

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.AddKeyword("<b>class</b>","this is a bit of text that's shown when the cursor hovers the <b>class</b> keyword.","exontrol.edit")
oEdit.Refresh()
oEdit.Context().Add("class")

154:
Can I use wild characters to define keys in your control

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.AddWild("<fgcolor=808080>(*)</fgcolor>")
oEdit.Refresh()

153:
Can I use wild characters to define keys in your control

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.AddWild("_HANDLER<fgcolor=FF0000>(*)</fgcolor>")
oEdit.Refresh()

152:
How can I remove or delete all expressions

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.AddExpression("(","<b><fgcolor=FF0000> </fgcolor></b>",")",.f.)
oEdit.ClearExpressions()
oEdit.Refresh()

151:
How can I remove or delete an expression

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.AddExpression("(","<b><fgcolor=FF0000> </fgcolor></b>",")",.f.)
oEdit.DeleteExpression("(")
oEdit.Refresh()

150:
How can I add an expression

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.AddExpression("(","<b><fgcolor=FF0000> </fgcolor></b>",")",.f.)
oEdit.Refresh()

149:
How can I add an expression on multiple lines

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.AddExpression("<fgcolor=800000><b>BEGIN_MSG_MAP</b></fgcolor>","<b><fgcolor=FF0000> </fgcolor></b>","<fgcolor=800000><b>END_MSG_MAP</b></fgcolor>",.t.)
oEdit.Refresh()

148:
How can I remove or delete all keywords
Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.AddKeyword("<b><fgcolor=FF0000>class</fgcolor></b>")
oEdit.ClearKeywords()
oEdit.Refresh()

147:
How can I remove or delete keyword
Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.AddKeyword("<b><fgcolor=FF0000>class</fgcolor></b>")
oEdit.DeleteKeyword("class")
oEdit.Refresh()

146:
How do I add a keyword that's not case sensitive

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.AddKeyword("<b><fgcolor=FF0000>class</fgcolor></b>","","",2)
oEdit.Refresh()
oEdit.InsertText("ClasS\r\n",1)
oEdit.InsertText("CLASS\r\n",1)

145:
How do I add a keyword that's not case sensitive

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.AddKeyword("<fgcolor=FF0000>class</fgcolor>","","",1)
oEdit.Refresh()
oEdit.InsertText("ClasS\r\n",1)
oEdit.InsertText("CLASS\r\n",1)

144:
How can I assign a tooltip to a keyword

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.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")
oEdit.Refresh()

143:
How do I add a keyword

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.AddKeyword("<fgcolor=FF0000>class</fgcolor>")
oEdit.Refresh()

142:
How do I add a keyword

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.AddKeyword("<b>class</b>","this is a bit of text that's shown when the cursor hovers the <b>class</b> keyword.","exontrol.edit")
oEdit.Refresh()

141:
How can I display a tooltip as soon as the user types a keyword

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.ToolTipDelay = 1
oEdit.ToolTipOnTyping = .t.
oEdit.AddKeyword("<b>class</b>","this is a bit of text that's shown when the cursor hovers the <b>class</b> keyword.","exontrol.edit")
oEdit.Refresh()

140:
How do I change the color for a locked or a read only line

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.ForeColorLockedLine = 0
oEdit.BackColorLockedLine = 255
oEdit.Template = "LockedLine(1) = True" // oEdit.LockedLine(1) = .t.

139:
How do I lock or make read only a line

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.Template = "LockedLine(1) = True" // oEdit.LockedLine(1) = .t.

138:
How do I start overtyping

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.Overtype = .t.

137:
How do I get the selection

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.GetSelection(sy,sx,ey,ex)
? sy 
? sx 
? ey 
? ex 

136:
How do I select multiple lines

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.SetSelection(0,0,10,0)
oEdit.HideSelection = .f.

135:
How can I change the shape of the cursor when it hovers the selected text

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.Template = "Cursor(4) = `exHelp`" // oEdit.Cursor(4) = "exHelp"
oEdit.SelLength = 10
oEdit.HideSelection = .f.

134:
How can I change the shape of the cursor when it hovers the incremental search area

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.Template = "Cursor(3) = `exHelp`" // oEdit.Cursor(3) = "exHelp"

133:
How can I change the shape of the cursor when it hovers the line numbers area

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.Template = "Cursor(2) = `exHelp`" // oEdit.Cursor(2) = "exHelp"
oEdit.LineNumberWidth = 16

132:
How can I change the shape of the cursor when it hovers the bookmark area

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.Template = "Cursor(1) = `exHelp`" // oEdit.Cursor(1) = "exHelp"
oEdit.BookmarkWidth = 16

131:
How can I change the shape of the cursor when it hovers the edit
Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.Template = "Cursor(0) = `exHelp`" // oEdit.Cursor(0) = "exHelp"

130:
How can I enable or disable OLE drag and drop operations
Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.OLEDropMode = -1

129:
How can I change the descriptions for items in the control's context menu

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.Template = "Caption(2,16384) = `U N D O`" // oEdit.Caption(2,16384) = "U N D O"
oEdit.Template = "Caption(2,16385) = `R E D O`" // oEdit.Caption(2,16385) = "R E D O"
oEdit.Template = "Caption(2,16387) = `C U T`" // oEdit.Caption(2,16387) = "C U T"
oEdit.Template = "Caption(2,16388) = `C O P Y`" // oEdit.Caption(2,16388) = "C O P Y"
oEdit.Template = "Caption(2,16389) = `P A S T E`" // oEdit.Caption(2,16389) = "P A S T E"
oEdit.Template = "Caption(2,16390) = `D E L`" // oEdit.Caption(2,16390) = "D E L"
oEdit.Template = "Caption(2,16392) = `A L L `" // oEdit.Caption(2,16392) = "A L L "

128:
How can I change the descriptions for fields in the Replace dialog

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.Template = "Caption(1,202) = `What`" // oEdit.Caption(1,202) = "What"
oEdit.Template = "Caption(1,204) = `Replace`" // oEdit.Caption(1,204) = "Replace"
oEdit.Template = "Caption(1,104) = `Word`" // oEdit.Caption(1,104) = "Word"
oEdit.Template = "Caption(1,105) = `Case`" // oEdit.Caption(1,105) = "Case"
oEdit.Template = "Caption(1,103) = `Dir`" // oEdit.Caption(1,103) = "Dir"
oEdit.Template = "Caption(1,113) = `Sel`" // oEdit.Caption(1,113) = "Sel"
oEdit.Template = "Caption(1,114) = `File`" // oEdit.Caption(1,114) = "File"
oEdit.Template = "Caption(1,21199) = `Rep`" // oEdit.Caption(1,21199) = "Rep"
oEdit.Template = "Caption(1,21200) = `All`" // oEdit.Caption(1,21200) = "All"
oEdit.Template = "Caption(1,2) = `Abandon`" // oEdit.Caption(1,2) = "Abandon"
oEdit.Template = "Caption(1,32000) = `Title`" // oEdit.Caption(1,32000) = "Title"
oEdit.Template = "Caption(1,32001) = `Failed!`" // oEdit.Caption(1,32001) = "Failed!"
oEdit.Template = "Caption(1,32001) = `Done`" // oEdit.Caption(1,32001) = "Done"

127:
How can I change the descriptions for fields in the Find dialog

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.Template = "Caption(0,202) = `What`" // oEdit.Caption(0,202) = "What"
oEdit.Template = "Caption(0,104) = `Word`" // oEdit.Caption(0,104) = "Word"
oEdit.Template = "Caption(0,105) = `Case`" // oEdit.Caption(0,105) = "Case"
oEdit.Template = "Caption(0,103) = `Dir`" // oEdit.Caption(0,103) = "Dir"
oEdit.Template = "Caption(0,113) = `U`" // oEdit.Caption(0,113) = "U"
oEdit.Template = "Caption(0,114) = `D`" // oEdit.Caption(0,114) = "D"
oEdit.Template = "Caption(0,103) = `Next`" // oEdit.Caption(0,103) = "Next"
oEdit.Template = "Caption(0,21199) = `All`" // oEdit.Caption(0,21199) = "All"
oEdit.Template = "Caption(0,2) = `Abandon`" // oEdit.Caption(0,2) = "Abandon"
oEdit.Template = "Caption(0,32001) = `Failed!`" // oEdit.Caption(0,32001) = "Failed!"

126:
How can I change the caption for the Replace dialog

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.Template = "Caption(1,0) = `Search and Replace`" // oEdit.Caption(1,0) = "Search and Replace"

125:
How can I change the caption for the Find dialog

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.Template = "Caption(0,0) = `Search`" // oEdit.Caption(0,0) = "Search"

124:
How can I move the cursor when user invokes the control's context menu

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.RClick = .t.

123:
How can I disable indenting the selected text when the user presses the TAB key
Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.IndentOnTab = .f.

122:
How can I indent a line

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.LineNumberWidth = 18
oEdit.HideSelection = .f.
oEdit.SelectLine(3)
oEdit.IndentSel(.t.)

121:
How can I show or hide the control's splitter

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.AllowSplitter = 3
oEdit.SplitPaneHeight = 128
oEdit.SplitPaneWidth = 128

120:
How can I select a line

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.LineNumberWidth = 18
oEdit.HideSelection = .f.
oEdit.SelectLine(3)

119:
How do I change the font to display the line numbers

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.LineNumberFont.Name = "Tahoma"
oEdit.LineNumberWidth = 18

118:
How can I change the height of the line

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.Font.Size = 32
oEdit.DrawGridLines = .t.
oEdit.Refresh()

117:
How can I show or hide the grid lines

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.DrawGridLines = .t.

116:
How do I highlight the position of multiple lines expression on the vertical scroll bar

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.AllowMark = .t.
oEdit.MarkContinueBlocks = .t.
oEdit.AddKeyword("<b>CAxWnd")
oEdit.AddExpression("<fgcolor=800000><b>BEGIN_MSG_MAP</b></fgcolor>","<b><fgcolor=FF0000> </fgcolor></b>","<fgcolor=800000><b>END_MSG_MAP</b></fgcolor>",.t.)
oEdit.Template = "MarkColor(`BEGIN_MSG_MAP`) = 255" // oEdit.MarkColor("BEGIN_MSG_MAP") = 255
oEdit.Template = "MarkColor(`END_MSG_MAP`) = 128" // oEdit.MarkColor("END_MSG_MAP") = 128
oEdit.Template = "MarkColor(`CAxWnd`) = 0" // oEdit.MarkColor("CAxWnd") = 0
oEdit.Refresh()

115:
How do I ignore \" in a string

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.InsertText("\"just a string \\"expression\"\r\n",1)
oEdit.AddExpression("<fgcolor=800000><b>\"</b></fgcolor>","<b><fgcolor=FF0000> </fgcolor></b>","<fgcolor=800000><b>\"</b></fgcolor>",.t.)
oEdit.Template = "IgnorePrefixInExpression(`\"`) = `\`" // oEdit.IgnorePrefixInExpression("\"") = "\"
oEdit.Refresh()

114:
How can I change the color for the line number's border

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.LineNumberBorderColor = 255
oEdit.LineNumberWidth = 18

113:
How can I change the color for the bookmark's border

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.BookmarkBorderColor = 255
oEdit.BookmarkWidth = 18

112:
Can I display a custom icon or picture for bookmarks

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.Images("gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yNAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=")
oEdit.BookmarkImage = 1
oEdit.Template = "Bookmark(2) = True" // oEdit.Bookmark(2) = .t.
oEdit.Template = "Bookmark(4) = True" // oEdit.Bookmark(4) = .t.
oEdit.BookmarkWidth = 18

111:
Can I display a custom icon or picture in the bookmark area

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.Images("gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yNAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=")
oEdit.Template = "BookmarkImageLine(2) = 1" // oEdit.BookmarkImageLine(2) = 1
oEdit.Template = "Bookmark(4) = True" // oEdit.Bookmark(4) = .t.
oEdit.BookmarkWidth = 18

110:
How do I remove the line's background color
Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.Template = "BackColorLine(1) = 255" // oEdit.BackColorLine(1) = 255
oEdit.ClearBackColorLine(1)

109:
How do I change the foreground color for a line

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.Template = "ForeColorLine(1) = 255" // oEdit.ForeColorLine(1) = 255

108:
How do I change the background color for a line

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.Template = "BackColorLine(1) = 255" // oEdit.BackColorLine(1) = 255

107:
How can I add my own items in the control's context menu

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.ContextMenuItems = "New Item"

106:
How do I ensure that a specified line is visible

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.EnsureVisibleLine(oEdit.Count)

105:
How can I programmatically perform a REDO operation
Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.Redo()

104:
How can I programmatically perform an UNDO operation
Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.Undo()

103:
How do I get the bookmarks as a list

Dim oEdit as P
Dim var_BookmarksList as 

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.Template = "Bookmark(2) = True" // oEdit.Bookmark(2) = .t.
oEdit.Template = "Bookmark(4) = True" // oEdit.Bookmark(4) = .t.
oEdit.BookmarkWidth = 16
var_BookmarksList = oEdit.BookmarksList

102:
How can I move to the previous bookmark

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.Template = "Bookmark(2) = True" // oEdit.Bookmark(2) = .t.
oEdit.Template = "Bookmark(4) = True" // oEdit.Bookmark(4) = .t.
oEdit.BookmarkWidth = 16
oEdit.PrevBookmark()

101:
How can I move to the next bookmark

Dim oEdit as P

oEdit = topparent:CONTROL_ACTIVEX1.activex
oEdit.Template = "Bookmark(2) = True" // oEdit.Bookmark(2) = .t.
oEdit.Template = "Bookmark(4) = True" // oEdit.Bookmark(4) = .t.
oEdit.BookmarkWidth = 16
oEdit.NextBookmark()