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

Доброго всем. Для вставки растров в документ есть прекрасная функция vla-addraster. Передаем необходимые параметры, и получаем результат.
Все это хорошо, до тех пор, пока не сталкиваемся с попыткой повторной вставки растра, уже однажды "подключенного" к документу: в таком случае вставляется растр с именем IOA-и-дальше-цифры.
Как я поступал:
Сначала получаем ссылки на те растры, которые были когда-то подключены к документу:

Код:

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

(setq dict (mapcar 'cdr (vl-remove-if-not '(lambda(x) (= (car x) 350)) (dictsearch (namedobjdict) "acad_image_dict"))))

Допустим, есть 2 записи - первая для отключенного растра, вторая - для вставленного. Надо вставить растр именно первой записи.
Вопрос - как это сделать? Через entmakex пробовал, но там вопрос с подрезкой - как ее задавать, по каким правилам и т.д. А без нее растр не создается. Через ActiveX? Вообще не сообразить никак.
Собственно вопрос - как можно вставить растр, который был уже вставлен, но отключен?

Ну или как минимум - как лиспом узнать количество пикселей в растре (по вертикали и горизонтали)?

---

Сорри, отбой. Все намного проще, как оказалось - я просто недочитал DXF Reference.
Может, есть и вариант попроще, но меня пока хватило только на это

Код:

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

(setq img (car
            (mapcar 'cdr
                    (vl-remove-if-not '(lambda (x) (= (car x) 350)) (dictsearch (namedobjdict) "acad_image_dict"))
                    ) ;_ end of mapcar
            ) ;_ end of car
      ) ;_ end of setq
(entmakex
  (list '(0 . "IMAGE")
        '(100 . "AcDbEntity")
        '(100 . "AcDbRasterImage")
        '(90 . 0)
        '(10 100. 100. 0.)
        '(11 1. 0. 0.)
        '(12 0. 1. 0.)
        (cons 13 (cdr (assoc 10 (entget img))))
        (cons 340 (cdr (assoc -1 (entget img))))
        '(70 . 15)
        '(280 . 0)
        (cons 360 (cdr (cadr (vl-remove-if-not '(lambda (x) (= (car x) 330)) (entget img)))))
        '(71 . 1)
        '(14 -0.5 -0.5)
        (cons 14 (mapcar '(lambda (x) (- x 0.5)) (cdr (assoc 10 (entget img)))))
        ) ;_ end of list
  )

[VVA]

Алексей, уточни термин отключен.
Это п.1 или п.2 ?
PS Так же отбой.