ControlCollection.AddRichTextContentControl Metoda
Definice
Důležité
Některé informace platí pro předběžně vydaný produkt, který se může zásadně změnit, než ho výrobce nebo autor vydá. Microsoft neposkytuje žádné záruky, výslovné ani předpokládané, týkající se zde uváděných informací.
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 AddRichTextControlAtSelection
ThisDocument_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 AddRichTextControlAtSelection
ThisAddIn_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 .
contentControl
není 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 CreateRichTextControlsFromNativeControls
ThisDocument_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 CreateRichTextControlsFromNativeControls
ThisAddIn_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
- 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 AddRichTextControlAtRange
ThisDocument_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 AddRichTextControlAtRange
ThisAddIn_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.