EditPoint.Cut-Methode

  • Artikel

Aktualisiert: November 2007

Kopiert den angegebenen Textbereich in die Zwischenablage und löscht diesen aus dem Dokument.

Namespace:  EnvDTE
Assembly:  EnvDTE (in EnvDTE.dll)

Syntax

Sub Cut ( _
    PointOrCount As Object, _
    Append As Boolean _
)

Dim instance As EditPoint
Dim PointOrCount As Object
Dim Append As Boolean

instance.Cut(PointOrCount, Append)

void Cut(
    Object PointOrCount,
    bool Append
)

void Cut(
    [InAttribute] Object^ PointOrCount, 
    [InAttribute] bool Append
)

function Cut(
    PointOrCount : Object, 
    Append : boolean
)

Parameter

  • Append
    Typ: System.Boolean

    Optional. Zeigt an, ob der markierte Text in die Zwischenablage angefügt werden soll. Der Standardwert ist false.

Hinweise

Wenn PointOrCount ein TextPoint-Objekt ist, schneidet Cut den Text zwischen dem Bearbeitungspunkt und PointOrCount aus und fügt ihn in die Zwischenablage ein. Wenn PointOrCount eine ganze Zahl ist, schneidet Cut die angegebene Anzahl von Zeichen aus, die auf den Bearbeitungspunkt folgen (wobei für jede implizierte Zeilenumbruchsequenz am Ende jeder Zeile ein Zeichen hinzugefügt wird). Wenn PointOrCount negativ ist, schneidet Cut Text vor dem Bearbeitungspunkt aus.

Wenn Appendtrue ist, fügt Cut die Auswahl an den aktuellen Inhalt der Zwischenablage an, anstatt diesen zu ersetzen.

Beispiele

Sub CutExample()
   Dim objTextDoc As TextDocument
   Dim objEditPt As EditPoint, iCtr As Integer
        
   ' Create a new text file.
   DTE.ItemOperations.NewFile("General\Text File")
        
   ' Get a handle to the new document and create an EditPoint.
   objTextDoc = DTE.ActiveDocument.Object("TextDocument")
   objEditPt = objTextDoc.StartPoint.CreateEditPoint
       
   ' Insert ten lines of text.
   For iCtr = 1 To 10
      objeditpt.Insert("This is a test." & Chr(13))
   Next iCtr
        
   ' Copies the fourth word of the fourth line and pastes it, 
   ' then cuts the fourth word of the eighth line.
   objEditPt.StartOfDocument()
   objEditPt.LineDown(3)
   objEditPt.WordRight(3)
   objEditPt.Copy(4)
   objEditPt.Paste()
   objEditPt.LineDown(3)
   objEditPt.WordRight(3)
   objEditPt.Cut(4)
End Sub

Berechtigungen

Siehe auch

Referenz

EditPoint-Schnittstelle

EditPoint-Member

EnvDTE-Namespace