bryce

Oui. Ton zip fait 22 octets, il est vide. ;)

La couleur 7 (le "Blanc") est la seule à s'imprimer en noir ET à s'afficher automatiquement en blanc ou noir à l'écran suivant la couleur du fond. Donc tu devrais vraiment remettre tous les calques qui sont actuellement en 0,0,0 en couleur 7. ;) Pour rappel, les couleurs RVB ne sont pas affectées par les styles de tracé, donc à mon avis c'est une assez mauvaise idée d'utiliser les couleurs RVB de manière systématique dans un dessin...

Bonjour, Il me semble qu'il y a les styles de tableau pour cela, et ils expliquent sans doute les "bugs" que tu as rencontrés... ;)

Bonjour, Je pense que le problème est déjà avant l'option TL. Tu mets quoi après le nom du calque ? un espace ? Si oui, il faut remplacer cet espace par un saut de ligne ( CAR(10) ), car les noms de calque peuvent contenir des espaces.

Bonjour, Voici le sujet en question (même s'il ne t’apportera pas vraiment de réponse): http://cadxp.com/index.php?/topic/35090-scandxf-beta-1/ Pour créer un fichier CUI partiel, tu peux aller dans l'onglet Transférer de la boîte de dialogue CUI, et faire glisser ta barre d'outils depuis la partie gauche vers la partie droite dans un nouveau fichier CUI vierge. Tu pourras ensuite enregistrer ce fichier CUI, et utiliser sur un autre pc l'onglet Transférer pour faire la manip inverse, ou bien le charger en tant que CUI partiel. Les barres d'outils ont bien un alias en plus de leur nom, regarde bien dans les propriétés de ta barre d'outils. ;)

Bonjour, Et en rajoutant simplement un * devant la macro que tu as postée dans un autre sujet, ça n'aurait pas fait l'affaire ? :unsure: *^C^CNCOPY;\;;;_laycur;D;;

Il faut charger le Lisp (voir http://cadxp.com/index.php?/topic/14323-charger-un-lisp/ ), puis taper la commande PTEXTR.

Je viens de copier-coller le code ci-dessus directement dans la ligne de commande et ça passe, donc c'est le tien... ;) UI ? Kesako ? :unsure: Dans mon message je ne parle pas d'une distance, mais d'une distance en X (un Delta X). ;)

Bonjour, Dans le dessin exemple, les points ont une coordonnée Z, et les textes des n° se trouvent tous à + 0.3 en X du point correspondant. Voici donc un Lisp qui extrait dans un fichier texte (csv) les coordonnées X, Y et Z de tous les points du dessin, ainsi que le contenu du texte correspondant. (defun c:PTEXTR ( / dx dy prec *error* ss i pt coords mat ss2 txt file line ) (setq dx 0.3) ; distance en X du matricule par rapport au point (setq dy 0.0) ; distance en Y du matricule par rapport au point (setq prec 3) ; nombre de décimales des coordonnées extraites (defun *error* (msg) (and msg (or (member (strcase msg) '("FUNCTION CANCELLED" "QUIT / EXIT ABORT" "FONCTION ANNULEE" "QUITTER / SORTIR ABANDON")) (princ (strcat "\nErreur : " msg)) ) ) (if ss (setq ss nil)) (if file (close file)) (princ) ) (setq ss (ssget "_A" '( (0 . "POINT") ) )) (if (and ss (setq file (getfiled "" "points.csv" "csv" 1)) (setq file (open file "w")) ) (progn (write-line "Matricule;X;Y;Z" file) (repeat (setq i (sslength ss)) (setq pt (entget (ssname ss (- i 1))) coords (cdr (assoc 10 pt)) mat "?") (setq ss2 (ssget "_A" (list (cons 0 "TEXT") (cons -4 "=,=,*") (cons 10 (list (+ (car coords) dx)(+ (cadr coords) dy) 0.0)) ))) (if ss2 (setq txt (ssname ss2 0) mat (cdr (assoc 1 (entget txt))) ss2 nil) );if ss2 (write-line (strcat mat ";" (rtos (car coords) 2 prec) ";" (rtos (cadr coords) 2 prec) ";" (rtos (caddr coords) 2 prec)) file) (setq i (- i 1)) );repeat (princ "\nExtraction terminée.") );progn (if ss (princ "\nImpossible d'écrire le fichier.") (princ "\nAucun point trouvé.") ) );if ss (*error* nil) )

http://dl.free.fr ;)

Voici un petit exemple de fichier Excel pour générer un script de création de calques. Le fichier comporte une macro VBA, il faut donc activer les macros à l'ouverture. https://www.box.com/s/cc474abc555fb4c2c4e5 Il suffit de : - renseigner les noms, couleurs et types de lignes dans les 3 colonnes de gauche (écraser les exemples) - cliquer sur le bouton prévu pour copier le script dans le presse-papier (c'est là que la macro intervient pour éliminer des guillemets ajoutés par Excel. Ce souci n'existe pas avec OpenOffice/LibreOffice). - coller le script dans la ligne de commande d'AutoCAD, ne pas oublier d'appuyer sur Entrée à la fin.

Bonjour, Pas très clair tout ça... ;)

J'utilise &, qui sert aussi à concaténer. ;) =A2&B2 équivaut à =CONCATENER(A2;B2)

Bonjour, Il faut installer les outils Express. ;)

La vidéo est en HD, tu peux l'agrandir. ;)

Bonjour, Tu peux jeter un oeil à cette vidéo pour voir comment créer dans Excel un script de création de calques : Il faudra perfectionner un peu pour gérer les propriétés des calques en plus, mais ça ne devrait pas être un problème. N'hésite pas à poster un morceau de ton fichier Excel si tu as besoin d'aide. ;)

