(setq doc (vla-get-ActiveDocument acadObj))
RESTORE DRAWING AUTOCAD 2017 FOR MAC HOW TO
The error is caused by the code, marked in RED, it throws me the error, but it still deletes the UCS as i want it to.Īny idea's how to get rid of this error? (eval (list 'defun 'ucsr:acdoc 'nil (vla-get-activedocument (vlax-get-acad-object)))) (setq ucsr:prevucs (mapcar 'getvar '(ucsorg ucsxdir ucsydir))) (setq reply (ACET-UI-MESSAGE "Het huidige coördinaten-stelsel is niet 'World'\nCoördinaten-stelsen aanpassen naar 'World'?" "UCS SYSTEM" (+ Acet:YESNO Acet:ICONQuestion))) (vla-put-activeucs (ucsr:acdoc)(vla-item (vla-get-usercoordinatesystems (ucsr:acdoc)) ucsr:prevucs)) (ALERT "Vergeet niet je UCS terug te zetten!") (setormakelayer "XREF-COORDINATIONMODEL" doc) (if (member (car cl) '("COORDINATIONMODELATTACH")) allowance for other commands (if (member (car cl) '("POINTCLOUDATTACH")) allowance for other commands (if (member (car cl) '("PDFATTACH")) allowance for other commands (if (member (car cl) '("IMAGEATTACH")) allowance for other commands (if (member (car cl) '("XATTACH" "DWFATTACH")) allowance for other commands (if (member (car cl) '("ATTACH")) allowance for other commands So it DOES store the UCS correctly, but doesnt recovery it after the XREF is placed and throws me this error. (setq doc (vla-get-ActiveDocument (vlax-get-acad-object)))(vla-put-ActiveUCS doc (vla-add (vla-get-usercoordinatesystems doc)(vlax-3D-point '(0. (setq reply (ACET-UI-MESSAGE "UCS NAAR WCS? " "UCS system" (+ Acet:YESNO Acet:ICONQuestion))) (if (and (member (car cl) '("ATTACH" "XATTACH" "IMAGEATTACH" "DWFATTACH" "PDFATTACH" "POINTCLOUDATTACH" "COORDINATIONMODELATTACH"))(vlr-data r)) commandended callback (reactor commandlist) (if (member (car cl) '("ATTACH" "XATTACH" "IMAGEATTACH" "DWFATTACH" "PDFATTACH" "POINTCLOUDATTACH" "COORDINATIONMODELATTACH")) allowance for other commands commandwillstart callback (reactor commandlist) (vla-put-lock (vla-item (vla-get-layers (vla-get-activedocument (vlax-get-acad-object))) layn ) :vlax-true) (setq myxr-react (vlr-command-reactor nil '((:vlr-commandwillstart. Command Reactor for Xref/Attachment layer So how can i solve this? Im so damn close. A 'command' function is not allowed when using reactors.
0 kommentar(er)
