Болтовое соединение

Автор Тема: Болтовое соединение  (Прочитано 3134 раз)

0 Пользователей и 1 Гость просматривают эту тему.

Оффлайн ShemetovaАвтор темы

  • ADN
  • *
  • Сообщений: 6
  • Карма: 0
Болтовое соединение
« : 24-04-2017, 16:27:04 »
Как определить,что сборка является болтовым соединением?

Оффлайн mikazakov

  • ADN
  • *
  • Сообщений: 751
  • Карма: 195
  • Skype: mikazakov@mail.ru
Re: Болтовое соединение
« Ответ #1 : 24-04-2017, 20:44:57 »
В общем выделите в браузере болтовое соединение и протрассируйте макрос:
Код - Visual Basic [Выбрать]
  1. Sub param_units()
  2.    Dim AD As AssemblyDocument
  3.    Set AD = ThisApplication.ActiveDocument
  4.    
  5.    Dim bolted As ComponentOccurrence: Set bolted = AD.SelectSet(1)
  6.    
  7.    Debug.Print (bolted.DisabledActionTypes)
  8.    Debug.Print (bolted.AttributeSets.Count)
  9.    
  10. End Sub
  11.  

просмотрите в работе состояние объекта bolted и подберите за какое свойство удобнее цепляться при анализе.
дополнительные подробные данные записаны в атрибутах bolted.AttributeSets
а ограничение манипуляции в сборке пользователем в свойстве bolted.DisabledActionTypes

Оффлайн ShemetovaАвтор темы

  • ADN
  • *
  • Сообщений: 6
  • Карма: 0
Re: Болтовое соединение
« Ответ #2 : 26-04-2017, 13:00:59 »
У болтовых соединений обнаруживается AttributeSets с именем "FDesign" и DisabledActionTypes = "Reorder action type".
Можно утверждать, что эти две характеристики однозначно определяют болтовое соединение?

Оффлайн mikazakov

  • ADN
  • *
  • Сообщений: 751
  • Карма: 195
  • Skype: mikazakov@mail.ru
Re: Болтовое соединение
« Ответ #3 : 26-04-2017, 13:12:03 »
AttributeSets с именем "FDesign"
AttributeSets это коллекция, внутри есть еще объекты (сами атрибуты). Стоит по изучать их содержание для анализа.

Оффлайн ShemetovaАвтор темы

  • ADN
  • *
  • Сообщений: 6
  • Карма: 0
Re: Болтовое соединение
« Ответ #4 : 26-04-2017, 13:32:40 »
Атрибуты коллекции FDesign следующие:

 Data
 SolverOpt
 Req
 CalcOpt

все имеют тип 50352640 - Attribute Object
по именам - затрудняюсь определить их назначение

Оффлайн mikazakov

  • ADN
  • *
  • Сообщений: 751
  • Карма: 195
  • Skype: mikazakov@mail.ru
Re: Болтовое соединение
« Ответ #5 : 26-04-2017, 20:22:12 »
Ну разверните узлы при пошаговом выполнении макроса.
Там будет что проанализировать.
Для примера атрибут Data имеет строковое значение в которую завернут xml-документ, а в нем очень много, что может хранится (см. скрин)



остальные тоже содержат данные, но там инфа скуднее.
Ну как то так, это вся информация о болтовом соединении.

P.S. Нужно признаться, что VBA не самый удобный инструмент для работы с xml.

Оффлайн mikazakov

  • ADN
  • *
  • Сообщений: 751
  • Карма: 195
  • Skype: mikazakov@mail.ru
Re: Болтовое соединение
« Ответ #6 : 26-04-2017, 20:25:23 »
Да и в хэлпе есть обзор по работе с атрибутами



Оффлайн ShemetovaАвтор темы

  • ADN
  • *
  • Сообщений: 6
  • Карма: 0
Re: Болтовое соединение
« Ответ #7 : 27-04-2017, 09:37:46 »
Спасибо за предоставленную информацию.