Сообщество программистов Autodesk в СНГ

ADN Club => Inventor API => Тема начата: R.I.Chernov от 30-08-2016, 17:37:02

Название: Как обратится к сборке, с которой сделан базовый вид.
Отправлено: R.I.Chernov от 30-08-2016, 17:37:02
Доброго времени суток, уважаемые форумчане! Помогите пожалуйста с вопросом, указанным в теме. Потыкался в свойство Parent вида, вроде не то.
Название: Re: Как обратится к сборке, с которой сделан базовый вид.
Отправлено: mikazakov от 30-08-2016, 17:50:53
DrawingView.ReferencedDocumentDescriptor
Название: Re: Как обратится к сборке, с которой сделан базовый вид.
Отправлено: R.I.Chernov от 30-08-2016, 18:27:24
Спасибо, Михаил.  Итоговый код, получился такой (мб пригодится кому):
Код - Visual Basic [Выбрать]
  1. Private Sub test_dwg_4()
  2.     Dim oDoc_dwg As DrawingDocument
  3.     Set oDoc_dwg = ThisApplication.ActiveDocument
  4.     Dim oSheet As Sheet
  5.     Set oSheet = oDoc_dwg.ActiveSheet
  6.     Dim oView As DrawingView
  7.     Set oView = oSheet.DrawingViews(1)
  8.     Dim oRefDocDiskr As DocumentDescriptor
  9.     Set oRefDocDiskr = oView.ReferencedDocumentDescriptor
  10.     Dim oDoc As Inventor.Document
  11.     Set oDoc = oRefDocDiskr.ReferencedDocument
  12.     Debug.Print oDoc.DisplayName
  13. End Sub