Cadiste

de la bombe.... ;) ça fonctionne super... merci beaucoup... "Je ne comprend pas pourquoi tu fais appel à (entsel)" Parce que je ne maîtrise pas LISP, et j'avance par tâtonnement.. <_< maintenant, je vais essayé de faire qqe chose pour le renseignement du champ rotation pour des blocs ...

merci pour les infos, Je viens "d'adapter" la routine pour le calcul automatique d'une longueur de polyligne avec une table d'objets "TRONCON" sur le calque "AEP_TRONCON", je me rapproche mais par contre ça me renvoi ceci: ((lambda ( / js ent pt) (setq js (ssget '((0 . "LWPOLYLIGNE") (8 . "AEP_TRONCON")))) (repeat (setq n (sslength js)) (setq ent (entget (car (entsel)) (distance (cdr (assoc 10 ent)) (cdr (assoc 11 ent)) (ade_odsetfield ent "TRONCON" "LONGUEUR" 0 (car pt)) ) ) ) ) )) ; erreur: type d'argument incorrect: lselsetp nil Il ne trouve pas ma (mes) polyligne(s). la variable retourne non renseignée mais je n'ai pas de lselsetp ?? A quoi cela correspond'il?

Bonjour, Je reviens vers vous, je dois copier des propriétés d'objets (rotation, longueur)et je ne trouve pas comment faire en AutoLisp. Même en me documentant sur le LISP, je n'y arrive toujours pas. J'avais une première problématique résolue, pour copier des coordonnées X Y dans ces mêmes tables depuis des blocs, grâce au forum .. ;-) (ici le bloc HYDRAN dans le calque AEP_HYDRAN) Voici le code: ((lambda ( / js ent pt) (setq js (ssget '((0 . "INSERT") (2 . "AEP_HYDRAN") (8 . "AEP_HYDRAN")))) (repeat (setq n (sslength js)) (setq ent (ssname js (setq n (1- n))) pt (cdr (assoc 10 (entget ent))) ) (ade_odsetfield ent "HYDRANT" "X" 0 (car pt)) (ade_odsetfield ent "HYDRANT" "Y" 0 (cadr pt)) ) )) Je sais que je peux repartir sur la base de ce code pour renseigner: > la longeur d'objets liénaires (tronçons, branchements) > la rotation d'objets ponctuels (bloc vanne, bloc raccord) Comment je pourrais faire?

Oui, je le crains :-( En effet je suis sous MAP 2014, et l'ajout des ces données d'objets se font par le menu MAP... Je vais quand même utiliser les lisp pour créer des labels et je ferais le copier / coller.. cela me permettra au moins d'éviter les doublons.. Merci beaucoup pour ton aide.. ;-)

Pardon, oui ça y est je l'ai bien reçu, merci, pas de souci pour l'install. ça ne passe pas, l'appli me dit que le bloc ne contient pas d'attribut (en mode auto). J'ai l'impression qu'il a besoin d'un attribut depuis la définition du bloc et non sous forme de table

je t'ai envoyé un MP, tu l'as reçu ?

Oui c'est exactement ça, je tente de télécharger l'app depuis Autodesk Exchange Apps, mais je n'ai pas de session et mes filtres sur le serveur m'empêche d'en ouvrir une ... grrr Est ce que tu aurais la possibilité de me l'envoyer en zip stp ?

Pardon pour le retard, j'ai eu des empêchements.. J'utilise la moulinette de Gile, l'idée correspond à ce que je voudrais, j'obtiens bien des incréments avec préfixe. Par contre, > la lisp me génère des étiquettes et ne renseigne pas la table d'attributs du bloc > la lisp ne prend pas les objets à la volée, au vue du nombre (240 blocs) Je vous joint une image des propriétés, le champ a renseigné est IDRACCORD ici

Super !!! Ça marche .... Merci beaucoup !! En effet ça va plus vite ... ;-) Le code est programmé pour un bloc précis, je ferais la modif pour le lancer sur les autres blocs ... Merci beaucoup pour votre aide, je vais pouvoir me lancer dedans .. ;-) Merci

voici la première image

ça devrait être mieux là RenseigneAttributs.zip

je t'ai envoyé un MP

c'est pas mon image, j'espère que cela va marcher, c'est comme si j'avais des attributs sous la partie 'Avancé' et je souhaite le remplir avec le champ Position Xhttp://exchange.autodesk.com/autocadarchitecture/fra/online-help/ARCHDESK/2012/FRA/attachments/detail_components_cmu_property_palette_design_tab.png

j'avais mis une image ...grrrr je ne parviens pas à la mettre

Merci pour la réponse mais je n'ai pas 'insérer un champ' avec le clic droit, je souhaite juste remplir les champs X et Y automatiquement en fait (en bleu dans l'image)

Bonjour, Je voudrais créer automatiquement des identifiants pour dans des attributs de blocs. J'ai trouvé la lisp Increment.lsp mais ne fait q'une partie de ce que je voudrais, elle génère des labels au lieu de renseigner des attributs. Pour faire simple, je dispose de blocs avec attributs, je dois créer des identifiants sans doublons avec un préfixe et concaténer avec un incrément numérique. Par exemple, je dispose de 240 blocs RACCORD => RCD (préfixe) => RCD1 jusque RCD 204 automatiquement. Je pense qu'il faut modifier la lisp increment mais je ne sais pas comment faire, je débute dans ce code. Est ce que qqn aurait une idée svp?

Bonjour, Malgré mes recherches, je ne parviens pas à trouver mes réponses. Je souhaiterai renseigner automatiquement des attributs X et Y de blocs depuis les propriétés de l'objet, puisqu'Autocad le renseigne automatiquement. Par exemple, j'ai un bloc bouche à clé avec des attributs(COMMUNE, ADRESSE, DIAMETRE....X, Y..) et je souhaiterai renseigner ces champs X et Y en une manipulation sans passer par le copier coller depuis Position X et Position Y disponible dans la géométrie de l'objet. Est ce que qqn saurait comment faire svp? Je mets une illustration pour que se soit plus clair.