bbteddy

Salut Pour moi c'est la 2014 full avec SP1. Et j'ai eu un collègue d'un autre BE au téléphone et en faisant le test tous les 2 ont s'est rendu compte que le problème disparait si ont selectionne le point d'attache et non la ligne !!! :blink: :blink: :blink: de quoi devenir dingue ! POURQUOI Autocad nous autorise à repasser par dessus la cotes d'origine, c'est complètement inutile pour une cote à la chaîne. PETITE PROPOSITION ... : Ne peut on pas programmer un lisp qui lancerait le départ de la chaîne du coté ou se trouve la sourie par rapport a la cote d'origine? Merci à vous @ très vite

Bonjour à tous ! Il y a quelque semaines, j'ai ouvert ce sujet Mon lien ... Depuis je suis passé sur 2014 et je viens de découvrir POURQUOI j'ai des cotes continues qui ne partent pas du bon coté. Pouvez vous faire le test suivant et me dire si vous aussi vous êtes dans mon cas... 1) faire une "cotlin" avec les 2 point à 45° et la cote coller de n'importe quel coté. 2) tapez la commande "cotcont" + entrée pour choisir le départ sur cette cote... Et bien moi je ne peux pas choisir le départ, la chaîne ne démarre que du point le plus proche de la cote de base. SVP, dites moi pourquoi ? Ce problème m'a déjà coûté de l'argent et je flippe de refaire une erreur (plan d’exécution chantier),car une fois sur cent la cote part du mauvais coté. Merci d'avance

Nan nan, ce n'est pas un problème de refaire les cotes fausses le tout est de les trouver !!!

Merci Jeff, mais je connaissait déjà cette subtilité, je cherche à retrouver l'erreur(s) quand le mal est fait et qu'il n'est pas visible au premier abord !!!

Bonjour à tous, Je suis certain de ne pas être le seul à avoir ce problème, pourtant je ne trouve pas de solutions. Quand je démarre une cotation continue, 98 fois sur 100 je vérifie que la cote démarre du bon coté de celle en place. Malheureusement les 2 fois restantes ou je n'ai pas fais ce contrôle et que je part du mauvais coté, la deuxième cote qui suit est fausse (elle inclue la valeur de la précédente sans que cela soit visible) Afin de trouver ces intrus , est il possible d'effectuer une recherche par critère qui ferait ressortir les cotes colinéaires ET superposées ? Merci d'avance pour votre aide...

Mon problème est que : - je travaille sur un bâtiment où chaque étage est un fichier DWG - Chaque étage (N) appel une Xref de l'étage du dessus (N+1) - Cette Xref N+1 a tous ces calques gelés sauf 1 que je doit voir apparaître sur l'étage N - et ainsi de suite Et là, je bloque car je doit mettre 2 étages sur un plan !!! C'est grave docteur ?

Bonjour, Je fais une fois de plus appel à vous pour m'aider... :D Je souhaite faire une présentation avec 2 fenêtres... jusqu'ici tout va bien, Le problème est que le contenu de la 2ème fenêtre se trouve dans un autre fichier DWG Je ne peux pas les mettre en Xref, car ils le sont déjà. Y a-t-il une possibilité de faire un lien entre une fenêtre de présentation et l'objet d'un autre fichier ? Merci d'avance pour votre aide @ bientôt

Bonjour, Je ne viens pas souvent mais je suis tombé par hasard sur ton sujet et j'ai eu le même problème il y a peu ! Ma solution a été de désactiver le scan en temps réel de mon antivirus (Mc Afee) qui scrutait trop scrupuleusement les requêtes autocad !!! J’espère t'avoir aidé ! cdt Stéphane

