Patrick_35

Salut En lisant le lisp, je ne trouve pas le point de destination ? Ta boucle tu pourrais la faire sur PB en non sur PA=PB (while PB ....) Lors d'un (setq PB (getpoint "\n...."), si tu fais entrée, PB prend la valeur nil, ce qui du coup te fait sortir de ta boucle

Salut Tu as quatre manières de faire des boucles (voir cinq avec la méthode récursive) La première avec le while que tu retrouves en vb (de mémoire un while...wend) ex : (setq test 1) (while (<= test 10) ..... (setq test (1+ test)) ) La seconde avec le foreach qui parcours une liste et qui le transmet dans une varaible ex : (foreach n '(a b c) (print n)) La troisième avec repeat ex : (setq a 10 b 100) (repeat 4 (setq a (+ a 10)) (setq b (+ b 100))) La quatrième avec la fonction mapcar qui appelle une fonction sur une liste ex : (setq a 10 b 20 c 30) (mapcar '1+ (list a b c)) Et je pourrai en rajouter un dernier avec vlax-for, mais on passe au vlisp ;) @+ :o Ah ben, je viens de me faire griller par (gile) :cool: [Edité le 8/6/2006 par Patrick_35]

Je l'ai retrouvé dans ce Post Je me suis trompé sur l'auteur. C'est Fabcad, excuse moi d'avance, mais il est vrai que notre ami Bonus nous a habitué à tant et de si bon lisps @+

Si, mais c'est - et non _ Je sais que bonus a fait un lisp la dessus pour faire une commande groupé sur -attedit quelque part dans le forum @+

Pas de solution sauf d'effacer la poly ou le bloc Ca me chagrine, ce soir je modifie le lisp pour ajouter la fonctionn eff-rea @+ [Edité le 8/6/2006 par Patrick_35]

Salut Oui, avec la commande -attedit @+

Salut Tu sélectionnes ta chaîne d'attributs avec la fonction LATT et tu fais r pour retirer et tu enlèves ceux qui te gêne et tu peux ensuite refaire a pour ajouter, etc... @+

Salut Merci pour ton compliment Oui, tu peux lier autant d'attributs que tu souhaites, ce qui créé ce que j'appelle une chaîne d'attributs. Dans le cas d'un chaîne de type somme, le total est le premier attribut Par contre, on ne peux pas lier de chaînes entre-elles. Quand on fait une copie d'un bloc dans lequel un/des attribut(s) est (sont) lié(s), la liaison est conservé et appliqué aux attributs des copies. Idem en ce qui concerne les effacements mais dans le sens inverse Et j'ai constaté que la version 6.10 est complémenent buggé avec les textes. J'ai donc supprimé cette possibilité et je reviendrai dessus plus tard et plus fini Donc maintenant, c'est la version 6.20 ps :j'ai un peu l'impression de faire comme (gile) dans l'évolution de ses indices ;) @+

Salut Avec lequel ? Et puis, toutes les sources et idées sont bonnes à prendre. Ce qui est bien, c'est que le demandeur a le choix et qu'il a donc plus de chance de trouver ce qu'il cherche réellement @+

La seule solution que je vois est dans les registres Dans HKEY_CURRENT_USER +Sofware +Autodesk +Autocad +R15.0 --> ou 15.1 ou 16.0 Version d'autocad +ACAD-1001:40C --> (sur mon ordi) mais il n'y a qu'une seule possibilité +Profiles +< < Profil sans nom > > --> ou si profil définit, se mettre dedans +Dialogs --> C'est la config de toutes les boites de dialogues. Sur ma version, je n'ai rien trouvé sur _properties, mais peut-être sur une 2006 ? @+ [Edité le 8/6/2006 par Patrick_35]

Salut Sans vouloir embêter Autospeed, tu as ce ce lisp qui vient de ce post @+

Salut (gile) Pourquoi du vlx ??? Si tu laisses le lisp en clair, ça devrait suffir comme souce ! @+

Non, c'est plutôt la fonction phtexte qui n'est pas chargée @+

