ControlCollection.AddPictureContentControl Metoda

Reference

Definice

Obor názvů:: Microsoft.Office.Tools.Word

Sestavení:: Microsoft.Office.Tools.Word.dll, Microsoft.Office.Tools.Word.v4.0.Utilities.dll

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í

AddPictureContentControl(Range, String)	Přidá nový PictureContentControl v zadaném rozsahu v dokumentu.
AddPictureContentControl(String)	Přidá nový PictureContentControl u aktuálního výběru v dokumentu.
AddPictureContentControl(ContentControl, String)	Přidá nový PictureContentControl , který je založen na nativním ovládacím prvku obsahu v dokumentu.

AddPictureContentControl(Range, String)

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

public:
 Microsoft::Office::Tools::Word::PictureContentControl ^ AddPictureContentControl(Microsoft::Office::Interop::Word::Range ^ range, System::String ^ name);

public Microsoft.Office.Tools.Word.PictureContentControl AddPictureContentControl (Microsoft.Office.Interop.Word.Range range, string name);

abstract member AddPictureContentControl : Microsoft.Office.Interop.Word.Range * string -> Microsoft.Office.Tools.Word.PictureContentControl

Public Function AddPictureContentControl (range As Range, name As String) As PictureContentControl

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

PictureContentControl

Hodnota PictureContentControl přidaná do dokumentu.

Výjimky

ArgumentNullException

name je null nebo má nulovou délku.

ControlNameAlreadyExistsException

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

Příklady

Následující příklad kódu přidá nový PictureContentControl na začátek dokumentu. Tento příklad předpokládá, že soubor s názvem picture.bmp existuje ve složce %UserProfile%\Moje dokumenty (pro Windows XP a starší) nebo ve složce %UserProfile%\Documents (pro Windows Vista).

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 AddPictureControlAtRangeThisDocument_Startup z metody .

private Microsoft.Office.Tools.Word.PictureContentControl pictureControl2;
private System.Drawing.Bitmap bitmap2;

private void AddPictureControlAtRange()
{
    this.Paragraphs[1].Range.InsertParagraphBefore();
    pictureControl2 = this.Controls.AddPictureContentControl(
        this.Paragraphs[1].Range, "pictureControl2");

    string imagePath = System.Environment.GetFolderPath(
        Environment.SpecialFolder.MyDocuments) + "\\picture.bmp";
    bitmap2 = new System.Drawing.Bitmap(imagePath, true);
    pictureControl2.Image = bitmap2;
}

Dim pictureControl2 As Microsoft.Office.Tools.Word.PictureContentControl
Dim bitmap2 As System.Drawing.Bitmap

Private Sub AddPictureControlAtRange()
    Me.Paragraphs(1).Range.InsertParagraphBefore()
    pictureControl2 = Me.Controls.AddPictureContentControl(Me.Paragraphs(1).Range, "pictureControl2")
    Dim imagePath As String = My.Computer.FileSystem.SpecialDirectories.MyDocuments & _
            "\picture.bmp"
    bitmap2 = New System.Drawing.Bitmap(imagePath, True)
    pictureControl2.Image = bitmap2
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 AddPictureControlAtRangeThisAddIn_Startup z metody .

private Microsoft.Office.Tools.Word.PictureContentControl pictureControl2;
private System.Drawing.Bitmap bitmap2;

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

    Document vstoDoc = Globals.Factory.GetVstoObject(this.Application.ActiveDocument);
    vstoDoc.Paragraphs[1].Range.InsertParagraphBefore();
    pictureControl2 = vstoDoc.Controls.AddPictureContentControl(
        vstoDoc.Paragraphs[1].Range, "pictureControl2");

    string imagePath = System.Environment.GetFolderPath(
        Environment.SpecialFolder.MyDocuments) + "\\picture.bmp";
    bitmap2 = new System.Drawing.Bitmap(imagePath, true);
    pictureControl2.Image = bitmap2;
}

Dim pictureControl2 As Microsoft.Office.Tools.Word.PictureContentControl
Dim bitmap2 As System.Drawing.Bitmap

Private Sub AddPictureControlAtRange()
    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()
    pictureControl2 = vstoDoc.Controls.AddPictureContentControl( _
        vstoDoc.Paragraphs(1).Range, "pictureControl2")
    Dim imagePath As String = My.Computer.FileSystem.SpecialDirectories.MyDocuments & _
            "\picture.bmp"
    bitmap2 = New System.Drawing.Bitmap(imagePath, True)
    pictureControl2.Image = bitmap2
