[1958]

Имеется некий растр в чертеже. Определяю его точку вставки. Потом изменяю ширину и высоту растра. Как определить точку вставки измененного растра? Возможно вопрос глупый, но никак не могу найти решения.

Код:

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

 (defun c:t_img (/ img height width cen1 new_width new_height cen2)
 (vl-load-com)
 (setq img (vlax-ename->vla-object (car (entsel "Óêàæèòå ðàñòð >"))))
 (setq height (vla-get-ImageHeight img)
       width  (vla-get-ImageWidth img)
       cen1   (vlax-safearray->list (vlax-variant-value (vla-get-origin img)))
 )
 (setq new_width  (* width 1.000001)
       new_height (* height 1.000001)
 )
 (vla-put-ImageWidth img new_width)
 (vla-put-ImageHeight img new_height)
 (setq cen2 (vlax-safearray->list (vlax-variant-value (vla-get-origin img))))
  ; cen2=cen1 ?
 (princ)
)

[name02]

А почему (vla-get-Origin img) не работает?
Точка вставки растра - нижний левый угол растра. Когда изменяешь размеры, то они меняются относительно этого угла - соответственно точка вставки не меняется.
Не так?

[1958]

Сообщение от name02 точка вставки не меняется

Всё правильно. Но растр то изменился, по идее должна быть новая точка. Или я не прав? Короче, мне нужна новая точка для измененного растра. Может надо как-то обновить растр? По типу entupd

----- добавлено через ~32 мин. -----

Сообщение от name02 соответственно точка вставки не меняется

Вроде до меня дошло! Буду определять противоположную (верхнюю правую точку) и её использовать для дальнейших действий.
Спасибо за наводку.