Salut Pour faire un calcul, il faut des nombres, soit des entiers ou des réels Pour le "2.5", donc un (atof "2.5), sinon, pas besoin de convertir @+

Bon, on va un peu plus loin avec le lisp. Il prend maintenant en compte les textes. On peut donc mélanger du texte et des attributs, faire que du texte ou que des attributs --> Version 6.10 @+

Il n'y a pas de raison ;) C'est rellativement simple, quand tu fais ta sélection pour lier des attributs, tu cliques dessus comme pour choisir une ligne ou autre Qu'importe le nom du bloc, le nom de l'étiquette. je le traite comme si c'était un texte @+ ps: avec la prog, on reussi à faire des choses qui dépasse ce que l'on pensait faisable ;)

Salut Patrick J'ai déjà fais un tour sur le Cadxp Anglais, mais comme tu était connecté je ne sais plus avec quel site et que les questions/réponses abondaient et maîtrisant l'anglais comme une vache espagnole, ça décourage assez vite. @+

Salut Il est aussi possible de récuperer les infos d'excel directement par le lisp, et il y a pleins d'exemples sur le site, mais de là à faire correspondre une cellule avec un attribut en lien directe ! Je pourrai dire oui vec Autocad, mais l'inconnu c'est Excel. Inclut-il des réacteurs ou une autre appellation s'y approchant ? @+

Non, ce n'est pas normal et c'est peut-être pour ça que les liens ne se refont pas Fais-moi parvenir ton dessin Dans le lisp rea-att, tu as ces deux lignes (vla-put-textstring entt (strcat "S=" (rtos (/ (vla-get-area obj) 10000) 2 2) "M2")) La traduction vla-put-textstring entt --> Ecrire le texte dans la variable entt (qui correspond au texte à modifier) strcat --> concacténer une chaine de caracactères "S=" --> Ce que tu souhaites supprimer rtos --> convertir un réel en chaîne de caractères vla-get-area obj --> lire l'air de la variable obj ( qui correspond à la polyligne) / --> diviser 10000 --> suite de diviser par 100000 2 2 --> suite de rtos qui correspond au mode décimal sur une précision de deux décimals "M2" --> du texte @+

Salut c'est le code dxf 8, donc un (cdr (assoc 8 bl)) pour le nom du calque Je t'invite à regarder l'aide d'autocad sur les codes dxf @+

Je ne peux que rejoindre (gile) et Bonus malgré tes excuses. Il faut savoir être patient et prendre le temps d'appendre. Moi, j'ai commencé uniquement avec le guide de personnalisation de la version 12 et au glannage sur la toile de différents lisp dans lequel j'ai pris le temps de comprendre comment cela fonctionnait et sans aucune aide, contrairement à ce forum Des personnes ont la gentillesse de prendre de leur temps et de leurs énergie pour te répondre, et en retour, ils ne demandent qu'un merci. On ne saurait être plus altruiste Pour en arriver au niveau ou je suis et sans pour autant faire du lisp tous les jours, il m'a fallu 15 ans d'autocad Il faut prendre le temps au temps. Autocad est complexe à comprendre déjà par les codes dxf, puis autolisp pour terminer au vlisp Rome ne s'est pas fait en un jour ;) Sans rancune @+

Merci esbe, c'est gentil, mais je ne suis qu'un homme ;) qui s'amuse avec la prog et je trouve les réacteurs avec les possibilitées que ça offre passionnant Un merci et donner un peu de son temps pour les autres suffit Bon, donc correction d'un dernier bug (j'espère malgré tous mes tests :P ) concernant les copies fenêtres ou capture --> Version 6.04 @+

:casstet: :casstet: :casstet: :casstet: :casstet: :casstet:

Ah oui, c'est exact. Excuse moi, je pensais l'avoir laissé en clair. @+

Salut Il n'y a rien de protégé. Le lisp est en clair :exclam: Ah, si, seulement un mot de passe afin d'éviter que n'importe qui fasse n'importe quoi, mais qui est donné avec le lien pour télécharger @+