Reactor: insertion d\'une image

[Carboleum]

 

 

Hello,

 

Est il possible de définir un réacteur pour l'insertion d'une image de la même façon que l'attachement d'un xref ?

 

(vlr-xref-reactor nil '((:vlr-endattach . bl:reac-attach))) ne fonctionne pas pour une image.

 

Quelqu'un à une idée ?

 

Merci

 

 

[Patrick_35]

Salut

 

Avec :vlr-objectAppended de vlr-acdb-reactor ?

 

@+

[Carboleum]

 

 

Merci,

 

J'y avait pensé...

 

(or (vlr-acdb-reactor :vlr-acdb-reactor)
(vlr-acdb-reactor '((:vlr-objectappened . bl:reactor-objectappened))))

(defun bl:reactor-objectappened (a)
(print 'appened))

 

j'ai essayé ceci, ca marche pas.

Quel est mon erreur.

J'avoue que les réacteur me sont un peu abscon ;-)

[Patrick_35]

Que cherche tu à faire exactement ?

 

@+

[Carboleum]

 

 

Lors de l'insertion d'images par glisser déposer depuis un explorateur vers AutoCAD, celui-ci est en chemin absolut. Je voudrais les mettre en chemin relatif automatiquement lors de cette insertion.

 

 

[(gile)]

Salut,

 

Une piste, je te laisse finaliser.

 

(setq *ObjectAppenedReactor*
      (vlr-acdb-reactor nil '((:vlr-objectAppended . bl:reactor-objectappened)))
)

(defun bl:reactor-objectappened	(rea obj / img)
 (setq img (vlax-ename->vla-object (cadr obj)))
 (if (= "AcDbRasterImage" (vla-get-ObjectName img))
   (alert (vla-get-ImageFile img))
 )
)

;|
Supprimer le réacteur
(vlr-remove *ObjectAppenedReactor*)
(setq *ObjectAppenedReactor* nil)
|;

[Carboleum]

 

Excellent! merci!

 

voici le code.

 

(or *relativizeimagepath* (setq *relativizeimagepath*
(vlr-acdb-reactor nil '((:vlr-objectappended . bl:relativizeimagepath)))))
(defun bl:relativizeimagepath (rea obj / img)
(if (= "AcDbRasterImage" (vla-get-ObjectName (setq img (vlax-ename->vla-object (cadr obj)))))
	(vla-put-imagefile img (vl-string-subst ".\\" (getvar "dwgprefix") (vla-get-imagefile img)))))

 

 

Au moment de l'insertion d'une image, ce code convertit le chemin de celle-ci en chemin relatif, si l'image se trouve dans le répertoire (ou un sous-répertoire) du dessin