vincentp010

Oui c'est vrai, mais c'était à mes débuts 🙂 je ne maitrisait pas encore toutes les subtilités Je viens de voir que ma variable a c a d a été renommé en AutoCAD même dans un bloc de code, il faut se méfier 😕

Je ne connaissait pas pyautocad. J'avais fait un petit programme il y a 11 ans qui utilisait l'interface COM d'autocad, il me sert toujours depuis import win32com.client acad = win32com.client.Dispatch("AutoCAD.Application") if AutoCAD != None: doc = AutoCAD.ActiveDocument

Après demande, il faut une licence Mensura sous contrat de support pour avoir accès à une licence viewer. Dommage ☹️

Merci pour l'info, je vais faire une demande au service commercial alors.

Oui je sais, c'était pour éviter la demande. Mais si quelqu'un sait s'il y a eu un changement dans les tarifs du viewer, j'aimerais savoir.

Si on regarde à la page de l'aide, la dernière version est la 19.112 Le lien de téléchargement devient donc: http://www.objectdcl.com/downloads/ObjectDCL-LM-19.112.zip

Bonjour, A la vue de vieux posts sur le forum je pensai que le viewer Mensura était mis à disposition gratuitement Après l'avoir téléchargé depuis le site de sogelink et installé en version 11, il m'est demandé une licence. C'est pour voir un fichier msa que l'on m'a transmis

Salut, Lorsque tu lance PEDIT, tu fait M pour Multiple et ensuite P pour Précédent. Ça prendra la sélection précédente.

RAS pour le moment, de mon coté avec la même config que toi

Dans la foulée de Covadis 18.1, GeogexFR est sorti en 3.1 avec à peut prêt les mêmes nouveautés. Mais attention il n'est compatible qu'à partir de ZWCAD 2024, je viens d'avoir la confirmation du support après avoir testé une mise à jour infructueuse sur ZWCAD 2022. Aucune mention sur le site de téléchargement, mais ils vont bientôt l'afficher.

Salut, Pour la découpe laser il faut que tous tes trous soient des polygones fermées et vérifier qu'il n'y ai pas de lignes superposées. Ci joint le fichier corrigé Finalv2 r12-ferme.zip

J'ai modifié vite fait un vieux lisp, je n'ai peut être pas assez testé. Si celui de Bonuscad fonctionne, tant mieux

Un lisp bricolé vite fait à partir d'un autre qui sélectionnait des blocs aux sommets de polylignes ;########################################################################### ;# Copyright (C) 09-2023 Vincent PRELAT # ;# This program is free software: you can redistribute it and/or modify # ;# it under the terms of the GNU General Public License as published by # ;# the Free Software Foundation, either version 3 of the License, or # ;# any later version. # ;# This program is distributed in the hope that it will be useful, # ;# but WITHOUT ANY WARRANTY; without even the implied warranty of # ;# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the # ;# GNU General Public License for more details. # ;# You should have received a copy of the GNU General Public License # ;# along with this program. If not, see <http://www.gnu.org/licenses/>. # ;########################################################################### ; change layer of block of pline sommet (defun c:blksomtolayer (/ entpol ent ent1 ent2 typ lay nbsom nbsom1 recher pt xx yy pt1 xx1 yy1 bl nbl cl) (setvar "cmdecho" 0) (command "_.undo" "_m") (setq entpol nil ent 0) (while (/= ent nil) (progn (print) (setq ent (entsel "Pointez la polyligne : ")) (setq ent (car ent)) (if (/= ent nil) (progn (setq typ (cdr (assoc 0 (entget ent)))) (setq lay (cdr (assoc 8 (entget ent)))) ;polyligne 3d -> 2d (if (= typ "POLYLINE") (progn (command "_copy" ent "" "0,0,0" "0,0,1e99") (command "_move" "_l" "" "0,0,0" "0,0,-1e99") (command "_explode" "_l") (command "_pedit" "_m" "_p" "" "_y" "_j" "0" "") (setq ent (entlast)) (setq entpol ent) (setq typ (cdr (assoc 0 (entget ent)))) ) ) (if (= typ "LWPOLYLINE") (progn (setq ent (entget ent)) (setq nbsom (cdr (assoc 90 ent))) (setq nbsom1 1) (while (<= nbsom1 nbsom) (setq recher nil) ;recherche les coordonnes du sommet suivant (while (/= recher 10) (setq ent (cdr ent)) (setq recher (caar ent)) ) (setq pt (cdr (assoc 10 ent))) (setq xx (car pt)) (setq yy (cadr pt)) (setq pt1 nil) (setq bl (ssget "x" (list '(-4 . "<OR") (cons 8 "POINTS") (cons 8 "POINT") '(-4 . "OR>") ) ) ) (if (= bl nil) (exit)) (setq nb1 0) (setq nb (sslength bl)) (while (< nb1 nb) (setq ent1 (ssname bl nb1)) (setq ent1 (entget ent1)) (setq pt1 (cdr (assoc 10 ent1))) (setq xx1 (car pt1)) (setq yy1 (cadr pt1)) (if (and (equal xx xx1 0.001) (equal yy yy1 0.001)) (setq nb1 nb) (setq pt1 nil) ) (setq nb1 (+ nb1 1)) ) (if (/= pt1 nil) (progn (setq sl (ssget "p" (list (cons 10 pt1)))) (if (= sl nil) (exit)) (setq nb1 0) (setq nb (sslength sl)) (while (< nb1 nb) (setq ent2 (ssname sl nb1)) (setq ent2 (append (entget ent2) (list (cons 8 lay)))) (entmod ent2) (setq nb1 (+ nb1 1)) ) ) ) (setq aff (strcat (rtos nbsom1 5 0) "/" (rtos nbsom 5 0))) (grtext -2 aff) (setq nbsom1 (+ nbsom1 1)) ) ) ) (if (/= entpol nil) (command "_erase" entpol "") ) ) ) (if (/= ent nil) (setq ent 0) (setq ent nil)) ) ) )

Salut, j'ai encore l'installeur de la version 15 en 32bits. Si intéressé, je peux envoyer en MP. Par contre, je crois qu'il va te redemander un code d'autorisation si tu n'as pas sauvé ton fichier C:\Program Files (x86)\Geomedia SA\Covadis\Programmes\CovaNetLink.ini

Avec QGIS ça devrai marcher. C'est ce que j'utilisai pour importer des données IGN RGE Alti. Je créais un tif d'une zone depuis les données asc puis j'importai ce tif avec Covadis. Bien penser dans l'export tif à bien cocher "données brutes" et pas "image"

Salut, Tu as la commande MNTIMPBIN qui te permet d'importer un MNT image en tif.

Le champ pointe de flèche indique le type de flèche (fermée pleine, fermé vide, point, ...) Je ne crois pas qu'il soit possible d'avoir les coordonnées avec un champ. Une solution serait d'insérer un point à la pointe de la flèche, tu as alors la propriété position dans un champ de cet objet.

Salut, Normalement les GPS exportent en DXF des points et des polylignes 3D. Si tu veux des points topo, il faire Covadis 2D -> Points topo -> Immatriculations d'entités Si tu veux garder tes matricules levé, il faut exporter ton levé en txt (fichier de point avec séparateur) que tu pourras ensuite importer avec Covadis

Il faudrait voir ton lisp qui créer tes DWG de blocs. Parce que avec WBLOC, les DWG créés sont bien dynamiques lorsque je les inserts ensuite

Pour les blocs dynamiques, il faut enregistrer le bloc dans un fichier de dessin depuis l'éditeur de bloc et tu peux l’insérer depuis un DWG

Bonjour, Quel est l’intérêt de créer un bloc dans le DWG ? Tu peux directement insérer ton DWG en tant que bloc dans un autre dessin.

Salut, Quand tu es dans le fil de discussion, sous le titre que tu peux modifier en cliquant dessus, tu as un bouton + ou ajouter étiquette

Je ne connaissais pas les talus dynamiques, bien pratique !

Merci pour la piste, je vais tester ça Edit: C'est nickel, je n'y avait pas pensé. Merci

Bonjour, J'y suis passé la semaine dernière. Pour le moment pas de soucis particuliers, c'est comme avec la clé. Pour le changement de poste, il faut juste suspendre la licence sur le poste pour pouvoir l'activer sur l'autre. On peut cocher une case pour que ce soit proposé à la fermeture d AutoCAD