EditPoint2.DeleteWhitespace, méthode (vsWhitespaceOptions)

Article
08/10/2011

Supprime les caractères vides (espace blanc) horizontalement ou verticalement autour de l'emplacement actuel dans la mémoire tampon du texte.

Espace de noms : EnvDTE80
Assembly : EnvDTE80 (dans EnvDTE80.dll)

Syntaxe

'Déclaration
Sub DeleteWhitespace ( _
    Direction As vsWhitespaceOptions _
)

void DeleteWhitespace(
    vsWhitespaceOptions Direction
)

void DeleteWhitespace(
    [InAttribute] vsWhitespaceOptions Direction
)

abstract DeleteWhitespace : 
        Direction:vsWhitespaceOptions -> unit

function DeleteWhitespace(
    Direction : vsWhitespaceOptions
)

Paramètres

Direction
Type : EnvDTE.vsWhitespaceOptions
Facultatif.Constante vsWhitespaceOptions qui détermine comment et où supprimer les espaces vides.

Implémentations

EditPoint.DeleteWhitespace(vsWhitespaceOptions)

Notes

DeleteWhitespace supprime l'espace blanc (vide) qui entoure le point d'édition ou TextSelection sans copier au préalable le texte dans le Presse-papiers. Si Direction est vsWhitespaceOptionsHorizontal, alors DeleteWhitespace supprime les espaces et les caractères de tabulation se trouvant de chaque côté du point d'édition jusqu'au début et jusqu'à la fin de la ligne du point d'édition, ou jusqu'à ce qu'un caractère autre qu'un espace blanc soit rencontré. Si Direction est vsWhitespaceOptionsVertical, alors DeleteWhitespace supprime les lignes vides se trouvant de chaque côté du point d'édition jusqu'au début et jusqu'à la fin du document, ou jusqu'à ce qu'une ligne non vide soit rencontrée. Si Direction est vsWhitespaceOptionsVertical et que la ligne active n'est pas vide, cette méthode n'a aucun effet.

Exemples

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);
        }
    }
}

Sécurité .NET Framework

Confiance totale accordée à l'appelant immédiat. Ce membre ne peut pas être utilisé par du code d'un niveau de confiance partiel. Pour plus d'informations, consultez Utilisation de bibliothèques à partir de code d'un niveau de confiance partiel.