UndoContext.SetAborted UndoContext.SetAborted UndoContext.SetAborted UndoContext.SetAborted Method


Discards all changes to participating open documents since opening the UndoContext object.

 void SetAborted();
public void SetAborted ();
abstract member SetAborted : unit -> unit
Public Sub SetAborted ()


Sub SetAbortedExample()  
   ' Before running, select text in an open document.  
   Dim txtSel As TextSelection  
   Dim strTS As String, strAnswer As String, bIsOpen As Boolean  
   txtSel = DTE.ActiveDocument.Selection  
   strTS = txtSel.Text  

   ' Check to see if UndoContext object is already open.  
   If DTE.UndoContext.IsOpen = True Then  
      bIsOpen = True  
      ' Open the UndoContext object to track changes.  
      DTE.UndoContext.Open("RemoveNewLines", False)  
   End If  
   MsgBox("Current IsAborted value: " & DTE.UndoContext.IsAborted)  

   ' Perform search for newline characters and remove them.  
   If strTS <> "" Then  
      strTS = Replace(strTS, vbNewLine, "", Compare:=vbTextCompare)  
   End If  

   ' Check to see if you want to discard changes.  
   strAnswer = MsgBox("Do you want to discard all changes made?", vbYesNo & vbQuestion)  
   If strAnswer = True Then  
      MsgBox("Current IsAborted value: " & DTE.UndoContext.IsAborted)  
   End If  

   ' If UndoContext was already open, don't close it.  
   If bIsOpen = True Then  
      ' Close the UndoContext object to commit the changes.  
   End If  
End Sub  


SetAborted sets the IsAborted property for the open UndoContext object to true. When this occurs, all changes made to participating documents since opening the UndoContext object until the UndoContext object is closed are discarded.

Applies to