balyoa

Bonjour, J'ai essayé l'outil de normalisation mais ca ne fonctionne pas pour mon cas. Je cherche à comparer deux dessins et à lister les différences mais uniquement au niveau des calques, des couleurs de calques et des types de ligne. Ça doit bien exister, je suis sous Map2010 et Covadis 11. Merci d'avance. Cordialement. Yoann

Bonjour, Savez-vous si il est possible de virer le gros icône "A" carré en haut à gauche sous Autocad 2010, ou le "M" sous Map2010. Cet icône et son menu ne me servent à rien et à cause de lui mes menus ne rentrent plus sur une seule ligne. Merci d'avance. Cordialement. Yoann

Bonjour, J'ai un problème sous Dwg Trueview 2010. Mes images au format ecw ne n'affichent pas (j'ai la mention "unreadable" dans la liste des xrefs). Pourtant j'ai installé le Object Enabler Raster Design 2010 pour Dwgtrueview, mais rien à faire. Merci d'avance pour votre aide. Cordialement. Yoann

Merci Lili je vais fouiller sur ces sites que je connaissais pour certains (notamment cben.net). Pour répondre à Didier, en effet je ne connais pas toujours le graphisme des symboles et je cherche des représentations "officielles" ou "normalisées". Mais si on ne peut plus rien demander ...... Bon week-end ... tout de même.

Bonjour, Je suis à la recherche de bibliothèques de symboles pour la réalisation de plans d'intérieur. J'ai déjà quelques éléments issus de Covadis, mais j'en cherche plus, et si possible avec nomenclatures et descriptions. Je cherche notamment des choses relatives à la sécurité des bâtiments (alarme anti-intrusion, sécurité incendie, etc...). Merci d'avance pour votre aide. Cordialement. Yoann

Merci Gile, ca marche nickel. Voilà ci-dessous le lisp modifié (avec un commentaire et le nom du talentueux auteur) : ;;; BATT (gile) ;;; Place l'attribut ALT du bloc POINT dans le meme calque que celui où est inseré le bloc POINT (defun c:batt(/ att bl doc sel tot) (vl-load-com) (setq doc (vla-get-activedocument (vlax-get-acad-object)) tot 0 ) (vla-startundomark doc) (if (ssget "x" (list (cons 0 "INSERT") (cons 2 "POINT"))) (progn (princ "\nTravail en cours...")(princ) (vlax-for bl (setq sel (vla-get-activeselectionset doc)) (foreach att (vlax-invoke bl 'getattributes) (if (= (vla-get-TagString att) "ALT") (progn (vla-put-layer att (vla-get-layer bl)) (setq tot (1+ tot)) ) ) ) ) (vla-delete sel) ) ) (vla-endundomark doc) (princ (strcat "\nModification de " (itoa tot) " attribut(s).")) (princ) ) Encore merci, bonne journée à tous. Yoann

Merci beaucoup,je teste lundi et je fais un feedback. Bon week-end. Yoann

Merci Patrick, Mais je ne développe pas en lisp, donc meme si j'ai compris où tu voulais en venir je n'arrive à transposer en lisp. Pourrais-tu me montrer ce que ca donne pour : - ne traiter que les blocs qui s'appellent "POINTS" - dans la boucle foreach choisir toujours l'attribut qui s'appelle "ALT" par exemple. Merci d'avance de ton aide. Bon week-end. Yoann

Rebonjour, Une dernière remarque, j'ai des blocs avec plusieurs attributs, et je ne souhaite traiter avec le lisp ci-dessus qu'un seul attribut, est-ce envisageable ? Merci et bonne journée. Yoann

Bonjour, J'avais le même problème, donc merci pour le lisp. Juste une modification : serait-il possible de pouvoir choisir les objets à traiter et/ou même mieux les calques à traiter ? Merci d'avance. Yoann

Bonjour, En effet, encore un lisp d'Olivier Eckmann qui m'a déjà débrouillé pas mal de problème avec ses lisp. Et il a trouvé le temps de me le modifier hier soir, donc je teste et si c'est ok je clos le sujet (en publiant la source modifiée si j'ai son autorisation). Merci de votre attention et bonne journée. Cordialement

Bonjour, Ne maîtrisant pas trop le lisp, j'ai un programme (qui marche bien) mais que je souhaiterais optimiser. Voilà ce que fait le programme : - dans mon dessin j'ai des blocs anonymes nommés *Uxxxx qui représentent des altitudes. - le programme remplace ces blocs par des blocs points topo (type covadis) avec matricule et altitude en attribut. Il récupère l'altitude dans le texte du bloc anonyme, ainsi que la position et la rotation du texte. Par contre le programme doit être lancé pour chaque calque, et écrit les blocs dans le calque courant, et les attributs dans les calques définis au sein du bloc point de remplacement. Je souhaiterais que le lisp puisse traiter plusieurs layers à la suite, et écrire les blocs et les attributs dans les layers des blocs anonymes d'origine, ou bien dans les layers à choisir. Je ne sais pas si c'est clair, mais voici le lisp en question : (defun C:toto ( / NomCalque JEU I f NbJeu Elt EltLst EltBlcName EntTxt TXT PT) (setq JEU (ssget (list (cons 0 "INSERT")))) (setq I 0 NbJeu (sslength JEU)) (setq f (open "c:\\pts.txt" "w")) (repeat NbJeu (setq Elt (ssname JEU I)) (setq I (1+ I)) (setq EltLst (entget Elt)) (setq EltBlcName (cdr (assoc 2 EltLst))) (if (= "*U" (substr EltBlcName 1 2)) (if (setq EntCercle (cdr (assoc -2 (tblsearch "BLOCK" EltBlcName)))) (if (= (cdr (assoc 0 (entget EntCercle))) "CIRCLE") (if (setq EntTxt (entnext EntCercle)) (if (= (cdr (assoc 0 (entget EntTxt))) "TEXT") (progn (setq TXT (cdr (assoc 1 (entget EntTxt)))) (setq PtBloc (cdr (assoc 10 EltLst))) (setq PtCercle (cdr (assoc 10 (entget EntCercle)))) (setq X (+ (car PtBloc) (car PtCercle))) (setq Y (+ (cadr PtBloc) (cadr PtCercle))) (setq Rot (cdr (assoc 50 (entget EntTxt)))) (setq Rot (- 0.0 (* 200.0 (/ Rot PI)))) (write-line (strcat (rtos X 2 4) "," (rtos Y 2 4) "," TXT) f) (command "-inserer" "PTSA" (list X Y 0.0) "" "" Rot (itoa I) TXT) (setq EntPTopo (entlast)) (setq PtTxt (cdr (assoc 10 (entget EntTxt)))) (setq X (+ (car PtBloc) (car PtTxt))) (setq Y (+ (cadr PtBloc) (cadr PtTxt))) (setq EntPTopoLst (entget (entnext (entnext EntPTopo)))) (setq EntPTopoLst (subst (cons 72 0) (assoc 72 EntPTopoLst) EntPTopoLst)) (setq EntPTopoLst (subst (cons 74 0) (assoc 74 EntPTopoLst) EntPTopoLst)) (setq EntPTopoLst (subst (cons 11 (list 0.0 0.0 0.0)) (assoc 11 EntPTopoLst) EntPTopoLst)) (setq EntPTopoLst (subst (cons 10 (list X Y 0.0)) (assoc 10 EntPTopoLst) EntPTopoLst)) (entmod EntPTopoLst) (entupd EntPTopo) ) ) ) ; Fin EntTxt ) ; Fin test du Cercle ) ; fin EntCercle ) ; Fin du texte du nom du bloc *U ) (close f) ) Si l'un d'entre vous a une idée sur la façon d'optimiser le lisp, je suis preneur. Je peux aussi faire passer un exemple de fichier Dwg à traiter par mail. Merci d'avance pour votre aide. Cordialement. Yoann [Edité le 25/1/2010 par balyoa]

