|Important||This document may not represent best practices for current development, links to downloads and other resources may no longer be valid. Current recommended version can be found here.|
Represents, as a single transaction, all operations performed on all participating open documents in Visual Studio. If its SetAborted method is invoked, all changes made since opening the object are discarded.
Assembly: EnvDTE (in EnvDTE.dll)
The object is returned by the UndoContext property of the _DTE object. There is only one global undo service in Visual Studio that is either open or closed. After the object is opened, all updates made to documents in Visual Studio can be reversed (undone) by a single undo action, the SetAborted method, until the object is closed. If the SetAborted method is invoked, all changes made since opening the object are discarded.
To use the object, open it, make document changes, and then close the object to finalize the changes.
To discard the changes, call the SetAborted method before closing the object. After you close object, you can no longer undo the changes.
Before using the object, check to see if it is already open from a previous operation. If it is already open, then your changes will be undone in all participating documents, along with all changes done since the object was first opened. If the object is already open when you check it, do not close it, because the previous caller still requires it for an undo operation. Consequently, you should not call SetAborted and then close the object unless you originally opened it. Close it after you are done changing text in documents.
Sub UndoContextExample() ' Before running, select text in an open document. Dim txtSel As TextSelection Dim strTS As String, boolWasOpen As Boolean txtSel = DTE.ActiveDocument.Selection strTS = txtSel.Text ' Check to see if UndoContext object is already open. If DTE.UndoContext.IsOpen = True Then boolWasOpen = True Else ' Open the UndoContext object to track changes. DTE.UndoContext.Open("RemoveNewLines", False) End If ' Perform search for newline characters and remove them. If strTS <> "" Then txtSel.Delete() strTS = Replace(strTS, vbNewLine, "", Compare:=vbTextCompare) txtSel.Insert(strTS) End If ' If UndoContext was already open, do not close it. If boolWasOpen = False Then ' Close the UndoContext object to commit the changes. DTE.UndoContext.Close() End If End Sub