Sdílet prostřednictvím


ControlCollection.AddRichTextContentControl Metoda

Definice

Přetížení

AddRichTextContentControl(String)

Přidá nový RichTextContentControl u aktuálního výběru v dokumentu.

AddRichTextContentControl(ContentControl, String)

Přidá nový RichTextContentControl , který je založen na nativním ovládacím prvku obsahu v dokumentu.

AddRichTextContentControl(Range, String)

Přidá nový RichTextContentControl v zadaném rozsahu v dokumentu.

AddRichTextContentControl(String)

Přidá nový RichTextContentControl u aktuálního výběru v dokumentu.

public:
 Microsoft::Office::Tools::Word::RichTextContentControl ^ AddRichTextContentControl(System::String ^ name);
public Microsoft.Office.Tools.Word.RichTextContentControl AddRichTextContentControl (string name);
abstract member AddRichTextContentControl : string -> Microsoft.Office.Tools.Word.RichTextContentControl
Public Function AddRichTextContentControl (name As String) As RichTextContentControl

Parametry

name
String

Název nového ovládacího prvku

Návraty

Hodnota RichTextContentControl přidaná do dokumentu.

Výjimky

name je null nebo má nulovou délku.

Ovládací prvek se stejným názvem je již v ControlCollectionsouboru .

Příklady

Následující příklad kódu přidá nový RichTextContentControl na začátek dokumentu.

Tato verze je pro přizpůsobení na úrovni dokumentu. Pokud chcete tento kód použít, vložte ho ThisDocument do třídy v projektu a volejte metodu AddRichTextControlAtSelectionThisDocument_Startup z metody .

private Microsoft.Office.Tools.Word.RichTextContentControl richTextControl1;

private void AddRichTextControlAtSelection()
{
    this.Paragraphs[1].Range.InsertParagraphBefore();
    this.Paragraphs[1].Range.Select();

    richTextControl1 = this.Controls.AddRichTextContentControl("richTextControl1");
    richTextControl1.PlaceholderText = "Enter your first name";
}
Dim richTextControl1 As Microsoft.Office.Tools.Word.RichTextContentControl

Private Sub AddRichTextControlAtSelection()
    Me.Paragraphs(1).Range.InsertParagraphBefore()
    Me.Paragraphs(1).Range.Select()
    richTextControl1 = Me.Controls.AddRichTextContentControl("richTextControl1")
    richTextControl1.PlaceholderText = "Enter your first name"
End Sub

Tato verze je určena pro doplněk na úrovni aplikace, který cílí na rozhraní .NET Framework 4 nebo .NET Framework 4.5. Pokud chcete tento kód použít, vložte ho ThisAddIn do třídy v projektu a volejte metodu AddRichTextControlAtSelectionThisAddIn_Startup z metody .

private Microsoft.Office.Tools.Word.RichTextContentControl richTextControl1;

private void AddRichTextControlAtSelection()
{
    if (this.Application.ActiveDocument == null)
        return;

    Document vstoDoc = Globals.Factory.GetVstoObject(this.Application.ActiveDocument);
    vstoDoc.Paragraphs[1].Range.InsertParagraphBefore();
    vstoDoc.Paragraphs[1].Range.Select();

    richTextControl1 = vstoDoc.Controls.AddRichTextContentControl("richTextControl1");
    richTextControl1.PlaceholderText = "Enter your first name";
}
Dim richTextControl1 As Microsoft.Office.Tools.Word.RichTextContentControl

Private Sub AddRichTextControlAtSelection()
    If Me.Application.ActiveDocument Is Nothing Then
        Return
    End If

    Dim vstoDoc As Document = Globals.Factory.GetVstoObject(Me.Application.ActiveDocument)
    vstoDoc.Paragraphs(1).Range.InsertParagraphBefore()
    vstoDoc.Paragraphs(1).Range.Select()
    richTextControl1 = vstoDoc.Controls.AddRichTextContentControl("richTextControl1")
    richTextControl1.PlaceholderText = "Enter your first name"
End Sub

Poznámky

Tato metoda slouží k přidání nového RichTextContentControl do aktuálního výběru v dokumentu za běhu. Další informace najdete v tématu Přidání ovládacích prvků do dokumentů Office za běhu.

Platí pro

AddRichTextContentControl(ContentControl, String)

