Перейти к публикации

Рекомендованные сообщения

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

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

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

Ссылка на сообщение
Поделиться на других сайтах


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

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

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

Ссылка на сообщение
Поделиться на других сайтах

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

Ссылка на сообщение
Поделиться на других сайтах
14 часов назад, Sashka_ сказал:

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

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

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

 

Ссылка на сообщение
Поделиться на других сайтах
02.12.2022 в 22:53, nicomed сказал:

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

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

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

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

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

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

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

Ссылка на сообщение
Поделиться на других сайтах

День добрый.

Есть вопрос:

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

 

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

Ссылка на сообщение
Поделиться на других сайтах
1 час назад, nicomed сказал:

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

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

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

Цитата

  ...

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

        </material>

 

Ссылка на сообщение
Поделиться на других сайтах
  • 1 месяц спустя...

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

Ссылка на сообщение
Поделиться на других сайтах

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

Об этом речь? 

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

 

Ссылка на сообщение
Поделиться на других сайтах

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

Изменено пользователем ЮрЮрыч
Ссылка на сообщение
Поделиться на других сайтах

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

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

Ссылка на сообщение
Поделиться на других сайтах

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

Ссылка на сообщение
Поделиться на других сайтах

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

Ссылка на сообщение
Поделиться на других сайтах

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

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

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

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

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

Ссылка на сообщение
Поделиться на других сайтах
  • 2 недели спустя...

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

Ссылка на сообщение
Поделиться на других сайтах

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

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

Ссылка на сообщение
Поделиться на других сайтах

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

Изменено пользователем v-david
Ссылка на сообщение
Поделиться на других сайтах
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    ' проявляем приложение

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

Изменено пользователем Kelny
Ссылка на сообщение
Поделиться на других сайтах

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

Ссылка на сообщение
Поделиться на других сайтах

Присоединяйтесь к обсуждению

Вы можете опубликовать сообщение сейчас, а зарегистрироваться позже. Если у вас есть аккаунт, войдите в него для написания от своего имени.
Примечание: вашему сообщению потребуется утверждение модератора, прежде чем оно станет доступным.

Гость
Ответить в тему...

×   Вставлено в виде отформатированного текста.   Вставить в виде обычного текста

  Разрешено не более 75 эмодзи.

×   Ваша ссылка была автоматически встроена.   Отобразить как ссылку

×   Ваш предыдущий контент был восстановлен.   Очистить редактор

×   Вы не можете вставить изображения напрямую. Загрузите или вставьте изображения по ссылке.

  • Сейчас на странице   0 пользователей

    Нет пользователей, просматривающих эту страницу.



  • Сообщения

    • Snake 60
      Скорее всего исправляли в конкретной сборке, для конкретных тел. Насколько я помню, надо в самом эскизе профиля заполнить свойство Description
    • Snake 60
      Делаете дырку в свае - вставляете в нее трубу и 2 человеко-силы крутят сваю ) Дёшево и сердито и не нужен никакой планетарный редуктор ))
    • gudstartup
      вы всегда ищите свой путь или будете делать то что вам советуют? с самого начала прежде чем приступать к экспериментам вам нужно было вынуть носитель и сделать образ. diskcopy делает копию гибкого диска на другой а вам надо сделать образ жесткого диска или карты памяти. делайте как советует @Viktor2004 иначе еще чего нибудь сломаете или вам станок не нужен и вы его приобрели для экспериментов ? вот а печатной машинке из прошлого нельзя а вот на синумерике можно - удивительные вещи в настоящем происходят!! на 100 % уверен что там не модуль а либо писимиси ай либо жд @mircomax81 хотите работать в дос почитайте помощь по командам 
    • PuKoLLleT
      Доброго дня всем. Поделитесь опытом,раньше такое не доводилось делать. На торце фланца нужно сделать  восемь отверстий ф17H7 на токарно-фрезерном станке с осью Y ,имеется ManualGuide.В моем понимании нужно просверлить,а затем торцевой фрезой расточить нужный диаметр.Получится такой фокус,или надо разверткой доводить нужный размер?  Стойка Fanuc 0i-Tf.
    • Snake 60
      Всё верно, я даже русификатор делал для него (ушло на это где-то около года). Хороший софт был, я всех знакомых на него подсадил в свое время :) У меня даже где-то образ на виртуалке лежит с SW2014+MechSoft, Жаль, что автодеск его поглотил, а не DS :( А по сути вопроса, проектировал двухступенчатый планетарный редуктор в свое время. Что было нужно: Справочник по планетаркам (автора не помню, если надо поищу), из софта MathCAD + GearTeq (софтина идет вместе с GearTrax, только рассчитывает и моделирует несколько зацеплений согласно выбранной схеме, в том числе планетарки) Ой и ошибаетесь. Звездочки - не равно зубчатые колеса в планетарке) Мы намучились с малой точностью изготовления на эл.эрозии, а Вы лазером ))) Был собран опытный образец редуктора с незакаленными деталями, чисто проверить геометрию, отладить сборку. Так потом начальство этот редуктор сказало испытать в бою, как я не противился)) Помер за пару дней интенсивных нагрузок ))) Материал, термообработка и точности изготовления решают )
    • Snake 60
      @Тихоход  Ещё один вариант - изучать программирование и писать свою программу/макрос. Вот пример конфигуратора двери: https://www.youtube.com/watch?v=wv4HryWQBSk
    • mircomax81
      Посредством Diskcopy можно сделать адекватную копию на флоппи диск?
    • Andrey_kzn
      Да, ведь советовали автору вытащить жёсткий диск и сделать образ. Неужели самому не интересно, как устроен этот старый промкомпьютер? Там может стоять как жёсткий диск, так и CF-карта, или же Disc-on-chip или Disc-on-module.  Как-то очень давно, на подобном промышленном оборудовании (большая печатная машина) я не смог перенести  ПО с родной CF - карты на другую, такого же размера но другой фирмы. Была также станочная оболочка под досом.  Образ я делал Нортон гостом, развернул его на другую CF-карту без проблем. Машина загрузилась нормально и работала ровно 2 дня, на неродной CF-карте,  потом зависла, и отказалась загружаться. Пришлось вызывать сервисника. От него мы узнали, что нельзя просто так взять и заменить карту  - носитель системного ПО, на другую. А полезли мы туда, так как руководство захотело печатать отчёты по работе машины. В станочном ПО такая функция была. Вот только принтер надо было купить у фирмы - производителя этой самой машины. В попытках заставить работать другой принтер мы редактировали файл  AUTOEXEС.BAT, на предмет загрузки драйвера принтера, ничего не получилось, зато перестали открываться некоторые страницы станочного ПО.  Образ у нас был давно снят, и мы развернули его на другую карту памяти. Родную карту я трогать не стал (как чувствовал, что нельзя ). Сервисник восстановил ПО с архивной дискеты на родную карту памяти, и всё заработало. Дискеты с архивами ПО шли вместе с документацией к машине.  Там были дискеты с Досом, станочной оболочкой, параметрами приводов, программой ПЛК. Он же и предупредил нас о предельно аккуратном обращении с родной картой памяти, и посоветовал немедленно сделать образы с архивных дискет, что мы сразу и проделали.. Вот такой сюрприз от машины эпохи Дос.
    • Борман
    • gudstartup
      а ведь все работало...
×
×
  • Создать...