Patrick_35

Merci Didier J'ai horreur de recommencer dix fois la même chose, d'où les lisps. Tu as aussi les lisps de (gile) (que tu connais ? ;) )et de LeeMac qui est très prolifique @+

Ah oui, exact. Le test que j'avais fait était de renuméroter à 1 et de voir le nombre total et ça correspond avec TATT. Quand tu commences à 232, tu n'as pas tout. Il va falloir que je comprenne pourquoi. @+

Salut Didier L'idée est de créer une chaine qui se numérote à la suite et dès qu'on change quelque chose, que ça suive. Par exemple, en incendie (comme dans d'autres domaines), tu numérotes tes détecteurs à la suite. Comme tout chantier que se respecte, il y a des modifications tu du dois ajouter 3 détecteurs et pour bien faire, en début de boucle, histoire de reprendre toute la numérotation. Avec la chaine, je luis dit que j'ajoute trois détecteurs, que je les positionne au début de la chaine et miracle, toute la numérotation suit :D De plus, si tu fais des copies d'un élément de la chaine, et bien l'élément ajouté est incrémenté de 1 par rapport au dernier numéro de la chaine. Si tu effaces un élément de la chaine, tous les numéros depuis celui qui est supprimé sont renumérotés. @+

Tu as deux chaînes d'attributs. Une de 183 Attributs et une autre de 258. TATT vois bien le nombre d'attributs correspondant à chaque chaîne. Pour visualiser les liens, utilise VATT. @+

Je verrai cela plus dans ce style ; Une fois toutes vérifications faites, on peut affecter les commandes aux boutons (action_tile "copier" "(done_dialog 1)") ;lance la fonction copier (action_tile "couper" "(done_dialog 2)") ;lance la fonction couper (action_tile "cancel" "(done_dialog 0)") ;annuler (setq res (start_dialog)) (cond ((= res 1) (copieselection) ) ((= res 2) (couperselection) ) ) (unload_dialog dcl_id) ;décharge la boite de dialogue une fois terminé @+

Tu fais un zip du fichier. C'est quand même un comble qu'un site comme Cadxp ne permette pas de joindre des fichiers au format dwg. Va comprendre. @+

Salut Il faut fermer la boite de dialogue avant de lancer un (command ...) @+

Salut Il n'y a pas la pièce jointe ;) Par contre, par rapport avec ce que tu me dis C'est avec TATT et non IATT. IATT permet de renuméroter une chaîne d'attributs. Ensuite, pour visualiser la chaine d'attributs, tu as VATT qui dessine une polyligne sur le point d'insertion de chaque attribut et dans l'ordre. @+

Salut J'ai déjà fait des chaînes de plus de 300 attributs et tout fonctionne correctement. Si ce n'est pas confidentiel, tu peux mettre le dessin à disposition ? @+

Salut Tu as SYN @+

Quand j'ai fait JAV, j'avais le même problème. Faire défiler les fonctions au fil de l'eau dans une boite de dialogue. Problème : Les appels aux commandes font planter Autocad. Solution : Faire appel à ces fonction via le vlisp et ça marche. Exemple : (command "_.audit") --> (vla-auditinfo (vla-get-activedocument (vlax-get-acad-object))) Le chemin que je t'ai donné permet de définir des SCU. Pour activer un SCU nommé --> (vla-put-Activeucsc (vla-item (vla-get-usercoordinatesystems (vla-get-activedocument (vlax-get-acad-object))) "Mon_SCU")) Exemple extrait de l'aide pour ajouter un SCU (vl-load-com) (defun c:Example_UserCoordinateSystems() ;; This example finds the current UserCoordinateSystems collection and ;; adds a new UCS to that collection. (setq acadObj (vlax-get-acad-object)) (setq doc (vla-get-ActiveDocument acadObj)) (setq UCSColl (vla-get-UserCoordinateSystems doc)) ;; Create a UCS named "TEST" in the current drawing ;; Define the UCS (setq origin (vlax-3d-point 4 5 3) xAxisPnt (vlax-3d-point 5 5 3) yAxisPnt (vlax-3d-point 4 6 3)) ;; Add the UCS to the UserCoordinatesSystems collection (setq ucsObj (vla-Add UCSColl origin xAxisPnt yAxisPnt "TEST")) (alert (strcat "A new UCS called " (vla-get-Name ucsObj) " has been added to the UserCoordinateSystems collection.")) ) @+

Salut Je pense que c'est possible en vlisp tout en ayant une boite de dialogue ouverte. Ca se passe ici (vlax-dump-object (vla-get-usercoordinatesystems (vla-get-activedocument (vlax-get-acad-object))) T) @+

Et bien, pour quelqu'un qui n'avait pas grand chose ;) Ca commence à bien se remplir :D @+

On dessine de plus en plus sur Revit (Chemins de câbles) et je commence à voir de plus en plus d'implantations (luminaires, appareillage, etc...) et même du coulage. A un moment, on ne va plus jouer avec deux logiciels mais tout basculer sur un seul. D'autant que Caneco s'est aussi lancé dans l'aventure du BIM. @+

Salut Sauf si on migre vers le BIM :huh: @+

Salut +1 avec Didier. De plus, si on souhaite évoluer et cela quelque soit le langage de programmation, aussi bien avec l'aide qu'avec les forums, l'anglais devient vite incontournable. Heureusement, il y a des outils de traduction @+

Salut Deux exemples pour récupérer les valeurs d'attributs d'un bloc En Autolisp (defun valatt(ent / lst) (while (/= (cdr (assoc 0 ent)) "SEQEND") (setq ent (entget (entnext (cdr (assoc -1 ent)))) lst (cons (cdr (assoc 1 ent)) lst) ) ) (reverse (cdr lst)) ) (valatt (entget (car (entsel)))) En Vlisp (defun valatt(ent) (mapcar 'vla-get-textstring (vlax-invoke ent 'getattributes)) ) (valatt (vlax-ename->vla-object (car (entsel)))) @+

Merci pour le partage :D @+

Salut Là, c'est plus un problème de pc que d'autocad. Lance le gestionnaire des tâches et regarde quel logiciel prend le plus de ressources lors du copier/coller @+

Salut Le problème est-il le même sur un autre PC et avec le même dessin ? @+

Tu fais comme tu veux, mais une fois la machine lancé ;) @+

Salut Merci pour ton partage, mais pour éviter de s'éparpiller tu pourrais créer un sujet qui regroupe tous tes lisps mis à disposition. C'est plus facile à gérer et à retrouver. Cela n'empêche pas de nouveaux sujets pour indiquer que tu as ajouté de nouveaux lisps. @+

Salut Logiquement en ajoutant le moins dans cette liste de la fonction check_editreal (list "." "0" "1" "2" "3" "4" "5" "6" "7" "8" "9") --> (list "-" "." "0" "1" "2" "3" "4" "5" "6" "7" "8" "9") @+

D'après ce que j'ai lu, check_editreal vérifie si la valeur saisie est un réel Quand tu utilises un set_tile, l'argument est la clé + un string. Toi, tu fais clé + réel dans le set_tile. Il faut juste faire la conversion pour l'affichage. Tu peux conserver ton réel. @+

Oui, mais ta valeur avec le vlax-ldata-get est un réel. @+