Solidworks API

[Kelny 1 237]

24 минуты назад, nicomed сказал:

Теперь перейдем к оставшимся вопросам: Где искать в размере измененное значение, которое получилось при некорректном вводе ( скорее всего какое-то текстовое поле, которое я не нашел )?

Если не найдётся, то как вариант ковырять текстовое поле через WinAPI, но тогда для каждой версии придётся искать это поле отдельно.

[nicomed 152]

09.12.2022 в 16:50, Kelny сказал:

Если не найдётся, то как вариант ковырять текстовое поле через WinAPI, но тогда для каждой версии придётся искать это поле отдельно.

Похоже этот текст достается из интерфейса IDisplayData метод GetTextAtIndex(0).

[Sashka_ 0]

Кто-нибудь знает за что отвечает команда CreateSpring? С помощью этой команды можно создать пружину? В разделе справки ISpring есть дополнительные параметры, но как с помощью этих параметром можно создать пружину? 

[Kelny 1 237]

14 часов назад, Sashka_ сказал:

С помощью этой команды можно создать пружину?

Как вариант готовый макрос:

https://cccp3d.ru/topic/6071-сделай-свою-работу-в-solidworks-эффективнее/?do=findComment&comment=699118

 

[nicomed 152]

02.12.2022 в 22:53, nicomed сказал:

Какие-никакие данные можно выкопать из интерфейса IDisplayData ( IDisplayDimension.GetDisplayData() ).

Там при вызове метода IDisplayData.GetTextAtIndex(0) получается:

 - если обычный размер то данный текст содержит ПрефиксТекст + ЗначениеРазмера + СуффиксТекст.

 - если размер с резьбой - то только значение резьбового размера. (например М5)

И так -  дальнейший отчет результатов ковыряния API.

Из IDisplayData можно получить получить массив текста. Ранее я использовал только индекс [0] массива (так как для теста читал размер без допуска и спец символов ... что-то типа <MOD-DIAM> ), что оказалось ВЕСЬМА неверно. Размер массива динамический, и по совокупности всех возможных переменных, предсказать его точный размер не вижу возможным. Так как он зависит: от типа допуска размера, от наличия/отсутствия спец символов в размере, от наличия/отсутствия текстов над значением размера (above), под значением размера (below). Плюс сюда такой же набор параметров от , так называемого, "второго размера" (второе текстовое окошко).

Поэтому видится наиболее простой вариант - слепить весь массив текстовых значений и одну строку - и работать уже с ней. ( Это в тему распознавания обозначений резьбы в макросах ).

[nicomed 152]

День добрый.

Есть вопрос:

Как можно получить имя (pattern) штриховки из материала детали?

 

Пока только нахожу только ссылки на "использовать штриховку материала или нет" ....

[Kelny 1 237]

1 час назад, nicomed сказал:

Как можно получить имя (pattern) штриховки из материала детали?

Думается надо обратиться к материалу и выяснить штриховку там.

Если для этого нет API, то вероятно можно обратиться к файлу материалов и считать шриховку от туда:

Цитата

  ...

     <material name="Имя материала">
...
            <xhatch name="ISO (Пластик)" angle="0.000000" scale="1.000000"/>
...

        </material>

 

[ЮрЮрыч 7]

Добрый день. Требуется помощь: как прочитать заданное свойство из вкладки "Настройки"? Из вкладки "Суммарная информация" и "Конфигурации" я разобрался.

[v-david 21]

'ПАМЯТКА!!! ----------------------------------------------------------------- _
            для работы с блоком свойств родительской детали и с блоком свойств _
            конфигурации используются разные процедуры: _
    Set swCustPropMgr = swConfig.CustomPropertyManager _
                                        - для работы со свойствами конфигурации _
    Set swCustPropMgr = Part.Extension.CustomPropertyManager("") _
                                        - для работы со свойствами родителя _
' -----------------------------------------------------------------------------

Об этом речь? 

Есть особенности при обращении к свойствам детали, сборки и чертежа... Уточните вопрос

 

[ЮрЮрыч 7]