End Sub

Poznámky

Tato metoda slouží k přidání nového PictureContentControl 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

AddPictureContentControl(String)

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

public:
 Microsoft::Office::Tools::Word::PictureContentControl ^ AddPictureContentControl(System::String ^ name);

public Microsoft.Office.Tools.Word.PictureContentControl AddPictureContentControl (string name);

abstract member AddPictureContentControl : string -> Microsoft.Office.Tools.Word.PictureContentControl

Public Function AddPictureContentControl (name As String) As PictureContentControl

Parametry

name: String

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

Návraty

PictureContentControl

Hodnota PictureContentControl přidaná do dokumentu.

Výjimky

ArgumentNullException

name je null nebo má nulovou délku.

ControlNameAlreadyExistsException

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

Příklady

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 AddPictureControlAtSelectionThisDocument_Startup z metody .

private Microsoft.Office.Tools.Word.PictureContentControl pictureControl1;
private System.Drawing.Bitmap bitmap1;

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

    pictureControl1 = this.Controls.AddPictureContentControl("pictureControl1");

    string imagePath = System.Environment.GetFolderPath(
        Environment.SpecialFolder.MyDocuments) + "\\picture.bmp";
    bitmap1 = new System.Drawing.Bitmap(imagePath, true);
    pictureControl1.Image = bitmap1;
}

Dim pictureControl1 As Microsoft.Office.Tools.Word.PictureContentControl
Dim bitmap1 As System.Drawing.Bitmap

Private Sub AddPictureControlAtSelection()
    Me.Paragraphs(1).Range.InsertParagraphBefore()
    Me.Paragraphs(1).Range.Select()
    pictureControl1 = Me.Controls.AddPictureContentControl("pictureControl1")
    Dim imagePath As String = My.Computer.FileSystem.SpecialDirectories.MyDocuments & _
            "\picture.bmp"
    bitmap1 = New System.Drawing.Bitmap(imagePath, True)
    pictureControl1.Image = bitmap1
End Sub

private Microsoft.Office.Tools.Word.PictureContentControl pictureControl1;
private System.Drawing.Bitmap bitmap1;

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

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

    pictureControl1 = vstoDoc.Controls.AddPictureContentControl("pictureControl1");

    string imagePath = System.Environment.GetFolderPath(
        Environment.SpecialFolder.MyDocuments) + "\\picture.bmp";
    bitmap1 = new System.Drawing.Bitmap(imagePath, true);
    pictureControl1.Image = bitmap1;
}

Dim pictureControl1 As Microsoft.Office.Tools.Word.PictureContentControl
Dim bitmap1 As System.Drawing.Bitmap

Private Sub AddPictureControlAtSelection()
    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()
    pictureControl1 = vstoDoc.Controls.AddPictureContentControl("pictureControl1")
    Dim imagePath As String = My.Computer.FileSystem.SpecialDirectories.MyDocuments & _
            "\picture.bmp"
    bitmap1 = New System.Drawing.Bitmap(imagePath, True)
    pictureControl1.Image = bitmap1
End Sub

Poznámky

Tato metoda slouží k přidání nového PictureContentControl 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

AddPictureContentControl(ContentControl, String)

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

public:
 Microsoft::Office::Tools::Word::PictureContentControl ^ AddPictureContentControl(Microsoft::Office::Interop::Word::ContentControl ^ contentControl, System::String ^ name);

public Microsoft.Office.Tools.Word.PictureContentControl AddPictureContentControl (Microsoft.Office.Interop.Word.ContentControl contentControl, string name);

abstract member AddPictureContentControl : Microsoft.Office.Interop.Word.ContentControl * string -> Microsoft.Office.Tools.Word.PictureContentControl

Public Function AddPictureContentControl (contentControl As ContentControl, name As String) As PictureContentControl

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

PictureContentControl

Hodnota PictureContentControl přidaná do dokumentu.

Výjimky

ArgumentNullException

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

ControlNameAlreadyExistsException

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

ArgumentException

contentControlnení galerie stavebních contentControl bloků (to znamená, Type že vlastnost nemá hodnotu Microsoft.Office.Interop.Word. WdContentControlType.wdContentControlPicture).

Příklady

Následující příklad kódu vytvoří nový PictureContentControl pro každý ovládací prvek nativního obrázku, 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 CreatePictureControlFromNativeControlThisDocument_Startup z metody .

