EditPoint.DeleteWhitespace (Método)
Elimina los caracteres vacíos (espacio en blanco) en dirección horizontal o vertical alrededor de la posición actual en el búfer de texto.
Espacio de nombres: EnvDTE
Ensamblado: EnvDTE (en EnvDTE.dll)
Sintaxis
'Declaración
Sub DeleteWhitespace ( _
Direction As vsWhitespaceOptions _
)
void DeleteWhitespace(
vsWhitespaceOptions Direction
)
void DeleteWhitespace(
[InAttribute] vsWhitespaceOptions Direction
)
abstract DeleteWhitespace :
Direction:vsWhitespaceOptions -> unit
function DeleteWhitespace(
Direction : vsWhitespaceOptions
)
Parámetros
- Direction
Tipo: EnvDTE.vsWhitespaceOptions
Opcional.Constante vsWhitespaceOptions que determina cómo y dónde se quitarán espacios vacíos.
Comentarios
El método DeleteWhitespace quita el espacio en blanco (vacío) situado alrededor del punto de edición o de TextSelection, sin copiarlo primero al Portapapeles.Si Direction es vsWhitespaceOptionsHorizontal, DeleteWhitespace elimina espacios y caracteres de tabulación a ambos lados del punto de edición hasta el principio y el final de la línea del punto de edición o hasta que se encuentre un carácter que no sea un espacio en blanco.Si Direction es vsWhitespaceOptionsVertical, DeleteWhitespace elimina las líneas en blanco a ambos lados del punto de edición hasta el principio y el final del documento o hasta que se encuentre una línea que no esté en blanco.Si Direction es vsWhitespaceOptionsVertical y la línea actual no está en blanco, este método no hace nada.
Ejemplos
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);
}
}
}
Seguridad de .NET Framework
- Plena confianza para el llamador inmediato. Un código de confianza parcial no puede utilizar este miembro. Para obtener más información, vea Utilizar bibliotecas de código que no es de plena confianza.
Vea también
Referencia
Otros recursos
Cómo: Compilar y ejecutar los ejemplos de código del modelo de objetos de automatización