Ramses

Merci Gérald pour cette réponse, cela fait un sacré temps que je n'ai pas touché au lisp, et déjà je ne maîtrise pas. C'est vrai, il y a du travail, surtout qu'il n'y a pas une seule multiligne qui est coupée par les autres, mais plutot, des mutilignes qui se coupent les unes par rapport aux autres. Merci beaucoup pour la démarche A très bientôt Yusuf

Bonjour, Oui les multilgnes supportent bien cela avec MLEDIT "croix fermée". Mais est-il possible d'automatiser celà ? :) Merci

Bonjour à tous, et merci pour ce lisp tout simplement fabuleux. Est-il possible au lieu d'avoir les multilignes comme ceci: http://img15.hostingpics.net/thumbs/mini_1139784501.jpg d'avoir des multilignes avec entrelacs comme ceci c'est à dire une fois en haut une fois en bas. http://img15.hostingpics.net/thumbs/mini_6769368102.jpg J'ignore si les multilignes d'AutoCAD acceptent cette possibilité. Merci

Oui c'est ça Et pour simplifier je veux que la largeur soit égale à 1 unité Merci

Bonjour à tous, J'espère que tous vous vous portez bien. Voilà j'ai des dessins d'objets 2D, chaque objet dans un fichier à part, je voudrais les redimensionner à la volée de sorte à leur attribuer tous une largeur ou longueur de 1 unité. J'ai fait une petite recherche dans le forum, j'ai rien trouvé sur "échelle" ou "redimensionner". Si quelqu'un pourrait m'aider je vous en remercie. Bonne journée tous

ça marche nickel. merci beaucoup gile.

salut gile, ça donne aussi nil. est-ce un rapport avec une variable système? je continue de chercher

Salut, Encore une question svp sur la fonction vl-directory-files dans mon chemin j'ai les 3 fichiers #1AAA. dwg et #2AAB.dwg et #A3AA.dwg (vl-directory-files "c:/chemin/" "#*.dwg" 1) donne ("#1AAA.dwg" "#2AAB.dwg" "#A3AA.dwg") je veux sélectionner les deux fichiers seulement c à dire contenant # + 1 chiffre + AA + 1 lettre je fais ceci (vl-directory-files "c:/chemin/" "`##`A`A*.dwg" 1) ca donne nil pourquoi? cette fonction ne reconnait pas les caractères génériques autres que *? merci

Merci beaucoup beaucoup gile pour ces explications détaillées. Le fonctionnement est bien clair maintenant. je m'en servirais dans le futur pour mes propres fonctions. Pour le fichier mstretch.lsp, si je saisis bien, en redéfinissant la fonction *error* localement (sans toucher aux fichiers acet-temp-segment, acet-sysvar-set et acet-sysvar-restore) je risquerais d'altérer le bon fonctionnement du lisp, n'est-ce pas? Et en gros il est conseillé de ne pas y toucher? C'est bien cela gile. merci merci

Salut à toutes et à tous, J'ai besoin de quelques eclaircissements sur l'utilisation de la fonction *error*, son fonctionnement, son utilité... et je voudrais savoir si c'est la solution pour ce que je vais dire. Si vous avez déjà jeté un coup d'oeil sur les lisps des express (en l'occurence mstretch.lsp, commande "etirer plusieurs entités"). Ce fichier contient dans sa première partie : (acet-error-init (list (list "cmdecho" 0 "highlight" 0 "dragmode" (getvar "dragmode") "osmode" 0 "cecolor" "6" "celtype" "CONTINUOUS" "limcheck" 0 ) T '(progn (acet-temp-segment nil nil nil 1) (acet-sysvar-set (list "cmdecho" 0));turn cmdecho off (command "_.redraw");do redraw (acet-sysvar-restore);re-set cmdecho back (princ) ;(command "_.redraw") ) ) ) apparement ce code a un rapport avec la fonction *error*. Ce que je veux c'est d'exécuter une commande (suppression d'un fichier temporaire) quand l'utilisateur annule la commande en cours de route par la touche echap par exemple, mais je ne veux pas trop changer le fichier lisp original. Une redefinition de la fonction *error* est-elle la solution pour mon besoin et comment opérérer?. merci pour vos explications

Merci pour vous tous c'est super. Et si je veux exécuter ce code, quand l'utilisateur appuira sur la touche "echap", sans être obligé de redefinir de fonction *error*, est-ce qu'il y a une solution, sinon c'est pas grave. merci merci merci [Edité le 10/4/2009 par Ramses]

Merci Bred, je n'ai pas que deux fichiers. vl-directory-files est très bonne et comment je fais pour les supprimer? un à un en traitant la liste ou je peux les effacer d'un seul coup?

Bonjour à toutes et à tous, Voilà j'ai des fichiers temporaires à supprimer. quand j'utilise ce bout de code ça marche pas. (vl-file-delete "C:\\Log-file\\fich-log*.dwg") mes fichiers portent les noms de fich-log-1 fich-log-2 est-ce à cause de l'étoile? et que faire donc? et merci

Salut, Merci beaucoup à vous, ça marche

Bonjour à tous, J'ai une liste de fichiers comme suit fichier3 fichier8 fichier9 fichier30 ... que je veux renommer en fichier3 > fichier1 fichier8 > fichier2 fichier9 > fichier3 fichier30 > fichier4 ... tout en generant un fichier texte de correspondance comme suit fichier3 renomme en fichier1 fichier8 renomme en fichier2 fichier9 renomme en fichier3 fichier30 renomme en fichier4 ... d'abord je veux etablir leur liste, mais j'arrive pas avec : (setq Nomfichier (substr (getvar "dwgname") 1 8)) (setq fichier (open "C:\\liste.txt" "w")) (write-line Nomfichier fichier) Avec ça à chaque ouverture de fichier il remplace l'ancien nom avec le nouveau (une seule ligne) Merci pour votre aide