Gilles1

Bonjour à toutes et à tous. Tout d'abord, je vous souhaite une bonne nouvelle année. Voici mon souci: J'avais cru comprendre qu'en attachant un fichier pdf dans un projet via le gestionnaire de références externes (attacher le pdf) que ce fichier pdf était incorporé au projet. En clair, si j'ouvre le projet sur un autre micro sur lequel le pdf attaché n'est pas présent, je veux voir affiché mon pdf. Or cela ne semble pas être le cas.J'ai envoyé par mail un projet et le pdf attaché ne s'affiche pas :casstet: Est-ce normal? Et comment faire pour que cela fonctionne? Merci de votre aide.

XP pro sp3 Orange winrar Tout est OK Cordialement.

Merci Lilian.

Re, Merci Lilian pour ta vidéo. J'ai réussi du 1er coup, exceptionnel :exclam: La modification du bloc est opérationnelle dans le dessin courant. Quand j'ouvre un autre fichier comportant aussi le même bloc Nord, le wipeout n'apparait pas. Est-ce normal et comment faire pour que la modification du bloc soit générale et définitive ?

Re, Ok, çà marche. Mais je perd les icones. Normal? Je bloque sur "dessine ton Wipeout" J'ai ouvert mon bloc avec l'éditeur de bloc, après je ne sais pas faire. Peux-tu expliquer ?!?!

Bonjour Lili2006. Merci pour tes réponses. Peux-tu développer, stp. Le fichier proposé par Eric est un .cui. pour Acad2006et 2007. AvecAcad2011, il est nécessaire d'avoir un .cuix :casstet: Comment faire?

Bonjour à toutes et à tous. Existe-t'il une commande Autocad qui agisse comme le fait "text Mask" des Express Tools sur les textes mais avec un bloc? Je voudrais, par exemple, créer un masque sous mon bloc Nord. 2ème question, est-ce que les Express Tools 2011 ont ètè traduits? Moi, je n'ai encore rien trouvé sur le net. :casstet: Merci pour vos réponses. Cordialement, Gilles.

OK, d'accord. Sur mon acad2011, je suis obligé d'aller changer une première fois la valeur pour mettre en Solid, après, le code fonctionne. Merci pour ta solution, Fraid ;)

Bonjour. Peut être dois-tu désactiver les propriétés rapides en bas de ton écran à gauche. Cordialement.

Bonjour à toutes et à tous. Merci Fraid pour ce code qui fonctionne, mais il utilise le type de hachures prédéfini. Est-ce possible de forcer dans le code l'utilisation du motif "solid" ? Non, je ne suis pas faché avec l'outil hachures, mais moins j'utilise de commandes pour faire un truc, mieux je me porte :cool: Merci Didier pour ta réponse, je ne pense pas que l'accrochage au centre soit utile pour cette utilisation. Cordialement, Gilles

