EditPoint.DeleteWhitespace-Methode

Artikel
08/10/2011

Löscht horizontal oder vertikal die Leerzeichen (Leerraum) in unmittelbarer Umgebung der aktuellen Position im Textpuffer.

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

Syntax

'Declaration
Sub DeleteWhitespace ( _
    Direction As vsWhitespaceOptions _
)

void DeleteWhitespace(
    vsWhitespaceOptions Direction
)

void DeleteWhitespace(
    [InAttribute] vsWhitespaceOptions Direction
)

abstract DeleteWhitespace : 
        Direction:vsWhitespaceOptions -> unit

function DeleteWhitespace(
    Direction : vsWhitespaceOptions
)

Parameter

Direction
Typ: EnvDTE.vsWhitespaceOptions
Optional.Eine vsWhitespaceOptions-Konstante, die bestimmt, wie und an welcher Position Leerraum entfernt werden soll.

Hinweise

Durch DeleteWhitespace wird Leerraum um den Bearbeitungspunkt oder TextSelection herum entfernt, ohne den Text vorher in die Zwischenablage zu kopieren. Wenn Direction den Wert vsWhitespaceOptionsHorizontal hat, werden durch DeleteWhitespace Leerzeichen und Tabstoppzeichen auf beiden Seiten des Bearbeitungspunkts bis zum Anfang und Ende der Zeile des Bearbeitungspunkts gelöscht bzw. bis ein Zeichen erreicht ist, das keinen Leerraum darstellt. Wenn Direction den Wert vsWhitespaceOptionsVertical hat, werden durch DeleteWhitespace Leerzeilen auf beiden Seiten des Bearbeitungspunkts bis zum Anfang und Ende des Dokuments gelöscht bzw. bis eine Zeile erreicht ist, die nicht leer ist. Wenn Direction auf vsWhitespaceOptionsVertical festgelegt ist und die aktuelle Zeile nicht leer ist, führt diese Methode keine Aktion aus.

Beispiele

Sub DeleteWhitespaceExample(ByVal dte As DTE2)

    ' Create a new text file.
    dte.ItemOperations.NewFile()

    ' Create an EditPoint at the start of the new document.
    Dim doc As TextDocument = _
        CType(dte.ActiveDocument.Object("TextDocument"), TextDocument)
    Dim point As EditPoint = doc.StartPoint.CreateEditPoint

    Dim i, j As Integer

    ' Insert 10 lines of text.
    For i = 1 To 10
        point.Insert("This is a test." & vbCrLf)
    Next

    If MsgBox("Remove all spaces between words?", MsgBoxStyle.YesNo) _
        = MsgBoxResult.Yes Then
        point.StartOfDocument()

        For i = 1 To 10
            For j = 1 To 3
                point.WordRight()
                point.DeleteWhitespace( _
                    vsWhitespaceOptions.vsWhitespaceOptionsHorizontal)
            Next
            point.StartOfLine()
            point.LineDown()
        Next
    End If

End Sub

public void DeleteWhitespaceExample(DTE2 dte)
{

    // Create a new text file.
    dte.ItemOperations.NewFile(@"General\Text File", "", 
        Constants.vsViewKindPrimary);

    // Create an EditPoint at the start of the new document.
    TextDocument doc = 
        (TextDocument)dte.ActiveDocument.Object("TextDocument");
    EditPoint point = doc.StartPoint.CreateEditPoint();

    // Insert 10 lines of text.
    for (int i = 1; i <= 10; ++i)
        point.Insert("This is a test.\n");

    if (MessageBox.Show("Remove all spaces between words?", "", 
        MessageBoxButtons.YesNo) == DialogResult.Yes)
    {
        point.StartOfDocument();

        for (int i = 1; i <= 10; ++i)
        {
            for (int j = 1; j <= 3; ++j)
            {
                point.WordRight(1);
                point.DeleteWhitespace(
                    vsWhitespaceOptions.vsWhitespaceOptionsHorizontal);
            }
            point.StartOfLine();
            point.LineDown(1);
        }
    }
}

.NET Framework-Sicherheit

Volle Vertrauenswürdigkeit für den unmittelbaren Aufrufer. Dieser Member kann von nur teilweise vertrauenswürdigem Code nicht verwendet werden. Weitere Informationen finden Sie unter Verwenden von Bibliotheken aus teilweise vertrauenswürdigem Code.