Bonjour, Ou bien une extraction de données (un peu lourd sans doute)... Ou bien essayer ScanDXF, qui te donnera le total des surfaces des polylignes sélectionnées en un clic... :P

Bonjour, @FormaBois: "Standard" n'est pas un nom de police, mais un style de texte. Tu ne peux pas mettre un nom de police directement dans le type de ligne, il faut y mettre le nom d'un style de texte qui utilise la police désirée. Il y a donc 2 solutions pour big666: - modifier dans le fichier dwg le style de texte "Standard" pour utiliser la police Arial Narrow au lieu de Arial - créer dans le dwg un nouveau style de texte, appelé par exemple "ArialNarrow", utilisant la police en question, puis remplacer STANDARD par ARIALNARROW dans la définition du type de ligne (une copie du type d'origine de préférence). La 2e solution est plus propre à mon avis, mais le style de texte "ArialNarrow" devra exister dans tous les dessins dans lesquels ce type de ligne sera utilisé.

Bonjour, Tu peux utiliser un Lisp dans AutoCAD pour convertir toutes les couleurs RVB en couleurs indexées. Ça tombe bien, plusieurs ont été proposés dans ce sujet il n'y a pas longtemps: http://cadxp.com/index.php?/topic/35102-jaune-et-2552550 ;)

Bonjour, J'imagine que ce sont de simples points, avec un texte à côté pour le numéro... Dans ce cas, une simple extraction de données ne suffira sans doute pas (à moins peut-être d'extraire les coordonnées des points et des textes, puis de fusionner ça dans Excel). Sinon, il faudra sans doute passer par un programme en Lisp. Il faudrait déjà que tu postes un fichier en exemple, pour qu'on puisse voir ce qu'il est possible de faire. ;)

Bonjour, Tu aurais un contre-exemple ? Parce que dans tous tes exemples c'est ce qu'il fait, je ne vois rien de bizarre a priori... :unsure:

Bonjour, Essaie peut-être avec ces fichiers (Aide aux développeurs de la 2010): https://www.box.com/s/9ee590e368ddfc6a8b01

Bien répondu, hihi ! :P

Bonjour, Le Lisp de Lee Mac ne prend en compte que les ellipses dont les 2 axes ont exactement la même longueur (rapport petit axe / grand axe = 1). Je pense que ce n'est pas le cas de tes ellipses: si tu affiches 8 décimales, tu constateras sans doute une différence. ;) Cela expliquerait également le fait que la transformation en région puis la décomposition ne produise pas un cercle. Une petite modif dans le Lisp de Lee Mac devrait faire l'affaire. Essaie de remplacer cette ligne (if (setq s (ssget "_:L" '((0 . "ELLIPSE") (40 . 1.0)))) par celle-ci : (if (setq s (ssget "_:L" '((0 . "ELLIPSE") (-4 . ">")(40 . 0.9)))) Le Lisp prendra en compte les ellipses dont le rapport petit axe / grand axe est supérieur à 0.9 (valeur que tu peux adapter).

Bonjour, Oui :) On ne peut pas créer de contraintes dans AutoCAD LT, seulement gérer (afficher/masquer les icônes, changer les valeurs...) celles qui existent éventuellement déjà dans un dessin créé avec une version complète.