Přidá nový RichTextContentControl , který je založen na nativním ovládacím prvku obsahu v dokumentu.

public:
 Microsoft::Office::Tools::Word::RichTextContentControl ^ AddRichTextContentControl(Microsoft::Office::Interop::Word::ContentControl ^ contentControl, System::String ^ name);
public Microsoft.Office.Tools.Word.RichTextContentControl AddRichTextContentControl (Microsoft.Office.Interop.Word.ContentControl contentControl, string name);
abstract member AddRichTextContentControl : Microsoft.Office.Interop.Word.ContentControl * string -> Microsoft.Office.Tools.Word.RichTextContentControl
Public Function AddRichTextContentControl (contentControl As ContentControl, name As String) As RichTextContentControl

Parametry

contentControl
ContentControl

To ContentControl je základ nového ovládacího prvku.

name
String

Název nového ovládacího prvku

Návraty

Hodnota RichTextContentControl přidaná do dokumentu.

Výjimky

contentControl je null.-or- name je null nebo má nulovou délku.

Ovládací prvek se stejným názvem je již v ControlCollectionsouboru .

contentControlnení galerie stavebních bloků (to znamená Microsoft.Office.Interop.Word. Vlastnost ContentControl.Type contentControl nemá hodnotu Microsoft.Office.Interop.Word. WdContentControlType.wdContentControlRichText).

Příklady

Následující příklad kódu vytvoří nový RichTextContentControl pro každý nativní ovládací prvek RTF, který je v dokumentu.

Tato verze je pro přizpůsobení na úrovni dokumentu. Pokud chcete tento kód použít, vložte ho ThisDocument do třídy v projektu a volejte metodu CreateRichTextControlsFromNativeControlsThisDocument_Startup z metody .

private System.Collections.Generic.List
    <Microsoft.Office.Tools.Word.RichTextContentControl> richTextControls;

private void CreateRichTextControlsFromNativeControls()
{
    if (this.ContentControls.Count <= 0)
        return;

    richTextControls = new System.Collections.Generic.List
        <Microsoft.Office.Tools.Word.RichTextContentControl>();
    int count = 0;

    foreach (Word.ContentControl nativeControl in this.ContentControls)
    {
        if (nativeControl.Type ==
            Microsoft.Office.Interop.Word.WdContentControlType.wdContentControlRichText)
        {
            count++;
            Microsoft.Office.Tools.Word.RichTextContentControl tempControl =
                this.Controls.AddRichTextContentControl(nativeControl,
                "VSTORichTextControl" + count.ToString());
            richTextControls.Add(tempControl);
        }
    }
}
Private richTextControls As New System.Collections.Generic.List _
        (Of Microsoft.Office.Tools.Word.RichTextContentControl)

Private Sub CreateRichTextControlsFromNativeControls()
    If Me.ContentControls.Count <= 0 Then
        Return
    End If

    Dim count As Integer = 0
    For Each nativeControl As Word.ContentControl In Me.ContentControls
        If nativeControl.Type = Word.WdContentControlType.wdContentControlRichText Then
            count += 1
            Dim tempControl As Microsoft.Office.Tools.Word.RichTextContentControl = _
                Me.Controls.AddRichTextContentControl(nativeControl, _
                "VSTORichTextContentControl" + count.ToString())
            richTextControls.Add(tempControl)
        End If
    Next nativeControl
End Sub

Tato verze je určena pro doplněk na úrovni aplikace, který cílí na rozhraní .NET Framework 4 nebo .NET Framework 4.5. Pokud chcete tento kód použít, vložte ho ThisAddIn do třídy v projektu a volejte metodu CreateRichTextControlsFromNativeControlsThisAddIn_Startup z metody .

private System.Collections.Generic.List
    <Microsoft.Office.Tools.Word.RichTextContentControl> richTextControls;

