共用方式為


EditPoint2.InsertFromFile 方法

在緩衝區中的目前位置插入指定檔案的內容。

命名空間:  EnvDTE80
組件:  EnvDTE80 (在 EnvDTE80.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 ten 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 ten 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 安全性

請參閱

參考

EditPoint2 介面

EnvDTE80 命名空間

其他資源

如何:編譯和執行 Automation 物件模型程式碼範例