次の方法で共有


EditPoint2.Paste メソッド

現在の位置にクリップボードの内容を挿入します。

名前空間:  EnvDTE80
アセンブリ:  EnvDTE80 (EnvDTE80.dll 内)

構文

'宣言
Sub Paste
void Paste()
void Paste()
abstract Paste : unit -> unit 
function Paste()

解説

Paste は、エディット ポイントを挿入位置の後に移動します。

Sub PasteExample(ByVal dte As DTE2)

    ' Create a new text file and insert ten lines of text.
    dte.ItemOperations.NewFile()
    Dim textDoc As TextDocument = _
        CType(dte.ActiveDocument.Object(), TextDocument)
    Dim editPnt As EditPoint = textDoc.StartPoint.CreateEditPoint()
    Dim i As Integer
    For i = 1 To 10
        editPnt.Insert("Line " & i.ToString() & vbCrLf)
    Next

    If MsgBox("Reverse the order of the lines?", MsgBoxStyle.YesNo) = _
        MsgBoxResult.Yes Then
        Dim textSel As TextSelection = textDoc.Selection

        ' Position insertion point at beginning of "Line 2".
        textSel.StartOfDocument()
        textSel.LineDown()

        ' Reverse the order of the lines by cutting "Line 2", 
        ' pasting it at the start of the document, and then cutting
        ' "Line 3" and pasting it at the start of the document,
        ' and so on.
        For i = 1 To 9
            textSel.LineDown(True)
            textSel.Cut()
            editPnt.StartOfDocument()
            editPnt.Paste()
        Next
    End If

End Sub
public void PasteExample(DTE2 dte)
{
    // Create a new text file and insert ten lines of text.
    dte.ItemOperations.NewFile(@"General\Text File", "", 
        Constants.vsViewKindPrimary);
    TextDocument textDoc = 
        (TextDocument)dte.ActiveDocument.Object("TextDocument");
    EditPoint editPnt = textDoc.StartPoint.CreateEditPoint();
    
    for (int i = 1; i <= 10; i++)
        editPnt.Insert("Line " + i.ToString() + "\n");

    if (MessageBox.Show("Reverse the order of the lines?", "", 
        MessageBoxButtons.YesNo) == DialogResult.Yes)
    {
        TextSelection textSel = textDoc.Selection;

        // Position insertion point at beginning of "Line 2".
        textSel.StartOfDocument(false);
        textSel.LineDown(false, 1);

        // Reverse the order of the lines by cutting "Line 2", 
        // pasting it at the start of the document,  and then cutting
        // "Line 3" and pasting it at the start of the document,
        // and so on.
        for (int i = 1; i <= 9; i++)
        {
            textSel.LineDown(true, 1);
            textSel.Cut();
            editPnt.StartOfDocument();
            editPnt.Paste();
        }
    }
}

.NET Framework セキュリティ

  • 直前の呼び出し元に対する完全な信頼。このメンバーは、部分的に信頼されているコードから使用することはできません。詳細については、「部分信頼コードからのライブラリの使用」を参照してください。

参照

関連項目

EditPoint2 インターフェイス

Paste オーバーロード

EnvDTE80 名前空間

その他の技術情報

方法 : オートメーション オブジェクト モデルのコード例をコンパイルおよび実行する