private void CreateRichTextControlsFromNativeControls()
{
    if (this.Application.ActiveDocument == null)
        return;

    Document vstoDoc = Globals.Factory.GetVstoObject(this.Application.ActiveDocument);
    if (vstoDoc.ContentControls.Count <= 0)
        return;

    richTextControls = new System.Collections.Generic.List
        <Microsoft.Office.Tools.Word.RichTextContentControl>();
    int count = 0;
    
    foreach (Word.ContentControl nativeControl in vstoDoc.ContentControls)
    {
        if (nativeControl.Type ==
            Microsoft.Office.Interop.Word.WdContentControlType.wdContentControlRichText)
        {
            count++;
            Microsoft.Office.Tools.Word.RichTextContentControl tempControl =
                vstoDoc.Controls.AddRichTextContentControl(nativeControl,
                "VSTORichTextControl" + count.ToString());
            richTextControls.Add(tempControl);
        }
    }
}
Private richTextControls As New System.Collections.Generic.List _
        (Of Microsoft.Office.Tools.Word.RichTextContentControl)

Private Sub CreateRichTextControlsFromNativeControls()
    If Me.Application.ActiveDocument Is Nothing Then
        Return
    End If

    Dim vstoDoc As Document = Globals.Factory.GetVstoObject(Me.Application.ActiveDocument)
    If vstoDoc.ContentControls.Count <= 0 Then
        Return
    End If

    Dim count As Integer = 0
    For Each nativeControl As Word.ContentControl In vstoDoc.ContentControls
        If nativeControl.Type = Word.WdContentControlType.wdContentControlRichText Then
            count += 1
            Dim tempControl As Microsoft.Office.Tools.Word.RichTextContentControl = _
                vstoDoc.Controls.AddRichTextContentControl(nativeControl, _
                "VSTORichTextContentControl" + count.ToString())
            richTextControls.Add(tempControl)
        End If
    Next nativeControl
End Sub

Následující příklad kódu vytvoří nový RichTextContentControl pro každý nativní ovládací prvek RTF, který uživatel přidá do dokumentu.

Tato verze je pro přizpůsobení na úrovni dokumentu. Pokud chcete tento kód použít, vložte ho ThisDocument do třídy v projektu. Pro jazyk C# musíte také připojit obslužnou rutinu ThisDocument_RichTextContentControlAfterAdd události k ContentControlAfterAdd události ThisDocument třídy.

void ThisDocument_RichTextContentControlAfterAdd(Word.ContentControl NewContentControl, bool InUndoRedo)
{
    if (NewContentControl.Type == Word.WdContentControlType.wdContentControlRichText)
    {
        this.Controls.AddRichTextContentControl(NewContentControl,
            "RichTextControl" + NewContentControl.ID);
    }
}
Private Sub ThisDocument_RichTextContentControlAfterAdd(ByVal NewContentControl As Word.ContentControl, _
    ByVal InUndoRedo As Boolean) Handles Me.ContentControlAfterAdd

    If NewContentControl.Type = Word.WdContentControlType.wdContentControlRichText Then
        Me.Controls.AddRichTextContentControl(NewContentControl, _
            "RichTextControl" + NewContentControl.ID)
    End If
End Sub

Tato verze je určena pro doplněk na úrovni aplikace, který cílí na rozhraní .NET Framework 4 nebo .NET Framework 4.5. Pokud chcete tento kód použít, vložte ho ThisAddIn do třídy v projektu. Také musíte připojit obslužnou rutinu ActiveDocument_RichTextContentControlAfterAdd události k ContentControlAfterAdd události aktivního dokumentu.

void ActiveDocument_RichTextContentControlAfterAdd(
    Word.ContentControl NewContentControl, bool InUndoRedo)
{
    Document vstoDoc = Globals.Factory.GetVstoObject(this.Application.ActiveDocument);
    if (NewContentControl.Type == Word.WdContentControlType.wdContentControlRichText)
    {
        vstoDoc.Controls.AddRichTextContentControl(NewContentControl,
            "RichTextControl" + NewContentControl.ID);
    }
}
Private Sub ActiveDocument_RichTextContentControlAfterAdd( _
    ByVal NewContentControl As Word.ContentControl, _
    ByVal InUndoRedo As Boolean)

    Dim vstoDoc As Document = Globals.Factory.GetVstoObject(Me.Application.ActiveDocument)
    If NewContentControl.Type = Word.WdContentControlType. _
        wdContentControlRichText Then
        vstoDoc.Controls.AddRichTextContentControl(NewContentControl, _
            "RichTextControl" + NewContentControl.ID)
    End If
End Sub

Poznámky

