Solidworks API

[ЮрЮрыч 7]

Нормальный вид это viewid=0

[v-david 18]

Part.ShowNamedView2 "*Isometric", ххх

ххх =

 

 

 

 

Member Description swBackView 2 swBottomView 6 swDimetricView 9 swFrontView 1 swIsometricView 7 swLeftView 3 swRightView 4 swTopView 5 swTrimetricView 8 Только смысла в этом не вижу. Вам по-любому придется зайти в чертеж и привести его в порядок. А раз уж зашли, то и ориентируйте виды там. Заодно и масштаб можете поправить, причем как чертежа, так и индивидуально для каждого вида.

10 Масштаб_вида.swp 10 Масштаб_чертежа.swp 09 Rotate_View.swp

[ЮрЮрыч 7]

Вот именно номер нормального вида в хэлпе не указан, случайно нашел. Если указываешь 0, то поворачивает нормально к выбранной плоскости или грани. Чертеж разумеется вручную. Макрос создает только заготовку. Но много мелкой рутины можно все таки запрограмировать. Всем спасибо

[v-david 18]

Раз уж дошли до "автоматизации" чертежа советую обратить внимание на то, что чертежу, как и модели, можно присвоить свойства (атрибуты). На присвоенные атрибуты впоследствии можно делать ссылки из заметок.  Это даст вам возможность автоматизировать заполнение основной надписи, тех.требований, автонумерации листов проекта и.т.д. Только следует помнить, что если в книге чертежа есть несколько листов (до сих пор не понимаю, зачем это?), то свойства, заданные книге чертежа, будут общими для всех листов. Что в принципе убивает идею книг из нескольких листов.

[Kelny 1 234]

22 минуты назад, ЮрЮрыч сказал:

Вот именно номер нормального вида в хэлпе не указан, случайно нашел. Если указываешь 0, то поворачивает нормально к выбранной плоскости или грани.

Вы не внимательно причитали (или у вас более ранняя версия), начиная с SW2012 в справке дополнены заметки к инструменту и для этого там предлагается иной путь (думается лучше использовать задокументированные инструменты, что бы накладок не было):

Цитата

Remarks

To set a named view to the active view in a drawing, the drawing view that contains the named view must be selected.

To orient the selected face to its Normal To view, specify *Normal To for VName and -1 for ViewId. 

 

https://help.solidworks.com/2012/english/api/sldworksapi/solidworks.interop.sldworks~solidworks.interop.sldworks.imodeldoc2~shownamedview2.html

 

[brigval 687]

Если в процедуре (функции) есть конструкция типа

 

vComponents = swRootComp.GetChildren

 

то в момент выхода из такой процедуры программа подвисает и ни на что не реагирует.

Причем, чем больше количество Children, тем на большее время подвисает программа при выходе из процедуры.

Мои усилия не привели к обычному (быстрому) выходу из процедуры.

Никто не сталкивался с этим? Может, есть какое-то решение, позволяющее устранить задержку?

[Shvg 67]

3 часа назад, brigval сказал:

Если в процедуре (функции) есть конструкция типа

 

vComponents = swRootComp.GetChildren

 

то в момент выхода из такой процедуры программа подвисает и ни на что не реагирует.

Причем, чем больше количество Children, тем на большее время подвисает программа при выходе из процедуры.

Мои усилия не привели к обычному (быстрому) выходу из процедуры.

Никто не сталкивался с этим? Может, есть какое-то решение, позволяющее устранить задержку?

Не совсем понятно что пишется. Macros, standalone API (.exe files) или add-in (.dll files).

И да, это затратная функция, особенно в exe файлах. Примерно раз в десять время можно сократить в них используя swApp.CommandInProgress.

 

Вот примерные тестовые результаты сборки из 10000 шариков с использованием CommandInProgress и exe файла. Время дано в миллисекундах.

Функция GetChildren: 3198
Цикл for: 21069

Функция GetChildren: 3078
Цикл for: 21612

Функция GetChildren: 3127
Цикл for: 21538

Функция GetChildren: 3237
Цикл for: 21151

Функция GetChildren: 2973
Цикл for: 21622

 

Без CommandInProgress сама функция GetChildren отрабатывала 42...48 сек.

P.S. Комп старенький.

Изменено 30 марта 2023 пользователем Shvg

