[vosh]

Добрый день.
Нужно узнать пересекаются ли две полилинии. Попробовал так:
(vlax-safearray->list (vlax-variant-value (vla-IntersectWith (VLAX-ENAME->VLA-OBJECT (car (entsel))) (VLAX-ENAME->VLA-OBJECT (car (entsel))) acextendnone)))
но оно выдает ошибку если нет точек пересечения "; error: ActiveX Server returned an error: Неверный индекс"
ладно бы nil какой я бы его обработал.
Может есть альтернатива?

[Кулик Алексей aka kpblc]

Так сам-то IntersectWith срабатывает нормально, ошибка в преобразовании
http://forum.dwg.ru/showthread.php?t=15426 - ответ

[Disney]

Так у тебя vlax-variant-value и ругается, что ему nil из vla-IntersectWith посылают

[vosh]

Дык я понимаю что IntersectWith нормально отработал, только результат работы мне непонятный, загадочные они эти Варианты. Ушел по ссылке, может вернусь Как всегда спасибо за оперативность.

[VVA]

vosh, Посмотри как это реализовано здесь: VxGetInters - Returns all intersection points between two objects

[vosh]

Вернулся...
(vlax-safearray-get-u-bound (vlax-variant-value (vla-IntersectWith (VLAX-ENAME->VLA-OBJECT (car (entsel))) (VLAX-ENAME->VLA-OBJECT (car (entsel))) acextendnone)) 1)
меня спасло vlax-safearray-get-u-bound, со своим понятным "2" и "-1" на выходе, уж не знаю что это означает, но главное результат, постигать будем позднее.

Кстати, Disney, ругался vlax-safearray->list
VVA обязательно вечером ознакомлюсь.

Еще раз спасибо.