cactus_ben

Bonjour, Existe-il un Lisp qui redéfini un bloc à partir d'un autre dessin. *meme fonction que le design center "redefinir" Merci

Bonjour Patrick, a quel endroit dans le lisp j'inscrit le DWG à utiliser pour le transfer des calques? Merci

Bonjour Bryce, En fait quand je test le lisp une seconde fois ça ne fonctionne pas Autocad me donne se message d'erreur: Choix de l'option incorrect. ; erreur: Fonction annulée

lorsque je parle de mise a jour je parle de faire une modification exemple: la couleur, type de ligne ou epaisseur de ligne. par contre dès que la couche a été préablement créer le lisp s'arrete immediatement. et oui si il etait possible de remplacer un nom de calque par un autre dans ce lisp ce serait génial. merci

Bonjour Voici donc un LISP que j'utilise pour créer des couches Civil. Le HIC est que presentement je fait des modification dans le fichier texte qui s'y réfère (en pièce jointe). Lorsque je le réactive dans un dessin pour faire une mise à jour des couches ça ne fonctionne pas, car les couches ont déja été créer. Y aurait-il un moyen pour régler ce problème? merci ;| Fonction COUCHE-STANDARD-CIVIL Description : Fonction qui crée la liste des couches contenues dans le fichier couches-standard-CIVIL.txt. Variables locales : f-cou-stan : du fichier des couches standards n-fich-cou : nom interne du fichier li : lignes du fichier nom-cou : nom de la couche couleur : couleur de la couche typel : type de ligne de la couche de : description de la couche |; (defun c:couche-standard-CIVIL ( / f-cou-stan li nom-cou couleur typel de) (setvar "cmdecho" 0) (setq f-cou-stan (findfile "COUCHES-STANDARD-CIVIL.TXT")) (if (not f-cou-stan) (progn (alert "Le fichier COUCHES-STANDARD-CIVIL.TXT est introuvable") (exit) ) ) (setq n-fich-cou (open f-cou-stan "r")) (setq li (read-line n-fich-cou)) (while li (setq li (read li)) (setq nom-cou (car li)) (setq couleur (cadr li)) (setq typel (caddr li)) (setq de (cadddr li)) (command "_.-layer" "_n" nom-cou "_c" couleur nom-cou "_lt" typel nom-cou "s" de nom-cou "") (setq li (read-line n-fich-cou)) ) (close n-fich-cou) (alert "Les couches standards CIVILS ont été créées") (princ) ) couches-standard-CIVIL.txt

Bonjour Je me demandais si il était possible de créer un lisp qui se réfererait a un document txt pour faire des changements de couches et création de nouvelles couches en meme temps. Pour le moment j'utilise le script suivant: _FILEDIA 0 _-layer _thaw 0 _SET 0 ; ; ;;;;;;;;;;;;;; DEBUT DE SEQUENCE UNLOCK ALL ;;;;;;;;;;;;;; ; ; _unlock * ; ; ;;;;;;;;;;;;;; DEBUT DE SEQUENCE CREATION LAYER ALARME INCENDIE ;;;;;;;;;;;;;; ; ; _NEW ;;;;;;;;;;;;;;; CALQUES DESUETS EXISTANTS ;;;;;;;;;;;;;;; E-ALA-EQP,E-ALA-ATT,E-ALA-CAB,E-LEG,E-TXT _NEW ;;;;;;;;;;;;;; CALQUES NORMALISÉS EXISTANTS ;;;;;;;;;;;;; E-E-ALA-EQP,E-E-ALA-ATT,E-E-ALA-CAB,E-E-LEG,E-E-TXT _color 1 E-E-ALA-EQP _color 7 E-E-ALA-ATT,E-E-LEG,E-E-TXT _COLOR 20 E-E-ALA-CAB _lweight .20 E-E-ALA-EQP _LWEIGHT .13 E-E-ALA-ATT _LWEIGHT .15 E-E-ALA-CAB,E-E-LEG,E-E-TXT _ltype continuous E-E-ALA-EQP,E-E-ALA-ATT,E-E-ALA-CAB,E-E-LEG,E-E-TXT ; ; ;;;;;;;;;;;;;; DEBUT DE SEQUENCE DE REMPLACEMENT DE CALQUES INDESIRABLE ALARME INCENDIE ;;;;;;;;;;;;;; ; ; _-laymrg _NAME ;;;;;;;;;;;;;;; CALQUE À REMPLACER ;;;;;;;;;;;;;;; E-ALA-ATT _NAME ;;;;;;;;;;;;; CALQUE DE REMPLACEMENT ;;;;;;;;;;;;; E-E-ALA-ATT _YES _NAME ;;;;;;;;;;;;;;; CALQUE À REMPLACER ;;;;;;;;;;;;;;; E-ALA-CAB _NAME ;;;;;;;;;;;;; CALQUE DE REMPLACEMENT ;;;;;;;;;;;;; E-E-ALA-CAB _YES _NAME ;;;;;;;;;;;;;;; CALQUE À REMPLACER ;;;;;;;;;;;;;;; E-ALA-EQP _NAME ;;;;;;;;;;;;; CALQUE DE REMPLACEMENT ;;;;;;;;;;;;; E-E-ALA-EQP _YES _NAME ;;;;;;;;;;;;;;; CALQUE À REMPLACER ;;;;;;;;;;;;;;; E-LEG _NAME ;;;;;;;;;;;;; CALQUE DE REMPLACEMENT ;;;;;;;;;;;;; E-E-LEG _YES _NAME ;;;;;;;;;;;;;;; CALQUE À REMPLACER ;;;;;;;;;;;;;;; E-TXT _NAME ;;;;;;;;;;;;; CALQUE DE REMPLACEMENT ;;;;;;;;;;;;; E-E-TXT _YES ; ; ;;;;;;;;;;;;;; DEBUT DE SEQUENCE LOCK REFERENCES EXTERNES ;;;;;;;;;;;;;; ; ; _-LAYER _LOCK RÉFÉRENCE-ÉCLAIRAGE,RÉFÉRENCE-PRINCIPALE-BB,RÉFÉRENCE-PRISES-ET-SERVICES,RÉFÉRENCE-VENTILATION-RÉGULATION,RÉFÉRENCE-PLOMBERIE filedia 1 Je ne suis pas sur d'etre assez clair. si vous avez des questions ou suggestions svp m'en faire part :) Merci

J'ai finalement trouvé une solution. En ouvrant les options / affichage Et en décochant ''afficher les infobulles'' et ''afficher les infobulles de survol'' ya plus de lézart. Merci tout de meme.

Bonjour a tous, Je me demandais si il existe une variable quelqu'onque qui pourrait regler la lenteur de l'ouverture de la boite de dialogue XREF. Lorsque je l'ouvre une barre de load ''image de synthese'' apparait dans le bas et c'est interminable. J'ai plusieurs fichiers .dwg que je dois détacher les images dites (non référencé). Quelqun aurait une solution? merci

Un gros merci ça fonctionne!!!

salut a tous, Voila j'ai découvert un lisp nommé Steal qui remplace en quelque sorte le design center. Il semblerait que ce soit possible de créer des routines affin que l'on puisse automatiser cette fonction. au lieu d'ouvrir une boite de dialogue etc... Le hic est que je ne suis pas un AS en code, script etc... Est ce que quelqun pourrait m'expliquer comment je peux utiliser le "Item List" de la fonction Voila le lien vers le lisp en question ainsi que toute les explications. http://www.lee-mac.com/steal.html merci. Et en esperant que ma trouvaille pourra vous etre utile

Salut le crabe. J'ai déja ce lisp. Je me rend compte que je n'ai pas été très clair dans ma demande :P. Ce n'est pas le chemin des xrefs que je veux changer en relatif. c'est les hyperliens que comportent mes blocs. (commande = _hyperlink) Pour le moment ce que je dois faire c'est de le rentrer manuellement exemple: changer le chemin: c:\n'importe ou\dossier quelquonque\dessin-bidon.dwg chemin changer manuellement: ..\dossier quelquonque\dessin-bidon.dwg Je ne suis pas sur que ce sois possible, j'ai fais plusieurs recherches sur le net et je ne trouve rien. merci.

Bonjour à tous, J'ai un petit probleme ici. J'ai une 100aines de .dwg qui seront bientot migré sur un autre serveur. Heureusement tous les Xrefs sont ''en relatif''. Par contre, plusieurs liens dans le dessin ne le sont pas. Existerait-il un moyen de les changer en relatif sans le faire manuellement? (lisp ou script) merci

merci bien!

merci bien!

Bonjour, J'aime beaucoup le lisp inscrit par bryce au post #2. Ma question: Y aurait-il un moyen pour attribuer un chemin affin que le lisp retrouve automatiquement le fichier txt auquel il se rapporte sans ouvrir une boite de dialogue? cela me serait tres utile merci!