Tato metoda slouží k přidání nového RichTextContentControl , který je založen na nativním ovládacím prvku obsahu v dokumentu za běhu. To je užitečné, když vytvoříte RichTextContentControl za běhu a chcete stejný ovládací prvek znovu vytvořit při příštím otevření dokumentu. Další informace najdete v tématu Přidání ovládacích prvků do dokumentů Office za běhu.

Platí pro

AddRichTextContentControl(Range, String)

Přidá nový RichTextContentControl v zadaném rozsahu v dokumentu.

public:
 Microsoft::Office::Tools::Word::RichTextContentControl ^ AddRichTextContentControl(Microsoft::Office::Interop::Word::Range ^ range, System::String ^ name);
public Microsoft.Office.Tools.Word.RichTextContentControl AddRichTextContentControl (Microsoft.Office.Interop.Word.Range range, string name);
abstract member AddRichTextContentControl : Microsoft.Office.Interop.Word.Range * string -> Microsoft.Office.Tools.Word.RichTextContentControl
Public Function AddRichTextContentControl (range As Range, name As String) As RichTextContentControl

Parametry

range
Range

A Range , který poskytuje hranice pro nový ovládací prvek.

name
String

Název nového ovládacího prvku

Návraty

Hodnota RichTextContentControl přidaná do dokumentu.

Výjimky

name je null nebo má nulovou délku.

Ovládací prvek se stejným názvem je již v ControlCollectionsouboru .

Příklady

Následující příklad kódu přidá nový RichTextContentControl na začátek dokumentu.

Tato verze je pro přizpůsobení na úrovni dokumentu. Pokud chcete tento kód použít, vložte ho ThisDocument do třídy v projektu a volejte metodu AddRichTextControlAtRangeThisDocument_Startup z metody .

private Microsoft.Office.Tools.Word.RichTextContentControl richTextControl2;

private void AddRichTextControlAtRange()
{
    this.Paragraphs[1].Range.InsertParagraphBefore();

    richTextControl2 = this.Controls.AddRichTextContentControl(this.Paragraphs[1].Range,
        "richTextControl2");
    richTextControl2.PlaceholderText = "Enter your first name";
}
Dim richTextControl2 As Microsoft.Office.Tools.Word.RichTextContentControl

Private Sub AddRichTextControlAtRange()
    Me.Paragraphs(1).Range.InsertParagraphBefore()
    richTextControl2 = Me.Controls.AddRichTextContentControl(Me.Paragraphs(1).Range, _
        "richTextControl2")
    richTextControl2.PlaceholderText = "Enter your first name"
End Sub

Tato verze je určena pro doplněk na úrovni aplikace, který cílí na rozhraní .NET Framework 4 nebo .NET Framework 4.5. Pokud chcete tento kód použít, vložte ho ThisAddIn do třídy v projektu a volejte metodu AddRichTextControlAtRangeThisAddIn_Startup z metody .

private Microsoft.Office.Tools.Word.RichTextContentControl richTextControl2;

private void AddRichTextControlAtRange()
{
    if (this.Application.ActiveDocument == null)
        return;

    Document vstoDoc = Globals.Factory.GetVstoObject(this.Application.ActiveDocument);
    vstoDoc.Paragraphs[1].Range.InsertParagraphBefore();

    richTextControl2 = vstoDoc.Controls.AddRichTextContentControl(vstoDoc.Paragraphs[1].Range,
        "richTextControl2");
    richTextControl2.PlaceholderText = "Enter your first name";
}
Dim richTextControl2 As Microsoft.Office.Tools.Word.RichTextContentControl

Private Sub AddRichTextControlAtRange()
    If Me.Application.ActiveDocument Is Nothing Then
        Return
    End If

    Dim vstoDoc As Document = Globals.Factory.GetVstoObject(Me.Application.ActiveDocument)
    vstoDoc.Paragraphs(1).Range.InsertParagraphBefore()
    richTextControl2 = vstoDoc.Controls.AddRichTextContentControl( _
        vstoDoc.Paragraphs(1).Range, _
        "richTextControl2")
    richTextControl2.PlaceholderText = "Enter your first name"
End Sub

Poznámky

Tato metoda slouží k přidání nového RichTextContentControl do zadaného rozsahu v dokumentu za běhu. Další informace najdete v tématu Přidání ovládacích prvků do dokumentů Office za běhu.

Platí pro