EditPoint.DeleteWhitespace メソッド
テキスト バッファーの現在位置から水平または垂直方向にある空の文字 (空白) を削除します。
名前空間: EnvDTE
アセンブリ: EnvDTE (EnvDTE.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 定数。
解説
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 セキュリティ
- 直前の呼び出し元に対する完全な信頼。 このメンバーは、部分的に信頼されているコードから使用することはできません。 詳細については、「部分信頼コードからのライブラリの使用」を参照してください。