Bonjour, J'essaye de générer un PDF à 600 Dpi à partir d'un Dwg avec une image de 400Mo en ref. - Sous Map2008, avec Dwgtopdf.pc3, ca passe mais les polices, notamment Arial sont "grasses" et illisibles. - Sous Map2010, malgré le bonus pack qui corrige le probleme des polices, là c'est l'image qui n'est plus du tout imprimé, j'ai le nom du chemin de l'image à la place en travers, et pas d'erreurs signalés par MAP lors de la génération. J'ai essayé en passant par l'export PDF et par l'impression sur dwgtopdf.pc3, même résultat. Ma config : XPsp3, core3duo, 3Go Ram, Map2008sp1+OEfix, Map2010sp1+OEfix, covadis11 Je précise que je ne peux utiliser PDFcreator et consorts car je dépasse la mémoire windows du spool (256Mo), merci Bill..... Merci d'avance pour vos réponses. Cordialement Yoann

Merci Gilles, ca a l'air de marcher nickel, peux-tu me dire d'où venait le problème pour info ? Je teste sur mes autres fichiers. Bonne journée

Salut Gilles, Je t'ai transmis mon fichier. Merci pour ton aide

Bonjour, J'ai moi aussi le même probleme : Commande: _rform ; erreur: type d'argument incorrect: stringp nil J'ai retourné le probleme dans tous les sens, avec fndshape, delshape, rform, purger, controler, superpurge, etc... rien n'y fait, toujours un shx manquant à l'ouverture. Merci pour votre aide si vous avez une autre piste

Bonjour, J'ai besoin d'ajouter une constante sur des altitudes sous forme de textes. J'ai déjà un lisp sous la main, qui marche assez bien (il me demande le la constante et le nombre de décimales en sortie). Le problème est que certaines altitudes ont un suffixe, qui caractérise l'altitude (ex : "252.18/rg" pour une altitude sur regard). Et pour ces altitudes, le lisp me vire le suffixe ce qui ne me convient pas. Donc si vous avez un autre lisp existant, ou une autre astuce. je peux bien sur publier le lisp si certains veulent essayer de l'améliorer. Le top serait que le lisp ne recherche que les altitudes qui contiennent 3 chiffres, 1 point, 2 chiffres, +un suffixe éventuel, afin d'éviter des constantes à des textes n'étant pas des altitudes. J'espère avoir été clair et vous remercie par avance pour votre aide. Cordialement. Balyoa

Bonjour, Je cherche à comparer les calques présents dans deux dessins, autrement que visuellement (j'ai 300 calques). Je souhaiterais comme résultat le noms des calques qui différent entre les deux dessins. Si vous avez une idée ou un lisp sous le coude, merci d'avance. Yoann

Merci beaucoup Gilles et Bonuscad, ca marche du tonnerre avec le lisp et superautoscipt ! Les 30 fichiers traités en 1/4 heure. Encore merci. Balyoa

Bonjour, Je voulais savoir si il était possible sous DWG TrueView de calculer des distances cumulées. Apparemment non, on ne peut mesurer que des segments droits à l'unité. Si quelqu'un a une idée ou bien un souhait pour la prochaine version du viewer. Merci d'avance. BY

Merci, j'essaye demain et je fais un feedback.

Admettons que je souhaite sélectionner dans le fichier "1.dwg" source, les calques nommés A, B, C pour générer le fichier "1s.dwg", les calques D, E, F pour générer le fichier "1h.dwg" et les calques G, H, I pour générer le fichier 1t.dwg.... et ainsi de suite pour les fichiers "2.dwg", "3.dwg", etc..... A quoi ressemblerait le script ? Merci d'avance

En fait j'ai une trentaine de fichiers, et pour chacun d'entre eux je dois en faire 3 dwg distincts en filtrant toujours sur les memes noms de calques.

Je ne peux filtrer que sur le nom de calques, et oui certains ont un préfixe commun. la proposition de lecrabe me parait très intéressante.

Merci , mais..... Mes dwg en sorties seront constitués de plusieurs calques, je ne souhaite pas un dwg par calque existant, mais un dwg par groupe de calques, nuance..... Encore merci pour vos propositions