dfbiagio

Effectivement, j'utilise le même fichier DXE, je pensais que c'était un fichier gabarit et donc utilisable pour tous les fichiers. Je vérifie Bàt

Bonjour, J'ai 3 fichiers ouverts, dans chaque fichier j'ai un tableau avec les surfaces des pièces. J'ai créé les tableaux avec "extraire des données". Par facilité, je vais appeler mes fichiers A, B et C. J'ai fait des modifications dans le fichier C. Pour mettre à jour mon tableau, je clique sur le tableau, clique droit et je sélectionne "Mettre à jour les liaisons de données de la table" et là, surprise, il le met à jour, mais avec les données du fichier A. Avez-vous déjà rencontré ce problème? Merci d'avance.

Bonjour, Effectivement, il n'y a pas de style de texte, mais comment est-ce possible? BàT

Bonjour, Je viens vers vous, car j'ai un petit souci concernant la sélection d'objet. J'ai du Mtexte et quand j'essaie de le sélectionner, il me renvoie "nil" Commande: (setq texte (entget (car (entsel)))) Sélectionnez un objet: nil Fichier en annexe. Merci d'avance selection texte.dwg

Pas sur de tout comprendre entre les list les ' en tout cas avec (list (cons 62 cou)) ça fonctionne. Merci bcq

Bonjour, J'ai un problème pour modifier la couleur d'un objet Je mets la nouvelle couleur dans une variable nommée Cou, mais lorsque je veux la remplacer dans l'objet il me met une erreur. Exemple: (setq Objet-A-Modifier (entget (car (entsel)))) Sélectionnez un objet: ((-1 . <Nom d'entité: 1c81879ce70>) (0 . "LINE") (330 . <Nom d'entité: 1c81323fa30>) (5 . "92947") (100 . "AcDbEntity") (67 . 0) (410 . "Model") (8 . "0") (100 . "AcDbLine") (10 146.0 932.0 0.0) (11 809.0 1141.5 0.0) (210 0.0 0.0 1.0)) Commande: (setq cou 7) 7 Commande: (cons 62 cou) (62 . 7) Commande: (append objet-a-modifier (cons 62 cou)) ; erreur: liste incorrecte: 7 Mais, lorsque je le mets manuellement, ça fonctionne: (append Objet-A-Modifier '((62 . 7))) Commande: (append Objet-A-Modifier '((62 . 7))) ((-1 . <Nom d'entité: 1c81879ce70>) (0 . "LINE") (330 . <Nom d'entité: 1c81323fa30>) (5 . "92947") (100 . "AcDbEntity") (67 . 0) (410 . "Model") (8 . "0") (100 . "AcDbLine") (10 146.0 932.0 0.0) (11 809.0 1141.5 0.0) (210 0.0 0.0 1.0) (62 . 7)) Merci d'avance pour votre aide.

Effectivement, c'est bien ça. Un tout grand merci. Bonne journée

Re-bonjour, J'ai encore un petit souci, lorsque j'exécute mon petit lisp via la ligne de commande, ça fonction, mais quand tout est assemblé, il me met l'erreur suivante: Commande: CHT Sélectionnez des objets: Spécifiez le coin opposé: 3 trouvé(s) Sélectionnez des objets: ; erreur: fonction incorrecte: <Selection set: dc> Voici mon lisp assemblé: (defun c:cht() ((setq texte (ssget '((0 . "text")))) cpt 0) (repeat (sslength texte) (setq TexteAmodifier (entget (ssname texte cpt))) (entmod (subst (cons 50 (+ pi (cdr (assoc 50 TexteAmodifier)))) (assoc 50 TexteAmodifier ) TexteAmodifier )) (setq cpt (1+ cpt)) ) ) Merci pour votre aide

Un grand merci, 👍

Bonsoir à tous, J'essaie de créé une petite programmation qui me permettrai de faire pivoter un texte suivant un certain angle. (setq texte (entget (car (entsel "choix du texte")))) Résultat: ((-1 . <Nom d'entité: 28f974116f0>) (0 . "MTEXT") (330 . <Nom d'entité: 28ff3f02230>) (5 . "93487") (100 . "AcDbEntity") (67 . 0) (410 . "Model") (8 . "Renseignements cadastraux (N° parcelles - Propriétaires)") (100 . "AcDbMText") (10 -1.82413e+07 -7.18013e+06 0.0) (40 . 120.0) (41 . 0.0) (46 . 0.0) (71 . 7) (72 . 5) (1 . "G175R") (7 . "Roman") (210 0.0 0.0 1.0) (11 -0.882086 0.471089 0.0) (42 . 505.917) (43 . 124.615) (50 . 2.65107) (73 . 1) (44 . 1.0)) Ensuite, j'extrais l'angle du texte: (setq ang (cdr (assoc 50 texte))) 2.65107 Pour le faire pivoter de 180° il faut soit ajouter PI (setq ang (+ ang PI)) Je substitue le nouvel angle dans texte (substr (cons 50 ang) (assoc 50 texte) texte) Et là, je reçois cette erreur ; erreur: type d'argument incorrect: stringp (50 . 5.79266) D'où vient mon erreur ? Merci de votre aide.

Parfait, merci beaucoup

Bonjour, Est-il possible de modifier l'ordre des paramètres d'un bloc dynamique, si oui, comment fait-on ? Merci d'avance. Bonne journée à tous

Je serai fort intéressé par le fait empêcher les accrochages aux masques (nettoyer) lorsque la variable WIPEOUT est fixée à 0. J'utilise bcq les masques, mais quand je cote, il s'accroche aux masques, pourtant invisibles, et ça ne va pas du tout.

Merci, c'est ce que j'avais déjà. J'avais contourné le problème en ajoutant un paramètre de visibilité, la première, je l'ai appelé ">60 cm" qui est comme tu l'as décrite. La deuxième, je l'ai nommée "< 60 cm" et là, il n'y a pas le réseau, il y a juste étirer. Merci

Merci pour le conseil, mais je pense que je vais me passer des rails intermédiaires. Tant pis pour le réalisme. Ça va fausser mes longueurs de cloisons lors de l'extraction des données.