Tramber

Ecrit en Autolisp (probablement), ce programme est peut-être encore adaptable (c'est un language qui évolue un peu et transmet des commandes à Autocad, qui, elles aussi évoluent un peu). Pour des dessins au paramétrage simple, des scripts peuvent suffir. Sinon, il faut programmer en Autolisp, apprentissage assez long ou VBA si vous connaissez le Visual Basic.

Les matrox font même, pour certaines, du TRIAL(Vroum vroum) voire du "QUADRIAL" (le mot n' existe pas). Moi j'ai déjà vu des portables qui ont cette possibilité (DUAL). Ne m'en demandez pas +

C'est possible en 3D avec SOLVIEW, mais il faut faire de la 3D

J'insiste mais il faut faire des blocs avec attributs. ATTEXTR est parfait pour ce que tu cherches. Parfait pour EXCEL

Moi ,j'a pas le fichier. J'a pas pu jouer avec vous. Mais je connais bien la délimitation..... ..........que je trouve calamiteuse sur Autocad dès qu'il y a un angle de vue. Difficile à régler, impossible de choisr le plan de délim....

Sinon, il faut user de la commande FILTER et se faire des copier-coller à la main. Filter -> Nom de bloc est assez puissant car il accepte les * et les ? pour filtrer les noms en 2ème niveau. Pour les utilisateurs de bon niveau, sinon, il y a d'autres trucs.

Si tes blocs ont des attributs, OK Si tes blocs n'ont pas d'attributs, Dommage Outils -> Extraire les attributs, compte les blocs Ne pas ouvrir le fichier généré autrement qu'en tant que fichier texte depuis Ouvrir dans XLS

As-tu au moins pris le format d'impression maximum pour ton JPG ? Ignores-tu que le PNG est compatible web à 100 % et qu'il est bien supérieur pour la CAO ? Le TIFF est un format vesctoriel aussi (ce n'est pas le cas du JPG). Il crée des fichiers lourds mais précis. De toutes facons, il faut que tu consultes ce message. Le DWF est intéressant aussi, c'est sur.

Bien sur tu peux mettre un chemin. Je dis qu'il faut faire un CLOSE et je ne le fais même pas. N'oublies pas de la faire à la fin du programme (hors de la boucle, avant le PRINC)

2 puissance 15, soit 16 niveaux. Ta remarque est judicieuse (je ne connaissais pas ces limites). C'est un comble quand on connait les capacités de coordonnées d'Autocad (E-99 à E+99) !

(defun c:lligne(/ ent entselec n pa pd) (setq ent (ssget)) (setq l (open "text ligne.txt" "w")) (if ent (progn (setq n 0) (while (ssname ent n) (setq entselec (entget (ssname ent n))) (if (= (cdr (assoc 0 entselec)) "LINE") (progn (setq pd (cdr (assoc 10 entselec))) (setq pa (cdr (assoc 11 entselec))) (setq longueurent (distance pd pa)) ;;;;;; (alert (strcat "La longeur de l'entité " (itoa n) " est de ")) (write-line (rtos longueurent) l) ) ) (setq n (1+ n)) ) ) ) (princ) ) Je pense que ca doit marcher (je peux pas tester maintenant)

Tu dois aussi faire un CLOSE de l'autre côté de la boucle: Writes a string to the screen or to an open file (write-line string [file-desc]) Arguments string A string. file-desc A file descriptor for an open file. Return Values The string, quoted in the normal manner. The quotes are omitted when writing to a file. Examples Open a new file: Command: (setq f (open "c:\\my documents\\new.tst" "w")) # Use write-line to write a line to the file: Command: (write-line "To boldly go where nomad has gone before." f) "To boldly go where nomad has gone before." The line is not physically written until you close the file: Command: (close f) nil

Je l'ai plus en tête mais je peux te dire que ton OPEN doit être ouvert au tout début et non-inclus dans la boucle. Il doit être ouvert une seule fois. Tu es bien parti. Je me suis peut-être trompé un peu sur WRITE-LINE

Tu devrais utiliser les commandes: OPEN WRITE-LINE Assez faciles, elle te permettent d'écrire une lgine de résultat à chaque boucle dans un fichier texte.

Tu as vu le: (setq entselec (entget (ssname ent n))) de Patrick_35 ? Moi je t'ai proposé : (setq SS (entget(ssname ent 0))) en sachant que tu ne sélectionnais qu'un objet (0 est le premier de la liste, après tu peux incrémenter si la longueur de ta selection est supérieur à 1 objet).

(defun c:lligne() (setq ent (ssget)) (setq SS (entget(ssname ent 0))) (setq PP (cdr (assoc 10 SS))) (setq PP1 (cdr (assoc 11 SS))) (setq longueurent (distance PP PP1)) (princ) ) RAPPEL: SSGET donne un jeu de selection , pas un entité, il faut donc faire un SSNAME ou utiliser ENTSEL à la place de ENTGET (à confirmer).

Bon article, bon site. Mais il devraient se mettre à jour sur Archicad :D

Il n'y a pas de réponse autre que celle-ci: Ca dépend ! C'est une question de carte graphique (capacité à faire du DUAL). As-tu fouillé les propriétés d'affichage ? Clic-droit sur l'écran du bureau.

Excellent le coup du perimetre qui se glisse dans un variable après AIRE, je savais pas !

On ne joint pas des poly 3D. On peut les grouper, c'et tout.

Codes de groupe line Codes de groupe Description 100 Marqueur de sous-classe (AcDbLine) 39 Epaisseur (facultatif, valeur par défaut = 0) 10 Point de départ (dans le SCG) DXF : valeur X ; APP : point 3D 20, 30 DXF : valeurs Y et Z du point de départ (dans le SCG) 11 Extrémité (dans le SCG) DXF : valeur X ; APP : point 3D 21, 31 DXF : valeurs Y et Z de l'extrémité (dans le SCG) 210 Direction d'extrusion (facultatif ; valeur par défaut = 0, 0, 1) DXF : valeur X ; APP : vecteur 3D 220, 230 DXF : valeurs Y et Z de la direction d'extrusion (facultatif) Tu as raison, je trouve pas la longueur. Bonne nouvelle c'est en Francais, je croyais que ca allait être en Anglais.

Je viens de vérifier, c'est le meme dans EXCEL ! O

Dans l'aide, tu retrouves les codes DXF. Rimbo cherche peut-être la distance entre le dernier point d'une ligne et le début dune autre (vide de lignes, car ce sont des arcs qui démarrent ou finissent en ces points, si j'ai compris) ? Peu importe. Pour que la routine soit comprise, peut-être nous devrions savoir s'il compte saisir les lignes dans l'ordre ou ?) A propos des codes, je crois qu'il y en a 1 pour la longueur. Mais, comme je disais + haut, c'est peut-être un champ inutile. DIDIER, est-ce que distance est une fonction 3D, car, on ne sait jamais ! ?

Je le retrouve quand je suis sur Excel mais il y a un raccourci pour basculer d'un onglet à l'autre. Ca aussi, ca pourrait être pas mal.

Nickel :thumbup: