EditPoint.DeleteWhitespace, méthode
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 : EnvDTE
Assembly : EnvDTE (dans EnvDTE.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 déterminant de quelle façon et où supprimer les espaces vides.
Notes
DeleteWhitespace supprime l'espace blanc (vide) qui entoure le point d'édition ou l'objet TextSelection sans copier au préalable le texte dans le Presse-papiers. Si la valeur de Direction est vsWhitespaceOptionsHorizontal, DeleteWhitespace supprime les espaces et les tabulations 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 la valeur de Direction est vsWhitespaceOptionsVertical, 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 la valeur de 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.
Voir aussi
Référence
Autres ressources
Comment : compiler et exécuter les exemples de code du modèle objet Automation