Maxime063

Bonjour, Sinon, plutôt que d'enregistrer-fermer-ouvrir, la commande "REGNTOUT" ne suffit pas après le changement de "psltscale" ? Amicalement.

Bonjour @yusukens82, Il faut aussi savoir se lancer, les 2 références que luna à donné m'ont effectivement fait commencer, et comme tu le voit, la communauté est là pour aider. Il y à 1 an je ne connaissait rien au lisp, mais une bonne connaissance d'autocad, et avec le temps, à force de s'imprégné de l'expériences des membres on arrive à progresser. Personne ne vas te juger parce que tu essais de faire un bout de code toi-même qui ne fonctionne pas. par contre, le copié collé n'aide en rien à l'apprentissage. Amicalement.

Merci pour cette précision @Luna, En effet, je n'ai pas pensé qu'on pouvait faire une capture... c'est toute la complexité de la chose, se mètre dans la peau de l'utilisateur sans prendre en compte ses propres habitudes. En tout cas merci pour cette précision, du coup ci-dessous le code qui sera plus claire et plus fonctionnel. (defun c:prop ( / jeusel1 jeusel2 ) (setq jeusel1 (entsel "\nChoix de l'entitée de référence\n") jeusel2 (ssget) ) (command "_MATCHPROP" jeusel1 jeusel2 "") (command "_erase" jeusel1 "") ) Amicalement.

Bonjour @didier En effet, "_MATCHPROP" est bien plus intéressant, j'y ai pensé qu'une fois envoyé. J'ai simplement pensé qu'avec le (ssget ":S") suffit pour ne sélectionner qu'une seule entité, et n'ayant pas d'informations sur le nombre d'entités qui doivent recevoir les propriétés, j'ai pensé judicieux (peut-être à tord) de faire ça, mais j'avoue ne même pas avoir pensé au entsel. Ps : J'ai édité le code avec "_MATCHPROP"

Bonjour, Ce code devrait faire l'affaire (defun c:prop ( / jeusel1 jeusel2 ) (setq jeusel1 (ssget ":S") jeusel2 (ssget) ) (command "_MATCHPROP" jeusel1 jeusel2 "") (command "_erase" jeusel1 "") ) Amicalement

Bonjour, Je viens de tester, chez moi aucun soucis avec ce plan. Je pense pas que ça vienne du gabarit ou même du dessin. Amicalement.