Да, об этом. Спасибо. Речь идет о компонентах-деталях. Можно конечно свойство задать, как свойство конфигурации. Но у нас принято в конфигурации вносить, то что различается или потенциально может различаться. 

Изменено 8 февраля 2023 пользователем ЮрЮрыч

[v-david 21]

34 Вес во все конфигурации.swp

вот для разминки... там много лишнего, просто мне нужно было. Выбросите что не нужно.

[ЮрЮрыч 7]

Большое Спасибо. Буду разбираться. Я только начинаю с макросами знакомиться. Мне кажеться для новичков такой метод весьма эфективный: брать готовый макрос и активно с ним эсперименировать. 

[v-david 21]

Пусть вам не кажется. Как-то похоже сказал один из великих программистов: описание языка это не описание, пример это описание.

[ЮрЮрыч 7]

...первый шаг. Макрос для обозначения рукава. Угол закручивания будет видимо нескоро. А в целом по такой схеме можно задавать свойства сборки на основе свойств компонентов.

NameHose.swp Результат.bmp

19.02.2022 в 15:16, ЮрЮрыч сказал:

Здравствуйте, нужен макрос для автоматического обозначения рукава. Возможно кто выкладывал? 

В общем на свой вопрос ответил

[ЮрЮрыч 7]

Добрый день, коллеги, требуется помощь. Столкнулся с проблемой: делаю макрос для создания ведомости но не через спецификацию Solidа, а на прямую записать данные в excel. С функцией GetObject получается, а с CreateObject нет. При попытке добавить книгу workbooks. Add выдает ошибку. 

[v-david 21]

посмотрите имя процесса EXCEL. В ранних версиях мелкомягкие звали его "Microsoft Excel", а с 10 по-моему версии просто "Excel"

' Создаём "пустой" процесс с именем "EXCEL".
                        Set xlApp = CreateObject("Excel.Application")
                        xlApp.Visible = False    ' проявляем приложение
                        Set xlbook = xlApp.Workbooks.Add
' ВАЖНО: предыдущая операция создала "книгу" в процессе "EXCEL" и, соответственно,
' окно (CHILD). Это окно вовсе не обязательно будет на переднем плане

[ЮрЮрыч 7]

Да, процесс excel создает, а дальше. Ошибка type mismath на строке Set xlbook = xlApp.Workbooks.Add.

 

[v-david 21]

скорее всего в дополнениях не включены какие-то библиотеки MS, точно не помню, но вроде так

Изменено 25 февраля 2023 пользователем v-david

[Kelny 1 237]

23.02.2023 в 04:21, ЮрЮрыч сказал:

Да, процесс excel создает, а дальше. Ошибка type mismath на строке Set xlbook = xlApp.Workbooks.Add.

Напишите весь неработающий код, а не кусочки ни как не связанные.

Ошибка намекает, что вы ошиблись в объявленнии и присваиваете другу другу не подходящие типы данных.

Вероятно должно быть как-то так:

Цитата

Dim xlApp As Excel.Application 
Dim xlBook As Excel.Workbook
Dim xlSheet As Excel.WorkSheet
Set xlApp = CreateObject("Excel.Application")
Set xlBook = xlApp.Workbooks.Add
Set xlSheet = xlBook.Worksheets(1)

https://github.com/MicrosoftDocs/VBA-Docs/blob/main/Language/Reference/User-Interface-Help/createobject-function.md

Так же не должно быть ошибок в ссылках на библиотеки:

https://kelnyproject.ucoz.ru/publ/1-1-0-1

 

22.02.2023 в 21:12, v-david сказал:

xlApp.Visible = False    ' проявляем приложение

В такой комбинации как бы наоборот - скрываем.

Изменено 27 февраля 2023 пользователем Kelny

[ЮрЮрыч 7]

Добрый вечер. Благодарю за помощь. Сегодня победил. Дело было в библиотеках. Макрос создает массив свойств и записывает в excel, затем форматирует на разные ведомости. Комп не очень поэтому если делаю через спецификацию и сохр как excel то сборки по крупнее уже тормозят. Ну а этот чик и готово.