Solidworks API

[Sla_68 4]

Доброго вечера. Поздравляю всех с прошедшими праздниками и желаю успехов.

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

1. Находим макс плоскость тела

2. По ней определяем ось

3. Точки оси разношу в разные стороны от тела сонаправленно ее векторам оси на некое расстояние, скажем на 10 метров

4. Далее методом Dist = part.ClosestDistance(body, swSketchPt1, Point1, Point2)  нахожу Point1 , координаты точки соприкосновения с телом на минимальной дистанции.

Торцы профиля имеют сложную зарезку образовывая одну или несколько поверхностей.

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

Что мы имеем . Координату. Вот по ней родимой и надо определить объект vertex, edge или face для задания последующих собряжений в 2D эскизе.(Для добавления длины профиля в свойства)

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

Отсюда вопрос, есть способы с помощью координаты найти  или определить объект твердого тела помимо SelectByID2?

 

 

[streamdown 1 565]

@Sla_68 если честно, я не понял вопроса 

Сначала про грани и поиск точек, потом про длину, потом вообще "про что-то"

[zerganalizer 570]

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

[streamdown 1 565]

59 минут назад, zerganalizer сказал:

на них стройте плоскости параллельные вашим

Дичайший совет. Делать дополнительные геометрические построения для нахождения математических точек.

Вы когда расстояние палки измеряете, то сначала прибиваете доски к торцам??? Ндаа...

Изменено 17 января 2018 пользователем streamdown

[zerganalizer 570]

11 минуту назад, streamdown сказал:

Дичайший совет. Делать дополнительные геометрические построения для нахождения математических точек.

Вы когда расстояние палки измеряете, то сначала прибиваете доски к торцам??? Ндаа...

100% рабочий и ПРОВЕРЕННЫЙ МНОГОКРАТНО совет для определения габарита вдоль оси любой балки типа у ТС. Картинки хоть смотрите, если не понимаете...

[streamdown 1 565]

@zerganalizer Я не понял что спрашивает никнейм выше. А то что вы посоветовали - дичь. И без картинок. И даже не надо вам мне ничего дальше объяснять)))

[zerganalizer 570]

2 минуты назад, streamdown сказал:

Я не понял что спрашивает никнейм выше.

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

[streamdown 1 565]

1 минуту назад, zerganalizer сказал:

Просто выдал решение

Слава богу, что в больших компаниях по производству софта сидят адекватные люди, не такие как вы)) и делают нормальный софт с нормальным API. И слава богу, что есть уйма программистов, которые пользуются математикой и головой для воспроизведения своих хотелок, а не "дендро-феккальными методами". Может лучше вам обратно в тему взд вернуться?  там вас понимают и любят 

@Sla_68 ни в коем случае не делайте дополнительные геометрические построения лишь для того, чтобы что-то там вычислить. У вас есть мощный инструмент для такого - код.

[zerganalizer 570]

На балках типа как на фото надо распознать ось (направление), построить 2 экстремума вдоль направления (min, max), провести через них плоскости перпендикулярно оси и запросить между ними расстояние, чтобы в параметр "длина балки" положить результат. А каким кодом делать это - ТС виднее.

[Sla_68 4]

Приветствую. Большая просьба не развозить  холивар по пустому. Я сейчас работаю в солиде по следующей стратегии. Большинство необходимых деталей или сборок делаю как одну деталь. Далее разделяю тела и сохраняю их. В зависимости от группы материала нужно назначить свойства. После разделения , отсутствует дерево построения детали с фичерами а также отсутствуют свойства. Поэтому макросами создаю алгоритмы для анализа геометрии и назначения геометрических свойств. В данном случае я нарисовал произвольный профиль с произвольными зарезами торцев. Понятие "профиль"- у меня это твердое тело имеющее  в разрезе сечение состоящее из кривых дуга или линия. Торцы у меня - это всегда плоские срезы(один или несколько), образующие одну или несколько плоскостей от режущего инструмента. Я поставил себе следущие задачи. 1) Определить в виде эскизной линии длину провиля. 2) Профиль должен иметь в свойстве привязки к геометрии детали, для параметрических изменений. Те если я изменю деталь "прототип-родитель" то это изменит сборку из разделеных тел и повлияет на свойтва всех деталей.

