[disintegrator]

Как по координатам из метода GetBoundingBox уменьшить размер окна до этих координат?

[disintegrator]

Кажется алгоритм найден, в четверг попробую реализовать.Основан то ли на глюке метода SelectByPolygon, то ли на хитрой задумке разработчиков AutoCada.Вкратце:

1.Высчитываем какая из сторон прямоугольника > ширина или высота.
2.Делаем ZoomPickWindow и по границе большей стороны рисуем линию.
3.Уменьшаем ширину или высоту окна(в зависимости от того что меньше) до тех пор пока SelectByPolygon этой линии не станет равным нулю . Это значит, что окно стало размеров исходного прямоугольника.

[Apelsinov]

disintegrator
А зачем это все вообще?

[Лентяй]

disintegrator, не мучайся, лови лиспу.

Код:

[Выделить все]

(defun zoomobj (obj / mn mx)
  (vla-getBoundingBox obj 'mn 'mx)
  (vla-ZoomWindow (vlax-get-acad-object) (vlax-make-variant mn) (vlax-make-variant mx))
)

Apelsinov: А зачем это все вообще?

А делать нефиг! Вам что, жалко, что ли?

[Apelsinov]

Лентяй
Нам не жалко, нам интересно. Может, и нам пригодиться, только мы еще не придумали - зачем. :roll:


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

[Лентяй]

Apelsinov: Может, и нам пригодиться, только мы еще не придумали - зачем

Как - зачем? В чужие окна заглядывать! А если удасться - то и плевать.

[Apelsinov]

Лентяй

Как - зачем? В чужие окна заглядывать! А если удасться - то и плевать.

Я обидел кого?

[Лентяй]

Apelsinov: Я обидел кого?

Это вы к чему? Честно говоря, я просто не вижу другого применения этой функции, кроме как сглянуть непонятно зачем унутрь какого-нить контура и плюнуть от oтвращения.

[disintegrator]

короче, смысл этого вот какой: мне нужно экспортировать в Wmf и потом импортировать в "3-е приложение" ,а там изменить это изображение в размерах. Вопрос в том что эта картинка экспортируется вместе с пустыми участками, поэтому чтобы однозначно установить между каждым объектом и его импортом расстояния от края объекта до его границы надо сначала сделать ZoomObject, а потом пустые участки убрать до размера этого объекта(т.е. уменьшить окно).
Понятно? Если нет , попробую ещё раз объяснить.