Classement

Salut @thierry.garré Ca va, on a dit la même chose 😉

Hello @lecrabe il vaut mieux 2 plateformes parfaitement en contact planimétrique que d'essayer de laisser un espace minuscule entre les deux plateformes. Car au moment du calcul COVADIS va chercher des entrées en terre dans ces espaces minuscules. c'est en général une des grandes raisons d'erreurs de calcul. Cordialement

Salut, Il vaut toujours mieux qu'elles se touchent, plutôt que de laisser des micro trous qui vont essayer de se raccorder/découper du TN. C'est toujours mieux si c'est topologiquement exact, y compris et surtout dans les arcs de cercle. Olivier

Coucou, Il n'y a pas réellement de réponse à cette question malheureusement... En langage DIESEL la réponse est non, en LISP ou autre...et bien tout va dépendre de la propriété, du type d'objet, de ce que signifie "interagir" précisément, etc... En clair, il n'existe AUCUN programme (tout langage de programmation) en mesure "d’interagir" avec n'importe quelle propriété de n'importe quel objet. Certaines propriété sont accessible via la liste DXF d'un objet, d'autres à partir des propriétés de l'API COM/ActiveX ou Visual, etc... Donc s'il faut répondre à la question : ce n'est pas possible en l'état, il faut plus de précision concernant le besoin réel. Bisous, Luna

Hors programmation (lisp) ça ne me semble pas possible via macro (diesel). Tu peux essayer ça qui inverse la visibilité des lignes d'attache (je pense que ça doit marcher sous LT) (defun C:CotInvAttach ( / ssDim oDim oDimVla) (while (setq ssDim (ssget "_+.:E:S" '((0 . "DIMENSION")))) (setq oDim (ssname ssDim 0)) (setq oDimVla (vlax-ename->vla-Object oDim)) (if (= (vla-get-ExtLine1Suppress oDimVla) :vlax-true) (vla-put-ExtLine1Suppress oDimVla :vlax-false) (vla-put-ExtLine1Suppress oDimVla :vlax-true) ) (if (= (vla-get-ExtLine2Suppress oDimVla) :vlax-true) (vla-put-ExtLine2Suppress oDimVla :vlax-false) (vla-put-ExtLine2Suppress oDimVla :vlax-true) ) ) ) Olivier

Alors avec un LT 2024 ou plus, on peut envisager ce code lisp. Exemple d'utilisation: (dimattach 1) -> enlève les lignes d'attaches de la cotation sélectionnée (dimattach 0) -> remet les lignes d'attaches de la cotation sélectionnée Ces instructions pourraient être mises dans un bouton... (defun dimattach (b / ss elst xd) (cond ((and (eq (type b) 'INT) (or (zerop b) (eq b 1))) (princ "\nSélectioner une cotation.") (while (setq ss (ssget "_+.:E:S" '((0 . "DIMENSION")))) (setq elst (entget (ssname ss 0) '("ACAD")) xd (assoc -3 elst) ) (entmod (append (if xd (entget (ssname ss 0)) elst) (list (list -3 (cons "ACAD" (list (cons 1000 "DSTYLE") (cons 1002 "{") (cons 1070 76) (cons 1070 b) (cons 1070 75) (cons 1070 b) (cons 1002 "}") ) ) ) ) ) ) (princ "\nSélectioner une cotation.") ) ) (T (princ "\nLa fonction requiert l'argument entier 1 ou 0 ")) ) (prin1) )