Bonjour à toutes et à tous. J'ai glané je ne sais plus où ce lisp (et j'en remercie encore son auteur) qui me permet de tracer une croix dans un cercle en sélectionnant celui ci, très pratique pour ce que je fais. (defun c:croix (/ sel i obj ent) ;; Trace une croix dans le cercle (defun trc_cercle (obj) (setq d (/ (cdr (assoc '40 obj)) (sqrt 2.0)) ct (cdr (assoc '10 obj))) (entmake (list '(0 . "LINE") (cons '10 (mapcar '+ ct (list d d 0))) (cons '11 (mapcar '- ct (list d d 0))) ) ) (entmake (list '(0 . "LINE") (cons '10 (mapcar '+ ct (list d (* -1 d) 0))) (cons '11 (mapcar '- ct (list d (* -1 d) 0))) ) ) ) ;; Trace une croix dans un rectangle (defun trc_rect (obj) (setq obj (vl-remove-if-not '(lambda (x) (= (car x) 10)) obj)) (entmake (list '(0 . "LINE") (nth 0 obj) (cons '11 (cdr (nth 2 obj))) ) ) (entmake (list '(0 . "LINE") (nth 1 obj) (cons '11 (cdr (nth 3 obj))) ) ) ) ;; Fonction principale (setq i -1 sel (ssget '((-4 . " (0 . "CIRCLE") (0 . "LWPOLYLINE") (-4 . "OR>") ) ) ) (if sel (while (setq i (1+ i) obj (ssname sel i)) (setq obj (entget obj) ent (cdr (assoc '0 obj))) (cond ((= ent "CIRCLE") (trc_cercle obj)) ((= ent "LWPOLYLINE") (trc_rect obj)) ) ) ) (princ) ) Je souhaiterais que vous m'aidiez à le modifier pour qu'au lieu de tracer une croix dans un cercle désigné, il remplisse le cercle en vert. Exemple: http://img35.imageshack.us/img35/4490/exempled.gif Merci d'avance à ceux qui voudrons bien se pencher sur ma requête.

Merci pour tes conseils, Pieroka

Merci à tous pour vos réponses. J'ai bien précisé que j'étais dans l'espace papier; Résultats de mes tests: Pour ce qui est des soustractions de régions, je n'arrive pas à le faire :casstet: La solution d'utiliser les options de propriétés de l'ombrage fonctionne, mais la définition du dessin est trop altérée. Donc pour moi inutilisable. La commande nettoyer ne donne pas non plus de résultat, une fois la surface nettoyée, la nouvelle fenêtre tracée sur la surface nettoyée n'affiche rien....!!?? Reste la soluce de retracer une fenêtre principale autour des fenêtres de détails via polyligne fermée, clic droit, délimiter fenêtre, qui fonctionne correctement. Mais c'est hyper chi... fastidieux!!!! Je n'en reviens pas qu'un logiciel tel qu'autocad ne puisse pas faire des fenêtres multiples facilement. :mad: En tous cas, merci pour votre aide.

Bonjour à toutes et à tous. Je n'arrive pas à créer correctement plusieurs fenêtres de présentations dans l'espace papier. Je vous explique comment je fais: J'ai une présentation avec une seule fenêtre (verrouillée et inactive) : http://img80.imageshack.us/img80/6661/capture11222010113055.jpg Je trace un _rectang à l'emplacement où je veux créér une nouvelle fenêtre: http://img716.imageshack.us/img716/1865/capture11222010113245.jpg Je transforme mon rectangle en fenêtre avec la commande _-vports : http://img13.imageshack.us/img13/4590/capture11222010113336.jpg La fenêtre est bien créée, mais comme vous pouvez le constater, l'arrière plan de la fenêtre principale n'est pas caché!!! Que faut t-il faire pour ne pas voir les éléments de la 1ère fenêtre sous la 2ème? Merci de votre aide. :cool:

Bonjour à tous et à toutes. Il y a celui-ci qui est nickel. Il fait le cumul des lignes/polylignes selectionnées. Désolé, mais je ne sais plus qui l'a écrit. :P (defun c:longT(/ di ent n pt1 pt2 sel) (vl-load-com) (if (ssget '((0 . "LINE,POLYLINE,LWPOLYLINE,ARC,CIRCLE,ELLIPSE,SPLINE,MLINE"))) (progn (setq di 0) (vlax-for ent (setq sel (vla-get-activeselectionset (vla-get-activedocument (vlax-get-acad-object)))) (cond ((member (vla-get-objectname ent) '("AcDbLine" "AcDb3dPolyline" "AcDbPolyline")) (setq di (+ di (vla-get-length ent))) ) ((eq (vla-get-objectname ent) "AcDbArc") (setq di (+ di (vla-get-arclength ent))) ) ((eq (vla-get-objectname ent) "AcDbCircle") (setq di (+ di (vla-get-circumference ent))) ) ((member (vla-get-objectname ent) '("AcDbSpline" "AcDbEllipse")) (setq di (+ di (vlax-curve-getdistatparam ent (vlax-curve-getendparam ent)))) ) ((eq (vla-get-objectname ent) "AcDbMline") (setq n 0 pt2 nil) (while (nth n (setq lst (vlax-get ent 'Coordinates))) (setq pt1 (list (nth n lst)(nth (1+ n) lst)(nth (+ n 2) lst))) (and pt2 (setq di (+ di (distance pt1 pt2))) ) (setq pt2 pt1 n (+ n 3) ) ) ) ) ) (if (eq (vla-get-count sel) 1) (alert (strcat "La longueur de l'objet est de : " (rtos di))) (alert (strcat "La longueur totale des " (itoa (vla-get-count sel)) " objets est de : " (rtos di))) ) (vla-delete sel) ) ) (princ) )

Nickel. Merci beaucoup, Gile. :cool:

Bonjour à toutes et à tous. N'ayant pas trouvé la réponse après recherche dans les posts, je me tourne vers vous pour essayer de résoudre le petit problème suivant: Les express tools de acad2011 proposent les commandes textmask et textunmask qui sont bien utiles (malgré qu'elles soient en anglais; à propos, à quand une version française?) :mad: Une fois avoir masqué un text ou mtext, et que vous effacez ce texte par la suite en oubliant d'enlever préalablement le masque, il devient impossible (pour moi) de supprimer le masque qui existe toujours. Exemple de masque oublié sur l'extrait de carte: http://img824.imageshack.us/img824/19/capture09132010171612.jpg Donc ma question, comment faire pour enlever ce satané masque quand on est dans ce cas? Merci de vos réponses.

+ 1, je confirmes. :casstet:

Bonjour à tous. Il y a aussi eio.lsp de Alan J. Thompson. Il permet d'effacer soit à l'intérieur, soit à l'exterieur d'une polyligne fermée. (defun c:EIO (/ _p2ss o ent ssIn ssOut) ;; Erase Inside/Outside of selected LWPolyline ;; Alan J. Thompson, 04.02.10 (vl-load-com) (or *EIO:Opt* (setq *EIO:Opt* "Inside")) (setq _p2ss (lambda (ename) (ssget "_WP" ((lambda (e / l) (foreach x e (and (eq 10 (car x)) (setq l (cons (cdr x) l)))) (reverse l) ) ;_ lambda (entget ename) ) ) ;_ ssget ) ;_ lambda ) ;_ setq (and (setq o (car (entsel "\nSelectionner une polyligne: "))) (or (eq "LWPOLYLINE" (cdr (assoc 0 (setq ent (entget o))))) (alert "Invalid object!") ) ;_ or (not (initget 0 "Inside Outside")) (setq *EIO:Opt* (cond ((getkword (strcat "\nSpécifier l'option d'éffacement [inside/Outside] <" *EIO:Opt* ">: "))) (*EIO:Opt*) ) ;_ cond ) ;_ setq (cond ((and (eq *EIO:Opt* "Inside") (setq ssIn (_p2ss o))) ((lambda (i) (while (setq e (ssname ssIn (setq i (1+ i)))) (or (eq o e) (vl-catch-all-apply (function entdel) (list e))) ) ;_ while ) ;_ lambda -1 ) ) ((eq *EIO:Opt* "Outside") (setq ssIn (_p2ss o) ssOut (ssget "_X" (list (cons 410 (getvar 'ctab)))) ) ;_ setq ((lambda (i) (while (setq e (ssname ssOut (setq i (1+ i)))) (if ssIn (or (ssmemb e ssIn) (eq o e) (vl-catch-all-apply (function entdel) (list e))) (or (eq o e) (vl-catch-all-apply (function entdel) (list e))) ) ;_ if ) ;_ while ) ;_ lambda -1 ) ) ) ;_ cond ) ;_ and (princ) ) ;_ defun Peut être te conviendras t-il.

Bonjour à tous. Je clos le sujet puisque cela n'intéresse personne. :casstet:

Salut Gile. Désolé si je n'ai pas été clair. Ci-jointe une image: http://a.imageshack.us/img694/9089/exemplev.jpg C'est du trait de coupe avec numérotation de plan suivant dont je parlait. A faire à la main, c'est rasant !!!

Bonjour à tous. Je suis à la recherche d'un lsp (ou autre) qui me dessinerais un axe de coupe pour les changements de plans. Cet axe de coupe se dessinerais verticalement à une ligne, une polyligne ou segment d'arc préalablement sélectionné et indiquerais le numéro de plan correspondant. Est-ce que quelqu'un aurait cela sous la main? Merci d'avance. ;)

OK. Merci à tous. Sujet clos.

Bonjour SupportCova. Ah bon, tu as certainement raison. Je n'ai jamais rencontré de problème avec la version 2009. En tous cas, ce n'est pas très pratique et en plus cela ralentit le démarrage. Si quelqu'un a la solution pour enlever dessin1 au démarrage, je suis preneur. Ou bien pour accélérer le démarrage...

Salut Bryce. Merci pour ta réponse mais cela ne change rien visiblement. :mad2: