ControlCollection.AddPictureContentControl Метод (Range, String) (2007 System)

Статья
11/16/2008

Обновлен: Июль 2008

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

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

Синтаксис

'Декларация
Public Function AddPictureContentControl ( _
    range As Range, _
    name As String _
) As PictureContentControl
'Применение
Dim instance As ControlCollection
Dim range As Range
Dim name As String
Dim returnValue As PictureContentControl

returnValue = instance.AddPictureContentControl(range, _
    name)

public PictureContentControl AddPictureContentControl(
    Range range,
    string name
)

Параметры

range
Тип: Microsoft.Office.Interop.Word.Range
Объект Range, предоставляющий границы нового элемента управления.

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

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

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

Исключения

Исключение	Условие
ArgumentNullException	Параметр name имеет значение nullссылка null (Nothing в Visual Basic) или нулевую длину.
ControlNameAlreadyExistsException	Элемент управления с таким именем уже имеется в данном экземпляре коллекции ControlCollection.

Заметки

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

Примеры

В следующем примере кода в начало документа добавляется новый элемент управления PictureContentControl. В данном примере предполагается, что в папке %UserProfile%\Мои документы (в операционной системе Windows XP и предыдущих версиях Windows) или в папке %UserProfile%\Документы (в операционной системе Windows Vista) имеется файл с именем picture.bmp.

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

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

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

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

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 = Me.Application.ActiveDocument.GetVstoObject()
    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

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

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

    Document vstoDoc = this.Application.ActiveDocument.GetVstoObject();
    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;
}

Разрешения

Полное доверие для непосредственно вызывающего метода. Этот член не может быть использован частично доверенным кодом. Дополнительные сведения см. в разделе Использование библиотек из не вполне надежного кода.

См. также

Ссылки

ControlCollection Класс

ControlCollection - члены

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

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

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

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

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

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

Журнал изменений

Дата	Журнал событий	Причина
Июль 2008	Добавлена версия кода для надстройки уровня приложения.	Изменение функции SP1.

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