Freigeben über


EditPoint.DeleteWhitespace-Methode

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

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 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

Siehe auch

Referenz

EditPoint Schnittstelle

EnvDTE-Namespace

Weitere Ressourcen

Gewusst wie: Kompilieren und Ausführen der Codebeispiele für das Automatisierungsobjektmodell