[Danger_pgs]

Встала следующая задача:
Имеется некоторый комплект чертежей выполненных в модели в масштабе 1:1, без размеров и оформления. Требуется программно создать видовые окна в пространстве листа, задать нужный масштаб и спозиционировать пространство модели. С оформлением я разобрался, благо есть функция для перевода точки из координат модели в лист.
Основная задача программное совмещение заданной точки модели с центром текущего ViewPort... Зарание благодарен

[Danger_pgs]

Ещё подскажите пожалуйста, как програмно переключить активный вьюпорт??? Конструкция типа:
(vla-put-ActiveSpace actDoc acPaperSpace)
(vla-put-Activeviewport actDoc(vla-item (vla-get-viewports actDoc) 1))
Не катит...

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

> #1 : DXF Reference -> VIEWPORT : 12 группа - координаты центра области просмотра (в системе координат дисплея); 16 группа - вектор просмотра; 17 группа - координаты центра просмотра в WCS. Вроде что-то из этого надо ковырять.

[Danger_pgs]

К сожалению не работает, я на это вчера пол-дня убил, он просто не даёт переписать 12-ую группу... То есть переписать то я переписал, а потом снова смотрю, а оно не изменилось... Наверное группа для редактирования не доступна...
Ладно, если не получится, я уже придумал как это победить. А как всё таки активный вьюпорт переключить???

[Makswell]

Просто меняй переменнную CVPORT

[Danger_pgs]

Пасип!!!
Усли у кого появятся соображения по поводу позиционирования, делитесь, думаю задачка довольно интересная и заслуживает внимания! =)

[Олег К.]

>> Danger_pgs
Вот нашел одну старую тему, там немного разбиралась работа с вьюпортами: http://dwg.ru/f/showthread.php?t=13211

И еще из давно сделанных наблюдений: из набора видовых экранов листа необходимо исключать первый по списку. Этот вьюпорт является служебным и включает в себя все пространство листа.

[Makswell]

Может в тему? Код взят из древней книжки Полещука 2001 года

Код:

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

;;;вход в ВЭ из листа програмно
(defun test (/ vp1 vp1_1 n1)
  (setq vp1 (entsel "\nВыберите ВЭ"))
  (setq vp1_1 (entget (car vp1)))
  (setq n1 (cdr (assoc 69 vp1_1)))
  (vl-cmdf "_.mspace" "cvport" n1)
)

[Vova]

Сообщение от Danger_pgs Встала следующая задача: Имеется некоторый комплект чертежей выполненных в модели в масштабе 1:1, без размеров и оформления. Требуется программно создать видовые окна в пространстве листа, задать нужный масштаб и спозиционировать пространство модели.

С точки зрения исполнителя чертежа - ничего не понимаю. Как будто, чертеж недоделан и требуется его завершить нажатием некоей кнопки, запускающей умную программу. Как прога вычислит нужный масштаб в-порта?. Как она узнает, нужны ли в-порты других масштабов? Как она узнает, нарисованы ли детали в натуральныю величину или смасштабированы? Как она сможет при необходимости подрезать в-порт? Как она сможет заморозить некоторые слои в некоторых в-портах? Как она наконец среагирует на аннотативные объекты? Или это не будет универсальной суперпрогой, работающей вместо инженера, а только решать некий частный случай? Кстати, а как быть с забытыми размерами?