Дополнительные оси

[Захаров Максим]

Добрый день.
Подскажите как получить доступ к объекту «Дополнительные оси». Пользователь их выбирает, но я не могу привести этот выбор к определенному типу объекта. Я не могу понять к какому типу объекта он относится, попробовал к AxisStrip не получается.
If TypeOf acEnt Is Topomatic.Alg.Road.Urb.UserStrips.AxisStrip Then
Dim userAlg As Topomatic.Alg.Road.Urb.UserStrips.AxisStrip = acEnt
End If
И второй вопрос, можно из объекта «Дополнительная ось» сразу обычную полилинию получить?

[Гончаров Василий]

Добрый день! Вам необходимо привести объект к интерфейсу IWrapped и проверить что его свойство WrappedObject это AxisStrip. Также класс AxisStrip поддерживает интерфейс ILinearObject, поэтому Вы можете воспользоваться методом GetPolyline для получения геометрии объекта в виде полилинии.

[Автор]

Сообщения