Bonjour à tous ! Voici un code que vous m'avez très gentiment concocté il y a quelque temps déjà. Celui ci me permet de sélectionner les cadres que je souhaite imprimer et l'impression ce fait toute seule page par page et dans l'ordre ! Je souhaite maintenant l'utiliser avec CutePDF Writer (ou un autre !) . Seulement a chaque page il me demande de lui donner le nom du fichier à enregistrer... Est-il possible qu'il rentre automatiquement le numéros de page (celui-ci lui aillant déjà servi pour faire le tri ! ). Voici le code : (defun c:impt (/ ACDOC B BACKGROUNDPLOT C I P1 P2 SEL XMIN YMAX PLT lst-att LST LST-F LST-NB Y) (vl-load-com) (while (not sel) (setq sel (car (entsel "\n Choix du cadre (Bloc) :"))) (if sel (if (not (equal (vla-get-ObjectName (setq b (vlax-ename->vla-object sel))) "AcDbBlockReference")) (setq sel nil))) ) (setq sel (ssget '((0 . "INSERT"))) AcDoc (vla-get-activedocument (vlax-get-acad-object)) BACKGROUNDPLOT (getvar "BACKGROUNDPLOT")) (setvar "BACKGROUNDPLOT" 0) ; Récupère Attrib "FOLIO" (repeat (setq i (sslength sel)) (if (equal (vla-get-effectivename (setq c (vlax-ename->vla-object (ssname sel (setq i (1- i)))))) (vla-get-effectivename b)) (if (setq lst-att (vlax-safearray->list (vlax-variant-value (vla-GetAttributes c)))) (repeat (setq y (length lst-att)) (if (equal (strcase (vla-get-TagString (nth (setq y (1- y)) lst-att))) "FOLIO") (setq lst-F (append (list (cons (atoi (vla-get-TextString (nth y lst-att))) c)) lst-F) lst-nb (append (list (atoi (vla-get-TextString (nth y lst-att)))) lst-nb)) ) ) ) ) ) ; Tri (setq lst-nb (vl-sort lst-nb '< ) i 0) (repeat (length lst-nb) (setq lst (append lst (list (cdr (assoc (nth i lst-nb) lst-F)))) i (1+ i)) ) ; trite liste bloc (setq i 0) (repeat (length lst) (setq c (nth i lst) i (1+ i)) (vla-GetBoundingBox c 'xmin 'ymax) (setq p1 (vlax-make-safearray vlax-vbdouble (cons 0 1)) p2 (vlax-make-safearray vlax-vbdouble (cons 0 1))) (vlax-make-variant (vlax-safearray-fill p1 (list (car (vlax-safearray->list xmin)) (cadr (vlax-safearray->list xmin))))) (vlax-make-variant (vlax-safearray-fill p2 (list (car (vlax-safearray->list ymax)) (cadr (vlax-safearray->list ymax))))) (if (> (- (car (vlax-safearray->list ymax)) (car (vlax-safearray->list xmin))) (- (cadr (vlax-safearray->list ymax)) (cadr (vlax-safearray->list xmin)))) (vla-put-PlotRotation (vla-get-activelayout AcDoc) ac90degrees) (vla-put-PlotRotation (vla-get-activelayout AcDoc) ac0degrees)) (setq plt (vla-get-plot AcDoc)) (vla-put-PlotType (vla-get-activelayout AcDoc) acWindow) (vla-setwindowtoplot (vla-get-activelayout AcDoc) p1 p2) (vla-plottodevice plt (vla-get-configname (vla-get-activelayout AcDoc))) ) (setvar "BACKGROUNDPLOT" BACKGROUNDPLOT) (princ) ) MERCI pour votre aide ! @ bientôt et bon weekend

Ouuffff merci à tous les deux je vais essayer de trier les infos.... MERCI @+

bonjour Et donc je ne peut pas mélanger col3 avec les autres variables qui sont des calques ? ou c'est parce-que je m'y prend mal ? merci !

J'ai un bug ..... voila mon code, j'ai du faire un truc qui ne va pas !!! j'ai un message d'erreur : - ; erreur: valeur de liste SSGET incorrecte Et en plus il me demande de sélectionner des objets alors que je souhaite que ça opère sur tout le dessin . (defun c:net2 (/ selpoch plan1 plan2 col3) (setq plan1 "ST_N_Poteaux BA Hach") (setq plan2 "ST_N_Indices") (setq col3 (ssget '((-4 . "")))) (setq selpoch (ssget "X" (list '(-4 . "")))) (command "draworder" selpoch "" "AR" ))

Salut il me semblait l'avoir essayé celui-ci mais bon..... je vais retenter la chose merci @+

Bonjour, je souhaiterai améliorer ce lisp : (defun c:net2 (/ selpoch plan1 plan2 col3) (setq plan1 "ST_N_Poteaux BA Hach") (setq plan2 "ST_N_Indices") (setq col3 (ssget '([surligneur]OBJETS DE COULEUR 11,13,15[/surligneur]))) (setq selpoch (ssget "X" (list '(-4 . "")))) (command "draworder" selpoch "" "AR" )) Voila je ne trouve pas le code surligner qui me sélectionnerai tous les éléments de couleur 11-13-15 MERCI d'avance

merci philphil mais je ne suis pas assez fort en lisp pour le modifier dans le sens qui me convient... :( J'arrive a comprendre l'ensemble du code mais dans le détail je suis larguer ....