[brigval 687]

9 часов назад, Shvg сказал:

Не совсем понятно что пишется. Macros, standalone API (.exe files) или add-in (.dll files).

И да, это затратная функция, особенно в exe файлах. Примерно раз в десять время можно сократить в них используя swApp.CommandInProgress.

 

Вот примерные тестовые результаты сборки из 10000 шариков с использованием CommandInProgress и exe файла. Время дано в миллисекундах.

Функция GetChildren: 3198
Цикл for: 21069

Функция GetChildren: 3078
Цикл for: 21612

Функция GetChildren: 3127
Цикл for: 21538

Функция GetChildren: 3237
Цикл for: 21151

Функция GetChildren: 2973
Цикл for: 21622

 

Без CommandInProgress сама функция GetChildren отрабатывала 42...48 сек.

P.S. Комп старенький.

Спасибо. 

Но я немного не об этом. Сама функция GetChildren отрабатывает приемлемое время.

На скриншоте показан выход из процедуры.

Вот если теперь сделать следующий шаг для выхода в надпроцедуру, то в над процедуру выход осуществляется не мгновенно, как обычно, а с заметной задержкой 4-7 секунд.

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

Видимо, внутри происходят какие-то процессы, только после которых программа продолжает нормально работать.

Если перед выходом выполнить

vComponents = Empty

то это ничего не меняет.

 

Аналогично медленно происходит и выход в надпроцедуру, если используется GetFeatures.

Задержка происходит и в редакторе VB6 и в EXE.

 

С CommandInProgress не работал. Попробую поизучать.

 

 

Попробовал CommandInProgress.

Супер! Просто чудо! Задержка перестала ощущаться и общая скорость считывания данных заметно возросла.

@Shvg большое спасибо.

Изменено 31 марта 2023 пользователем brigval

[nicomed 150]

9 часов назад, Shvg сказал:

Примерно раз в десять время можно сократить в них используя swApp.CommandInProgress.

Когда-то попробовал, но проект был с открытием файлов, и на тестовом, малом, количестве файлов, разницу особо не почувствовал. И, соответственно, это свойство было благополучно заброшено и забыто.

Сейчас добавил в рабочий проект. Время обработки изменилось с, примерно, 1 мин 50 сек , до 40 сек.

Изменено 31 марта 2023 пользователем nicomed

[Shvg 67]

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

С CommandInProgress не работал. Попробую поизучать.

.........

Попробовал CommandInProgress.

Супер! Просто чудо! Задержка перестала ощущаться и общая скорость считывания данных заметно возросла.

Только не забудьте, что написав:

swApp.CommandInProgress = true;

надо написать и 

swApp.CommandInProgress = false;

 

[brigval 687]

Только что, Shvg сказал:

Только не забудьте, что написав:

swApp.CommandInProgress = true;

надо написать и 

swApp.CommandInProgress = false;

 

Разумеется )

Спасибо.

[Snake 60 675]

8 часов назад, brigval сказал:

Попробовал CommandInProgress.

 

@Shvg @brigval  А как его правильно применять? А то у меня тоже есть пару макросов тормознутых )

Изменено 31 марта 2023 пользователем Snake 60

[Snake 60 675]

Отбой, разобрался ) вернее запросил пример у ChatGPT :)

Цитата

Команда "swApp.CommandInProgress" в SolidWorks API устанавливает флаг, указывающий, что в настоящее время выполняется команда в SolidWorks.

Ниже приведен пример использования "swApp.CommandInProgress = True" для установки флага "CommandInProgress" при выполнении пользовательской команды в SolidWorks:

 

Sub Example()
    Dim swApp As SldWorks.SldWorks
    
    Set swApp = Application.SldWorks
    
    ' Установить флаг "CommandInProgress" на true
    swApp.CommandInProgress = True
    
    ' Здесь выполняется пользовательская команда
    
    ' Сбросить флаг "CommandInProgress" на false
    swApp.CommandInProgress = False
    
End Sub

Цитата

В данном примере мы устанавливаем флаг "CommandInProgress" на true перед выполнением пользовательской команды в SolidWorks, чтобы указать, что команда выполняется в настоящее время. Затем, после выполнения команды, мы сбрасываем флаг на false.

