Поделиться через


ControlCollection.AddPictureContentControl - метод (ContentControl, String)

Добавляет новый элемент управления PictureContentControl, основанный на собственном элементе управления содержимым в документе.

Пространство имен:  Microsoft.Office.Tools.Word
Сборка:  Microsoft.Office.Tools.Word (в Microsoft.Office.Tools.Word.dll)

Синтаксис

'Декларация
Function AddPictureContentControl ( _
    contentControl As ContentControl, _
    name As String _
) As PictureContentControl
PictureContentControl AddPictureContentControl(
    ContentControl contentControl,
    string name
)

Параметры

  • name
    Тип: System.String
    Имя нового элемента управления.

Возвращаемое значение

Тип: Microsoft.Office.Tools.Word.PictureContentControl
Элемент управления PictureContentControl, добавленный в документ.

Исключения

Исключение Условие
ArgumentNullException

Параметр contentControl имеет значение nullпустая ссылка (Nothing в Visual Basic).

– или –

Параметр name имеет значение nullпустая ссылка (Nothing в Visual Basic) или нулевую длину.

ControlNameAlreadyExistsException

Элемент управления с таким именем уже имеется в данном экземпляре коллекции ControlCollection.

ArgumentException

Параметр contentControl не является коллекцией стандартных блоков (это значит, что свойству Type объекта contentControl не присвоено значение Microsoft.Office.Interop.Word.WdContentControlType.wdContentControlPicture).

Заметки

Этот метод используется для добавления во время выполнения нового элемента управления PictureContentControl, основанного на исходном элементе управления содержимым в документе. Это полезно при создании элемента управления PictureContentControl во время выполнения, если необходимо повторно создать такой же элемент управления при следующем открытии документа. Дополнительные сведения см. в разделе Добавление элементов управления в документы Office во время выполнения.

Примеры

В приведенном ниже примере кода создается новый элемент управления PictureContentControl для каждого элемента управления "Рисунок", который изначально присутствовал в документе.

Эта версия предназначена для настройки уровня документа. Чтобы воспользоваться этим кодом, вставьте его в проекте в класс ThisDocument и вызовите из метода ThisDocument_Startup метод CreatePictureControlFromNativeControl.

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
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);
        }
    }
}

Эта версия предназначена для надстройки уровня приложения, ориентированной на .NET Framework 4. Чтобы воспользоваться этим кодом, вставьте его в проекте в класс ThisAddIn и вызовите из метода ThisAddIn_Startup метод CreatePictureControlFromNativeControl.

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
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);
        }
    }
}

В приведенном ниже примере кода создается новый элемент управления PictureContentControl для каждого элемента управления "Рисунок", добавляемого пользователем в документ.

Эта версия предназначена для настройки уровня документа. Чтобы воспользоваться этим кодом, вставьте его в проекте в класс ThisDocument. В C# также необходимо присоединить обработчик событий ThisDocument_PictureContentControlAfterAdd к событию ContentControlAfterAdd класса ThisDocument.

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
void ThisDocument_PictureContentControlAfterAdd(Word.ContentControl NewContentControl, bool InUndoRedo)
{
    if (NewContentControl.Type == Word.WdContentControlType.wdContentControlPicture)
    {
        this.Controls.AddPictureContentControl(NewContentControl,
            "PictureControl" + NewContentControl.ID);
    }
}

Эта версия предназначена для надстройки уровня приложения, ориентированной на .NET Framework 4. Чтобы воспользоваться этим кодом, вставьте его в проекте в класс ThisAddIn. Кроме того, необходимо присоединить обработчик событий ActiveDocument_PictureContentControlAfterAdd к событию ContentControlAfterAdd активного документа.

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
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);
    }
}

Безопасность платформы .NET Framework

См. также

Ссылки

ControlCollection Интерфейс

AddPictureContentControl - перегрузка

Microsoft.Office.Tools.Word - пространство имен

Другие ресурсы

Добавление элементов управления в документы Office во время выполнения

Вспомогательные методы для элементов управления ведущего приложения

Практическое руководство. Добавление элементов управления содержимым в документы Word