Список форумов Конференция САПР Bentley MicroStation Конференция САПР Bentley MicroStation
www.ustation.ru
 
 FAQFAQ   ПоискПоиск   ПользователиПользователи   ГруппыГруппы   РегистрацияРегистрация 
 ПрофильПрофиль   Войти и проверить личные сообщенияВойти и проверить личные сообщения   ВходВход 

VBA. Как начертить отрезок перпендикулярно сплайну?

 
Начать новую тему   Ответить на тему    Список форумов Конференция САПР Bentley MicroStation -> Прикладное
Предыдущая тема :: Следующая тема  
Автор Сообщение
ivsem



Зарегистрирован: 01.02.2006
Сообщения: 63
Откуда: Киев

СообщениеДобавлено: Пт Окт 30, 2009 1:51 pm    Заголовок сообщения: VBA. Как начертить отрезок перпендикулярно сплайну? Ответить с цитатой

2D. Нужно через равные промежутки начертить отрезки переменной длины перпендикулярно к сплайну.
В Autocad в ALisp для этого я ипользовал команду measure
В Microstation аналога выше приведенной комаде я пока не обнаружил. Можно попробовать использовать в цикле команду Microstation Construct Active Point at Distance Along. Но как обеспечить перпендикуляроность элемента к кривой?
Вернуться к началу
Посмотреть профиль Отправить личное сообщение
Leonid
давно здесь сидим


Зарегистрирован: 28.01.2006
Сообщения: 598
Откуда: С.-Петербург

СообщениеДобавлено: Пт Окт 30, 2009 10:52 pm    Заголовок сообщения: Ответить с цитатой

Получить касательную:
EvaluatePointTangent()
и к ней перпендикуляр:
Vector3dUnitPerpendicularXY()
Вернуться к началу
Посмотреть профиль Отправить личное сообщение Отправить e-mail
ivsem



Зарегистрирован: 01.02.2006
Сообщения: 63
Откуда: Киев

СообщениеДобавлено: Сб Окт 31, 2009 7:54 pm    Заголовок сообщения: Ответить с цитатой

BsplineCurveElement не имеет метода EvaluatePointTangent()
Каким образом можно задействовать BsplineCurve имеющий этот метод "ума не приложу". В примерах по VBA ничего подходящего не нашел. Может метод FromElement удастся пристроить
Вернуться к началу
Посмотреть профиль Отправить личное сообщение
Leonid
давно здесь сидим


Зарегистрирован: 28.01.2006
Сообщения: 598
Откуда: С.-Петербург

СообщениеДобавлено: Сб Окт 31, 2009 9:51 pm    Заголовок сообщения: Ответить с цитатой

Именно этот метод для этого и существует.
Вернуться к началу
Посмотреть профиль Отправить личное сообщение Отправить e-mail
Показать сообщения:   
Начать новую тему   Ответить на тему    Список форумов Конференция САПР Bentley MicroStation -> Прикладное Часовой пояс: GMT + 3
Страница 1 из 1

 
Перейти:  
Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете голосовать в опросах


Powered by phpBB © 2001, 2005 phpBB Group