[streamdown 1 565]

@Sla_68

9 минут назад, Sla_68 сказал:

Большая просьба не развозить  холивар по пустому.

Это почему? А где критерий холивара в отличие от "по делу"?

 

9 минут назад, Sla_68 сказал:

Определить в виде эскизной линии длину провиля.

Судя по вашим исходным, ответьте - какая будет длина вот такого профиля?

Скрытый текст

 

 

Изменено 17 января 2018 пользователем streamdown

[zerganalizer 570]

Я вот так и понял. Универсальный самый краткий алгоритм, но в катии - выше. Если в солиде нет подобных функций - нужно будет искать альтернативы. Если нужно восстановить линию профиля (в середине балки), нужно будет найти середину между плоскостями (см мой алгоритм), там разместить плоскость (параллельную им или перп. оси), пересечь балку и найти центр этого сечения. От центра строите отрезок вдоль оси между плоскостями экстремумов. На слишком коротких балках работать корректно не будет.

Изменено 17 января 2018 пользователем zerganalizer

[Sla_68 4]

Те задача даже сводится не в нахождении расстояния, это я уже могу определить . А построении эскиза с привязками для вывода его размера в свойства.

 

Мысли такие , использовать след код:

Function ближайшая_вершина_к_координате(body, x, y, z, dist)
           vList = body.GetVertices
           Dim arr() As Double
           Dim edjpoint As Variant
           Dim arrobj() As Object
           Dim arrobjdis() As Double
            
                        For i = 0 To UBound(vList)
                            edjpoint = vList(i).GetClosestPointOn(x, y, z) 'ближайшая точка
                            ReDim Preserve arr(i) 'массив дистанций
                            ReDim Preserve arrobj(i)
                            arr(i) = длина_линии(x, y, z, edjpoint(0), edjpoint(1), edjpoint(2)) 'тригонометрия
                            Set arrobj(i) = vList(i)
                        Next i
                            max_min_indexarray arr, max1n, max2n, min1n, min2n ' моя функция для нахождения 1мин, 2мин, 1 макс, 2 макс индекса массива c использованием пузырьковой сортировки 
                            dis = arr(min1n)
                            Set ближайшая_вершина_к_координате = arrobj(min1n)
End Function

 

[zerganalizer 570]

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

ближайшая_вершина_к_координате

Все, мимо, если круглое сечение, скошенное под 45. Вы не попадете в вершину солида, это будет точка на кривом ребре. Если, конечно, метод не ищет точку ребра...

 

Вот только не понял - вы в пространстве чертежа API юзаете, или в модели 3D???

Изменено 17 января 2018 пользователем zerganalizer

[Sla_68 4]

3 минуты назад, streamdown сказал:

Это почему? А где критерий холивара в отличие от "по делу"?

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

 

5 минут назад, streamdown сказал:

Судя по вашим исходным, ответьте - какая будет длина вот такого профиля?

20 миллиметров

[zerganalizer 570]

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

Вы когда расстояние палки измеряете, то сначала прибиваете доски к торцам??? Ндаа...

Штангель правильно прикладываю.

[Sla_68 4]

2 минуты назад, zerganalizer сказал:

Все, мимо, если круглое сечение, скошенное под 45. Вы не попадете в вершину солида, это будет точка на кривом ребре. Если, конечно, метод не ищет точку ребра...

Так в этом вся суть , никаких красивых и удобных ситуаций с точками. Точки максимума должны находиться вне вершин для сложности задачи. Профиль круглый можно с прорезью вдоль длины, ну и конечно наконечники. Обязательно должны быть зарезаны абы на какой угол.... да еще и в разых плокостях можно зарезы замутить.

[zerganalizer 570]

Экстремум от твердого тела в заданном направлении солид умеет?

[Sla_68 4]

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

Экстремум от твердого тела в заданном направлении солид умеет?

Я этот вопрос не понял. Солид умеет много чего. Например проецировать точку в направлении вектора...http://help.solidworks.com/2017/English/api/sldworksapi/Get_Projected_Point_Example_VB.htm.

[zerganalizer 570]

Есть такая операция - в заданном направлении находит самую "высокую/низкую" точку тела - экстремум. Как экстремум функции.