Обратите внимание, что установка флага "CommandInProgress" на true может привести к блокировке пользовательского интерфейса SolidWorks, поэтому рекомендуется использовать эту команду с осторожностью.

 

Изменено 31 марта 2023 пользователем Snake 60

[Kelny 1 234]

6 минут назад, Snake 60 сказал:

запросил пример у ChatGPT :)

Можно было спросить у справки (вольный машинный перевод):

Цитата

CommandInProgress

Повышает производительность внепроцессных приложений, информируя SolidWorks о том, что внепроцессное приложение будет выполнять последовательность вызовов API.   https://help.solidworks.com/2010/english/api/sldworksapi/solidworks.interop.sldworks~solidworks.interop.sldworks.isldworks_properties.html Установите значение True перед вызовом последовательности вызовов API, затем установите значение false после вызова последовательности вызовов API.   Примечания SolidWorks сокращает количество обновлений, которые она делает во время этих вызовов. Использование этого свойства влияет только на внепроцессные приложения. https://help.solidworks.com/2010/english/api/sldworksapi/solidworks.interop.sldworks~solidworks.interop.sldworks.isldworks~commandinprogress.html

 

[Snake 60 675]

4 минуты назад, Kelny сказал:

Можно было спросить у справки (вольный машинный перевод):

Так я так и задал вопорос, приведи пример из справки SW API ))) лень было искать )

 

PS А что такое внепроцессные приложения? Макросы попадают туда или только СтендЭлоун и Dll?

Изменено 31 марта 2023 пользователем Snake 60

[Shvg 67]

22 часа назад, Shvg сказал:

 

Вот примерные тестовые результаты сборки из 10000 шариков с использованием CommandInProgress и exe файла. Время дано в миллисекундах.

Функция GetChildren: 3198
Цикл for: 21069

Функция GetChildren: 3078
Цикл for: 21612

Функция GetChildren: 3127
Цикл for: 21538

Функция GetChildren: 3237
Цикл for: 21151

Функция GetChildren: 2973
Цикл for: 21622

 

Без CommandInProgress сама функция GetChildren отрабатывала 42...48 сек.

P.S. Комп старенький.

 А вот результаты в миллисекундах той же сборки из 10000 шариков, тот же самый код функции, только без CommandInProgress, но реализация addins-ом C#(*.dll).

 

Функция GetChildren: 50
Цикл for: 92
Функция GetChildren: 45
Цикл for: 87

 

Функция GetChildren: 50
Цикл for: 109
Функция GetChildren: 34
Цикл for: 76
Функция GetChildren: 34
Цикл for: 76

[Snake 60 675]

@Shvg Офигеть разница, получается аддины предпочтительней StandAlone?

[Shvg 67]

6 минут назад, Snake 60 сказал:

@Shvg Офигеть разница, получается аддины предпочтительней StandAlone?

По скорости, да.. Они работают в одном процессе c SW. А насчет предпочтительней, то каждый выбирает сам, что ему лучше.

[brigval 687]

31.03.2023 в 09:30, Shvg сказал:

Только не забудьте, что написав:

swApp.CommandInProgress = true;

надо написать и 

swApp.CommandInProgress = false;

 

 

Иногда не срабатывает

swApp.CommandInProgress = false

Остается значение True.

А вот так срабатывает чаще.

swApp.CommandInProgress = false
swApp.CommandInProgress = false

 

Заметил, что если swApp.CommandInProgress = True, не осуществляется автозапись макросов.

Перезагрузка SW восстанавливает swApp.CommandInProgress = False и макросы начинают записываться.

Изменено 2 апреля 2023 пользователем brigval

[v-david 18]

"есть, друг Горацио...  "  вы еще с именами компонентов-деталей попробуйте разобраться. Не одно поколение кодеров пыталось модифицировать SW

31.03.2023 в 17:23, Snake 60 сказал:

Отбой, разобрался ) вернее запросил пример у ChatGPT :)

 

Sub Example()
    Dim swApp As SldWorks.SldWorks
    
    Set swApp = Application.SldWorks
    
    ' Установить флаг "CommandInProgress" на true
    swApp.CommandInProgress = True
    
    ' Здесь выполняется пользовательская команда
    
    ' Сбросить флаг "CommandInProgress" на false
    swApp.CommandInProgress = False
    
End Sub