Share via


TextSelection.InsertFromFile 方法

在缓冲区中的当前位置插入指定文件的内容。

命名空间:  EnvDTE
程序集:  EnvDTE(在 EnvDTE.dll 中)

语法

声明
Sub InsertFromFile ( _
    File As String _
)
void InsertFromFile(
    string File
)
void InsertFromFile(
    [InAttribute] String^ File
)
abstract InsertFromFile : 
        File:string -> unit
function InsertFromFile(
    File : String
)

参数

  • File
    类型:String

    必需。 要插入到文本缓冲区的文件名。

备注

编辑点移过插入点。 文本转换为 Unicode(它是文本文档使用的内部表现形式)。

示例

Sub InsertFromFileExample(ByVal dte As DTE2)

    ' NOTE: This example requires a reference to the
    '       System.IO namespace.

    ' Create a new text file and insert 10 lines of text.
    dte.ItemOperations.NewFile(, "File1")
    Dim doc As Document = dte.ActiveDocument
    Dim sel As TextSelection = CType(doc.Selection, TextSelection)
    Dim i As Integer

    For i = 1 To 10
        sel.Insert("This is a test." & vbCrLf)
    Next i

    MsgBox("Saving and closing File1")

    ' Save and close the text file.
    Dim file1 As String = Path.GetTempPath & "File1.txt"
    doc.Save(file1)
    doc.Close()

    ' Create a new text file.
    dte.ItemOperations.NewFile(, "File2")
    doc = dte.ActiveDocument

    If MsgBox("Insert text from File1 into File2?", _
        MsgBoxStyle.YesNo) = MsgBoxResult.Yes Then
        sel = CType(doc.Selection, TextSelection)
        sel.InsertFromFile(file1)
    End If

End Sub
public void InsertFromFileExample(DTE2 dte)
{
    // NOTE: This example requires a reference to the
    //       System.IO namespace.

    // Create a new text file and insert 10 lines of text.
    dte.ItemOperations.NewFile(@"General\Text File", "File1", 
        Constants.vsViewKindPrimary);
    Document doc = dte.ActiveDocument;
    TextSelection sel = (TextSelection)doc.Selection;

    for (int i = 0; i < 10; ++i)
        sel.Insert("This is a test.\n", 
           (int)vsInsertFlags.vsInsertFlagsCollapseToEnd);

    MessageBox.Show("Saving and closing File1");

    // Save and close the text file.
    string file1 = Path.GetTempPath() + "File1.txt";
    doc.Save(file1);
    doc.Close(vsSaveChanges.vsSaveChangesNo);

    // Create a new text file.
    dte.ItemOperations.NewFile(@"General\Text File", "File2", 
        Constants.vsViewKindPrimary);
    doc = dte.ActiveDocument;

    if (MessageBox.Show("Insert text from File1 into File2?", "", 
        MessageBoxButtons.YesNo) == DialogResult.Yes)
    {
        sel = (TextSelection)doc.Selection;
        sel.InsertFromFile(file1);
    }
}

.NET Framework 安全性

请参阅

参考

TextSelection 接口

EnvDTE 命名空间

其他资源

如何:编译和运行自动化对象模型代码示例