Description

Returns a new Cursor object identical to the original one.

Syntax

object

Required. Object name, returned by Text.GetCursor(...).

Example

Swaps the characters after the cursor:

Dim objFrom = Text.GetCursor(modeSame,cposCursor,True)

Dim objTo = objFrom.Duplicate

objTo.Move (1)

Text.EditCopyRange (objFrom,objTo)

Text.DelRange (objFrom,objTo)

objFrom.Move (1)

Text.EditPasteTo (objFrom)

For the meaning of the standard constants see Constants related to Cursor and TxtPosDesc object.