EditPoint2.DeleteWhitespace - метод (vsWhitespaceOptions)

Статья
08/11/2011

Удаляет пустые знаки (пробелы) по горизонтали или вертикали вокруг текущего места в текстовом буфере.

Пространство имен: EnvDTE80
Сборка: EnvDTE80 (в EnvDTE80.dll)

Синтаксис

'Декларация
Sub DeleteWhitespace ( _
    Direction As vsWhitespaceOptions _
)

void DeleteWhitespace(
    vsWhitespaceOptions Direction
)

void DeleteWhitespace(
    [InAttribute] vsWhitespaceOptions Direction
)

abstract DeleteWhitespace : 
        Direction:vsWhitespaceOptions -> unit

function DeleteWhitespace(
    Direction : vsWhitespaceOptions
)

Параметры

Direction
Тип: EnvDTE.vsWhitespaceOptions
Необязательный.Константа vsWhitespaceOptions, определяющая, как и где удалять пробелы.

Реализации

EditPoint.DeleteWhitespace(vsWhitespaceOptions)

Заметки

DeleteWhitespace удаляет пустые промежутки (пробелы) вокруг точки редактирования или TextSelection, не копируя текст предварительно в буфер обмена. Если параметр Direction равен vsWhitespaceOptionsHorizontal, то DeleteWhitespace удаляет пробелы и знаки табуляции по обе стороны точки редактирования до начала и до конца строки, в которой эта точка находится, или до тех пор, пока не встретится знак, отличный от пробела или знака табуляции. Если параметр Direction равен vsWhitespaceOptionsVertical, то DeleteWhitespace удаляет пустые строки по обе стороны точки редактирования до начала и до конца документа, в которой эта точка находится, или до тех пор, пока не встретится непустая строка. Если параметр Direction равен vsWhitespaceOptionsVertical и текущая строка не пуста, метод не выполняет никаких действий.

Примеры

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

Полное доверие для непосредственно вызывающего метода. Этот член не может быть использован частично доверенным кодом. Дополнительные сведения см. в разделе Использование библиотек из не вполне надежного кода.