Salut, Sinon autre alternative, tu as le code de lee mac ;;------------------------=={ Areas to Field }==------------------------;; ;; ;; ;; This program allows a user to create an MText object containing a ;; ;; Field Expression referencing the area, or sum of areas, of one or ;; ;; more selected objects. ;; ;; ;; ;; Upon issuing the command syntax 'A2F' at the AutoCAD command-line, ;; ;; the user is prompted to make a selection of objects for which to ;; ;; retrieve the area; if more than one object is selected, the ;; ;; cumulative area for all objects will be displayed by the resultant ;; ;; MText Field. ;; ;; ;; ;; Following object selection, the user is prompted to pick a point ;; ;; at which to create the MText Field. If the specified point resides ;; ;; within an AutoCAD table cell, the program will populate the table ;; ;; cell with the appropriate Field Expression. ;; ;; ;; ;; The Field will display the sum of the areas of the selected ;; ;; objects, formatted using the Field formatting code specified at ;; ;; the top of the program - this formatting code may be altered to ;; ;; suit the user's requirements. ;; ;; ;; ;;----------------------------------------------------------------------;; ;; Author: Lee Mac, Copyright © 2014 - www.lee-mac.com ;; ;;----------------------------------------------------------------------;; ;; Version 1.3 - 2014-07-17 ;; ;;----------------------------------------------------------------------;; (defun c:a2 ( / *error* fmt inc ins lst sel str ) (setq fmt "%lu6%qf1") ;; Field Formatting (defun *error* ( msg ) (LM:endundo (LM:acdoc)) (if (not (wcmatch (strcase msg t) "*break,*cancel*,*exit*")) (princ (strcat "\nError: " msg)) ) (princ) ) (if (and (setq sel (ssget '((0 . "ARC,CIRCLE,ELLIPSE,HATCH,*POLYLINE,REGION,SPLINE")))) (setq ins (getpoint "\nPick point or cell for field: ")) ) (progn (if (setq tmp (ssget "_X" (list '(0 . "ACAD_TABLE") (if (= 1 (getvar 'cvport)) (cons 410 (getvar 'ctab)) '(410 . "Model") ) ) ) ) (repeat (setq idx (sslength tmp)) (setq tab (cons (vlax-ename->vla-object (ssname tmp (setq idx (1- idx)))) tab)) ) ) (if (= 1 (sslength sel)) (setq str (strcat "%<\\AcObjProp Object(%<\\_ObjId " (LM:ObjectID (vlax-ename->vla-object (ssname sel 0))) ">%).Area \\f \"" fmt "\">%" ) ) (progn (repeat (setq idx (sslength sel)) (setq lst (vl-list* "%<\\AcObjProp Object(%<\\_ObjId " (LM:ObjectID (vlax-ename->vla-object (ssname sel (setq idx (1- idx))))) ">%).Area>%" " + " lst ) ) ) (setq str (strcat "%<\\AcExpr " (apply 'strcat (reverse (cdr (reverse lst)))) " \\f \"" fmt "\">%" ) ) ) ) (LM:startundo (LM:acdoc)) (if (setq tmp (LM:getcell tab (trans ins 1 0))) (apply 'vla-settext (append tmp (list str))) (vla-addmtext (vlax-get-property (LM:acdoc) (if (= 1 (getvar 'cvport)) 'paperspace 'modelspace)) (vlax-3D-point (trans ins 1 0)) 0.0 str ) ) (LM:endundo (LM:acdoc)) ) ) (princ) ) ;; ObjectID - Lee Mac ;; Returns a string containing the ObjectID of a supplied VLA-Object ;; Compatible with 32-bit & 64-bit systems (defun LM:ObjectID ( obj ) (eval (list 'defun 'LM:ObjectID '( obj ) (if (and (vl-string-search "64" (getenv "PROCESSOR_ARCHITECTURE")) (vlax-method-applicable-p (vla-get-utility (LM:acdoc)) 'getobjectidstring) ) (list 'vla-getobjectidstring (vla-get-utility (LM:acdoc)) 'obj ':vlax-false) '(itoa (vla-get-objectid obj)) ) ) ) (LM:ObjectID obj) ) ;; Get Cell - Lee Mac ;; If the supplied point lies within a cell boundary, ;; returns a list of: (<VLA Table Object> <Row> <Col>) (defun LM:getcell ( lst pnt / dir ) (setq dir (vlax-3D-point (trans (getvar 'viewdir) 1 0)) pnt (vlax-3D-point pnt) ) (vl-some '(lambda ( tab / row col ) (if (= :vlax-true (vla-hittest tab pnt dir 'row 'col)) (list tab row col) ) ) lst ) ) ;; Start Undo - Lee Mac ;; Opens an Undo Group. (defun LM:startundo ( doc ) (LM:endundo doc) (vla-startundomark doc) ) ;; End Undo - Lee Mac ;; Closes an Undo Group. (defun LM:endundo ( doc ) (while (= 8 (logand 8 (getvar 'undoctl))) (vla-endundomark doc) ) ) ;; Active Document - Lee Mac ;; Returns the VLA Active Document Object (defun LM:acdoc nil (eval (list 'defun 'LM:acdoc 'nil (vla-get-activedocument (vlax-get-acad-object)))) (LM:acdoc) ) (vl-load-com) (princ) ;;----------------------------------------------------------------------;; ;; End of File ;; ;;----------------------------------------------------------------------;; Amicalement.

Bonjour, que voulez vous dire par ?? Si jamais le dessinateur ne veux pas dessiner avec les largeurs de lignes affichées a l'écran, il es possible d'affecter une "épaisseur de ligne" et de passer la variable "LWDISPLAY" sur inactif. Avec ceci il sera possible d'affecter des épaisseurs de lignes sur le dessin en pensant bien à cocher la case lors de l'impression sur le traçage des épaisseurs de lignes. Amicalement.

Salut, Pour ma part, ne travaillant pas avec la saisie dynamique et au clavier, il me semble plus simple de taper "dt" (distance) et espace pour entrer plutot que "_MEASUREGEOM" qui agit en boucle (un "espace" et un "echap" de plus). Mais les 2 commandes se valent, question d'habitude 😊

Bonjour, tu as des changements de vue ? Pour ma part je navigue entre le scu général et le scu vue en tapant simplement "SG" ou "SV" et ça me suffit. Il est aussi possible d'écrire un bout de code qui te changera automatiquement dans le scu nommé "Gauche" automatiquement comme l'exemple précédant en forçant un nom de scu fixe. Amicalement.

Bonjour, Pour ma part le moyen le plus simple est de réaliser un CUIX avec les personnalisations de l'espace de travail, puis pour retrouver les emplacements des icones une capture d'écran à fait le job Amicalement

Salut, A savoir que si ton style de texte à une hauteur = 0 tu auras la possibilité de le modifier dans ta définition d'attribut

Bonjour, Donc si je récapitule.. ces lignes sont sélectionnables et modifiables sur un poste, mais après envoie elles n'apparaissent plus ?? Il manque une information dans l'équation la. Un redémarrage ou une régen / contrôler à déjà était effectué ? Ce sont de vraies lignes ou des éléments covadis, Mline etc

Oui c'est un petit soucis qu'on rencontre tous, les dwg ne sont pas permis dans les envoies... bref <_< Je n'ai pas réussi à reproduire ce problème, cependant voici la méthode que je conseille https://autode.sk/3cAACfN

Il faut le compressé pour pouvoir l'envoyer

A mon avis juste avec les vidéos et sans dwg à exploiter, je dirai que c'est la détection de contour associatif qui déconne lors du déplacement. Pour ce genre de chose je préfère utiliser "Contour" pour faire la détection d'ilot puis ensuite une hachure en sélectionnant le contour crée au préalable.

Pour commencer, il me semble que les 2 vidéos sont identiques. J'ai déjà constaté des problèmes dans la génération de certaines hachures lorsque je suis pas en SCU Général donc à vérifier. En ce qui concerne les messages, il faut vérifier s'ils sont activés dans les paramètres. Pour ma part j'ai dus aller voir dans les spams pour les approuvés.

Bonjour, Est-il possible d'avoir un plan avec une hachure qui présente ce problème ?

Bonjour, Il arrive parfois que la sélection par point soit défectueuse pour une hachure solide. Un conseil qui évitera que certaines détection d'ilots de hachures est un mauvais comportement c'est simplement de faire la commande "contour" Par la suite il suffira de vérifier dans un premier temps le que ça corresponde bien au contour souhaité, et ensuite faire une sélection de hachures par objets

Salut, Pour ma part ne n'ai pas de différences en changeant de dessins via les onglets autocad ou par windows. Par habitudes, j'utilise plutôt Alt+Tab pour changer de dessins et là encore, pas de différences.

Bonjour, Quand vous parlez de changer le style d'affichage, on parle du nom de la hachure ou simplement le rendu visuel de la hachure ? Dans cette 2ème option, il suffit de faire la commande "HATCHSETORIGIN" et de sélectionner un point dans l'emprise de la hachure.

Covadis à disposition ? Qu'en est-il de la décomposition des polylignes 3D puis joindre ?

Il suffit de créer un bouton qui passe la variable de 1 => 0 et de 0 => 1 J'ai fais quelque chose du genre pour une autre variable, si tu veux je te transmet le code pour cella

Bonjour, Pour palier à l'élévation de l'objet dans les accroches objets, il suffit de modifier la variable "OSNAPZ" = 0 l'accroche va prendre le Z de l'objets, et = 1 l'accroche prendra le Z du SCU

Si vous n'avez pas le module Covadis alors la 1ère option n'est pas réalisable, cependant on peut exploiter la décomposition. Apres décomposition de la polyligne 3D en lignes, il suffit d'aller dans les propriétés et modifier les valeurs Z-départ=0 et Z-fin=0 Puis joindre toutes les lignes, ce qui va donner une polyligne