ControlCollection.GetShapeForControl(Control) Метод
Определение
Важно!
Некоторые сведения относятся к предварительной версии продукта, в которую до выпуска могут быть внесены существенные изменения. Майкрософт не предоставляет никаких гарантий, явных или подразумеваемых, относительно приведенных здесь сведений.
Возвращает основной объект Shape для указанного элемента управления.
public Microsoft.Office.Interop.Word.Shape GetShapeForControl (System.Windows.Forms.Control control);
Параметры
- control
- Control
Элемент управления в экземпляре коллекции ControlCollection, из которого необходимо получить объект Shape.
Возвращаемое значение
Основной объект Shape для указанного элемента управления.
Примеры
Следующий пример кода добавляет Button в документ, а затем использует GetShapeForControl метод для получения расположения элемента управления из его базового объекта Shape .
private void WordGetShape()
{
Microsoft.Office.Tools.Word.Controls.Button testButton =
this.Controls.AddButton(10, 10, 50, 25, "testButton");
Microsoft.Office.Interop.Word.Shape buttonShape =
this.Controls.GetShapeForControl(testButton);
if (buttonShape != null)
{
MessageBox.Show("The following properties can be cached in the" +
"\n" + "document to enable you to recreate the control:" +
"\n\n" + "Height: " + buttonShape.Height.ToString() +
"\n" + "Width: " + buttonShape.Width.ToString() + "\n" +
"Top: " + buttonShape.Top.ToString() + "\n" +
"Left: " + buttonShape.Left.ToString());
}
}
Private Sub WordGetShape()
Dim testButton As Microsoft.Office.Tools.Word.Controls.Button = _
Me.Controls.AddButton(10, 10, 50, 25, "testButton")
Dim buttonShape As Microsoft.Office.Interop.Word.Shape = _
Me.Controls.GetShapeForControl(testButton)
If buttonShape IsNot Nothing Then
MessageBox.Show("The following properties can be cached in the" & _
vbCrLf & "document to enable you to recreate the control:" _
& vbCrLf & vbCrLf & "Height: " & buttonShape.Height _
& vbCrLf & "Width: " & buttonShape.Width _
& vbCrLf & "Top: " & buttonShape.Top _
& vbCrLf & "Left: " & buttonShape.Left)
End If
End Sub
Комментарии
Если стиль обтекания элемента управления имеет значение в строке с текстом, GetShapeForControl метод возвращает значение null .