carmelo81
Guest
Au revoir à tous,
J'utilise le code lisp ci-dessous (pas le mien) pour faire un double décalage, seulement qu'à la fin les nouvelles lignes sont automatiquement déplacées vers le calque 0 et je ne comprends pas pourquoi.
Pouvez-vous m'aider à résoudre ça ?
Merci beaucoup.
J'utilise le code lisp ci-dessous (pas le mien) pour faire un double décalage, seulement qu'à la fin les nouvelles lignes sont automatiquement déplacées vers le calque 0 et je ne comprends pas pourquoi.
Pouvez-vous m'aider à résoudre ça ?
Merci beaucoup.
Code:
(refun c:k (/ent dist obj krd)
(setq dist (* 0.5 (distance de décalage entre les points de repère: ")))
(alors que (pas de greffe)
(si (eq)
zéro
)
Ce n'était pas une ligne. Veuillez sélectionner à nouveau: ")
)
)
(initget (+ 1 2 4 64))
(setq obj (vlax-ename->vla-objet ent))
(fla offset obj dist)
(fla offset obj (* dist -1))
(vla-erase obj)
(principal)
)