private System.Collections.Generic.List
   <Microsoft.Office.Tools.Word.PictureContentControl> pictureControls;

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

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

    foreach (Word.ContentControl nativeControl in this.ContentControls)
    {
        if (nativeControl.Type == Word.WdContentControlType.wdContentControlPicture)
        {
            count++;
            Microsoft.Office.Tools.Word.PictureContentControl tempControl =
                this.Controls.AddPictureContentControl(nativeControl,
                "VSTOPictureContentControl" + count.ToString());
            pictureControls.Add(tempControl);
        }
    }
}

Private pictureControls As New System.Collections.Generic.List _
        (Of Microsoft.Office.Tools.Word.PictureContentControl)

Private Sub CreatePictureControlsFromNativeControls()
    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.wdContentControlPicture Then
            count += 1
            Dim tempControl As Microsoft.Office.Tools.Word.PictureContentControl = _
                Me.Controls.AddPictureContentControl(nativeControl, _
                "VSTOPictureContentControl" + count.ToString())
            pictureControls.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 CreatePictureControlFromNativeControlThisAddIn_Startup z metody .

private System.Collections.Generic.List
   <Microsoft.Office.Tools.Word.PictureContentControl> pictureControls;

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

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

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

    foreach (Word.ContentControl nativeControl in vstoDoc.ContentControls)
    {
        if (nativeControl.Type == Word.WdContentControlType.wdContentControlPicture)
        {
            count++;
            Microsoft.Office.Tools.Word.PictureContentControl tempControl =
                vstoDoc.Controls.AddPictureContentControl(nativeControl,
                "VSTOPictureContentControl" + count.ToString());
            pictureControls.Add(tempControl);
        }
    }
}

Private pictureControls As New System.Collections.Generic.List _
        (Of Microsoft.Office.Tools.Word.PictureContentControl)

Private Sub CreatePictureControlsFromNativeControls()
    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.wdContentControlPicture Then
            count += 1
            Dim tempControl As Microsoft.Office.Tools.Word.PictureContentControl = _
                vstoDoc.Controls.AddPictureContentControl(nativeControl, _
                "VSTOPictureContentControl" + count.ToString())
            pictureControls.Add(tempControl)
        End If
    Next nativeControl
End Sub

Následující příklad kódu vytvoří nový PictureContentControl pro každý ovládací prvek nativního obrázku, 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_PictureContentControlAfterAdd události k ContentControlAfterAdd události ThisDocument třídy.

void ThisDocument_PictureContentControlAfterAdd(Word.ContentControl NewContentControl, bool InUndoRedo)
{
    if (NewContentControl.Type == Word.WdContentControlType.wdContentControlPicture)
    {
        this.Controls.AddPictureContentControl(NewContentControl,
            "PictureControl" + NewContentControl.ID);
    }
}

Private Sub ThisDocument_PictureContentControlAfterAdd(ByVal NewContentControl As Word.ContentControl, _
    ByVal InUndoRedo As Boolean) Handles Me.ContentControlAfterAdd

    If NewContentControl.Type = Word.WdContentControlType.wdContentControlPicture Then
        Me.Controls.AddPictureContentControl(NewContentControl, _
            "PictureControl" + 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_PictureContentControlAfterAdd události k ContentControlAfterAdd události aktivního dokumentu.

void ActiveDocument_PictureContentControlAfterAdd(
    Word.ContentControl NewContentControl, bool InUndoRedo)
{
    Document vstoDoc = Globals.Factory.GetVstoObject(this.Application.ActiveDocument);
    if (NewContentControl.Type == Word.WdContentControlType.wdContentControlPicture)
    {
        vstoDoc.Controls.AddPictureContentControl(NewContentControl,
            "PictureControl" + NewContentControl.ID);
    }
}

Private Sub ActiveDocument_PictureContentControlAfterAdd( _
    ByVal NewContentControl As Word.ContentControl, _
    ByVal InUndoRedo As Boolean)

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

Poznámky

Tato metoda slouží k přidání nového PictureContentControl , 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 PictureContentControl 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

Sdílet prostřednictvím

ControlCollection.AddPictureContentControl Metoda

Definice

Přetížení

AddPictureContentControl(Range, String)

Parametry

Návraty

Výjimky

Příklady

Poznámky

Platí pro

AddPictureContentControl(String)

Parametry

Návraty

Výjimky

Příklady

Poznámky

Platí pro

AddPictureContentControl(ContentControl, String)

Parametry

Návraty

Výjimky

Příklady

Poznámky

Platí pro

Další materiály