la variable target et SetWindowtoPlot

[GEGEMATIC]

Bonjour,

aujourd'hui j'utilise une commande de tracé automatisée, vieille de plusieurs années, qui ne marche plus d'un seul coup.

Elle marche dans un dessin, et pas dans l'autre.

je fait un comparatif des variables système entre les 2 dessins, et la seule différence notable, c'est "target"

mais je n'arrive pas tout de suite à faire le lien.

j'y reviens, et je m'appercois que le décalage que j'ai entre dans le 'SetWindowToPlot, et la fenêtre de tracé qu'autocad prends en compte , c'est la valeur de target!

(car bien sur, vla-getWindowToPlot retourne la même valeur que l'on à utilisé pour vla-SetWindowToPlot: il n'y a qu'en utilisant la commande tracé, définir une fenêtre, que l'on peut voir ce qu'autocad a compris ...)

 

si on fait une recherche sur SetWindowToPlot, on trouve pas mal de sujets anciens ou le type n'arrive pas à faire marcher un lisp qui utilise cette methode, et personne ne comprends ...

 

donc il suffit de retrancher la valeur de target à son SetWindowToPlot pour que tout revienne dans l'ordre ...

6 heures de recherches, j'ai cru devenir dingue !

 

 

;;**************************************************************************
;§/traces/etabli la fenêtre à tracer / Ac-layout lfen
;;
(defun set_layout_WindowToPlot ( Ac-layout lfen / LowerLeft UpperRight pb ph dep )
 (setq pb (car lfen)
ph (cadr lfen))
 (setq dep (getvar "target"))
 (setq dpx (car dep)
dpy (cadr dep))
 (setq pb (pw_prp pb (- dpx) (- dpy)))
 (setq ph (pw_prp ph (- dpx) (- dpy)))
 
 
 
 (setq LowerLeft (vlax-make-safearray vlax-vbDouble '(0 . 1)))
 (vlax-safearray-fill LowerLeft pb)
 (setq UpperRight (vlax-make-safearray vlax-vbDouble '(0 . 1)))
 (vlax-safearray-fill UpperRight ph)  
 (vla-SetWindowToPlot Ac-layout  LowerLeft UpperRight)
 ;(vla-getWindowToPlot Ac-layout  'LowerLeft 'UpperRight)
;vlax-safearray-fill
;vlax-safearray-put-element
 )