lecrabe

Hello SVP tu as quelle version de AutoCAD exactement ? + Quel niveau de Update ? Si AutoCAD 2022/2023/2024, tu peux eventuellement essayer : GFXDX12 = 0 , quitter AutoCAD , relancer ? Bye, lecrabe

Hello C la variable System DYNMODE = 0 ou = 3 ... Bye, lecrabe

Hello Au fait as tu Covadis sur ton AutoCAD / AutoCAD MAP ? Bye, lecrabe PS: si Oui, Covadis utilise F12 pour l accrochage sur les Points Topo et Ctrl F12 pour accrocher par MAT donc ...

Hello Voir la touche de fonction F12 ... Bye, lecrabe

Hello Mais l Extraction de données fait très bien cela ! Dans les Propriétés a extraire, tu demandes la Position et tu choisis XY ou XYZ suivant tes besoins ... Bye, lecrabe

Hello J aurais tendance à conseiller Inventor ou SolidWorks !? Ou peut être AutoCAD !? Formation impérative ! Bye, lecrabe

Hello +1 avec @(gile) Apres tout est possible en developpement ARX (et sans doute aussi en Dotnet) mais c du COSTAUD ! Objets METIER : ACAD Archi/MEP, ACAD CIVIL, Covadis/AutoPiste, etc ... Bye, lecrabe

Hello @GEGEMATIC Voir ci apres la routine "MultiCarte" de DenisHen que j utilise parfois avec les Parametres : 2 Horiz et 2 Verts ... car les images cartographiques BingMaps alourdissent beaucoup le DWG ... Bye, lecrabe ;; ;; http://cadxp.com/topic/45472-foliotage-de-geocarte/ -- 2018/03/02 ;; ;; Suite a un sujet de La Lozere : http://cadxp.com/topic/45469-commande-imagegeo-ou-geomapimage/ ;; j'ai fais ce petit bout de code qui fait un foliotage de GeoCartes. ;; Il reste un petit soucis de chevauchement, mais on gagne un temps fou ! ! ;; J'ai aussi prevu un petit decalage pour cacher la ligne "Bing"... ;; ;; Routine: MultiCarte par DenisHen ;; ;; pour la commande GEOCARTE (_GEOMAP) et surtout pour "remplacer" N x IMAGEGEO ... ;; ;; (vl-load-com) ;;; ******************************************* ;;; Cree des GeoCartes (GEOMAPs) en mode "Folio" ;;; Special dedicace a La Lozere (CadXP.com) ;;; ******************************************* (defun c:MultiCarte () (princ "\n Developpe par Denis H. (vs 1.4) \n SVP/Please restez/remain dans/into le/the SCG/WCS ! \n") ;; (command "Geocarte" "_h") ;; Carte/Map Hybride ;; (command "_GEOMAP" "_h") ;; Carte/Map Hybride ;; Si vous voulez seulement la Carte Aerienne (Orthophoto) ;; (command "Geocarte" "_a") ;; Carte/Map Aerienne (command "_GEOMAP" "_a") ;; Carte/Map Aerienne ;; Si vous voulez seulement la Carte Routiere ;; (command "Geocarte" "_r") ;; Carte/Map Routiere ;; (command "_GEOMAP" "_r") ;; Carte/Map Routiere (setq NbCarteHori (getreal " Nombre de Cartes/Maps horizontales : ") NbCarteVerti (getreal " Nombre de Cartes/Maps verticales : ") NbCarteHoriOrig NbCarteHori NbCarteVerti (+ NbCarteVerti 1) screen (getvar "screensize") ratio (/ (car screen) (cadr screen)) cen (getvar "viewctr") cen (trans cen 1 0) angle_rad (getvar "viewtwist") angle_rad (- (* 2 pi) angle_rad) h (getvar "viewsize") w (* h ratio) BasGauche (polar (polar cen (+ angle_rad pi) (/ w 2)) (- angle_rad (/ pi 2)) (/ h 2)) BasDroite (polar (polar cen angle_rad (/ w 2)) (- angle_rad (/ pi 2)) (/ h 2)) HautDroite (polar (polar cen angle_rad (/ w 2)) (+ angle_rad (/ pi 2)) (/ h 2)) HautGauche (polar (polar cen (+ angle_rad pi) (/ w 2)) (+ angle_rad (/ pi 2)) (/ h 2)) Xmin (car BasGauche) Ymin (cadr BasGauche) Xmax (car HautDroite) Ymax (cadr HautDroite) DeltaX (- Xmax Xmin) DeltaY (- Ymax Ymin) Haut (/ DeltaY NbCarteVerti) Larg (/ DeltaX NbCarteHori) ValDecal 5 ;;; Decal ValDecal ) ;_ Fin de setq (while (> NbCarteVerti 0) (while (> NbCarteHori 0) (setq PtGauche (list Xmin Ymin)) (setq PtDroite (list (+ Xmin Larg) (+ Ymin Haut))) (command "_zoom" "_w" PtGauche PtDroite) ;; (command "imagegeo" "") (command "_GEOMAPIMAGE" "") (setq NbCarteHori (- NbCarteHori 1)) (setq Xmin (+ Xmin Larg)) ) ;_ Fin de while (setq NbCarteVerti (- NbCarteVerti 1)) (setq NbCarteHori NbCarteHoriOrig) ;;; (setq Decal (+ Decal ValDecal)) (setq Xmin (car BasGauche)) (setq Ymin (+ Ymin (- Haut ValDecal))) ) ;_ Fin de while ;; (command "Geocarte" "d") (command "_GEOMAP" "_OFF") (princ) ) ;_ Fin de defun

Hello @Tchantal Donc voir le Lisp de Gilles ci-apres ... Tu nous diras si il fonctionne sur un AutoCAD 202X ! Bye, lecrabe ;;; Par GC 23/01/2010 ;;; http://www.cadxp.com/modules.php?op=modload&name=XForum&file=viewthread&tid=26548#pid116207 ;;; Deux commandes : ;;; ImportViews : pour importer dans le dessin courant toutes les vues enregistrées ;;; du dessin sélectionné (il doit être fermé). ;;; ;;; ExportViews : pour Exporter dans le dessin sélectionné (il doit être fermé) ;;; toutes les vues enregistrées du dessin courant. ;;; ImportViews par GC ;;; Importe dans le dessin courant toutes les vues enregistrées ;;; du dessin sélectionné (defun c:ImportViews (/ filename doc lst) (vl-load-com) (or *acad* (setq *acad* (vlax-get-acad-object))) (or *acdoc* (setq *acdoc* (vla-get-ActiveDocument *acad*))) (if (setq filename (getfiled "Fichier source" "" "dwg" 0)) (if (setq doc (gc:GetAxDbDoc filename)) (progn (vlax-for v (vla-get-Views doc) (setq lst (cons v lst)) ) (if lst (progn (vlax-invoke doc 'CopyObjects lst (vla-get-Views *acdoc*)) (vlax-release-object doc) ) ) ) (alert (strcat "\nLe fichier \"" filename "\" est ouvert.\nFermer le avant de relancer ImportViews" ) ) ) ) (princ) ) ;;; ExportViews par GC ;;; Exporte dans le dessin sélectionné toutes les vues enregistrées ;;; du dessin courant (defun c:ExportViews (/ filename doc lst) (vl-load-com) (or *acad* (setq *acad* (vlax-get-acad-object))) (or *acdoc* (setq *acdoc* (vla-get-ActiveDocument *acad*))) (if (setq filename (getfiled "Fichier cible" "" "dwg" 0)) (if (setq doc (gc:GetAxDbDoc filename)) (progn (vlax-for v (vla-get-Views *acdoc*) (setq lst (cons v lst)) ) (if lst (progn (vlax-invoke *acdoc* 'CopyObjects lst (vla-get-Views doc)) (vla-SaveAs doc filename) (vlax-release-object doc) ) ) ) (alert (strcat "\nLe fichier \"" filename "\" est ouvert.\nFermer le avant de relancer ExportViews" ) ) ) ) (princ) ) ;;; gc:GetAxDbDoc ;;; Accéder à un dessin fermé ;;; ;;; Retourne : ;;; un objet IAxDbDocument si le document est trouve ;;; nil si le document n'a pu être trouvé ou s'il est ouvert ;;; ;;; Argument : ;;; Le chemin complet du fichier ;;; ;;; Exemple d'utilisation : ;;; (if (setq doc (gc:GetAxDbDoc filename)) ;;; (progn ;;; ... ;;; (vla-SaveAs doc filename) ;;; (vlax-release-object (car doc)) ;;; ) ;;; ) (defun gc:GetAxDbDoc (filename / axdbdoc release) (setq axdbdoc (vlax-create-object (if (< (setq release (atoi (getvar "ACADVER"))) 16) "ObjectDBX.AxDbDocument" (strcat "ObjectDBX.AxDbDocument." (itoa release)) ) ) ) (if (vl-catch-all-apply 'vla-open (list axdbdoc filename) ) (not (vlax-release-object axdbdoc)) axdbdoc ) )

Hello Attention c une capture écran en pixels de la résolution de la zone d affichage à l instant T (getvar "screensize") Donc enlever toutes les palettes, Ctrl 0, Ctrl 9, pour maximiser la zone d affichage ... Bye, lecrabe

Hello C sur que passer de AllPlan (ou Revit ou ArchiCAD) à AutoCAD LT, ça va te faire "drôle/ mal" ! J espère que tu as un AutoCAD LT 2024 (et non pas version anterieure) ainsi tu pourras faire tourner la plupart des routines Lisp / VLisp qui changent "la vie" !? Bye, lecrabe

Hello En plus sur ZWCAD tu peux avoir un Covadis "complet" 2D/3D sans la partie VRD ! Bye, lecrabe

Hello @Geo34 Juste de memoire : tu peux faire un Export LandXML avec ton Covadis ... D autre part IW est capable d importer du LandXML (jamais utilise pour moi) ! Alors ?? Bye, lecrabe

Hello SVP quelle version exactement de Covadis ? Sur quelle version de AutoCAD MAP (ou AutoCAD CIVIL) ? Et idem pour Infraworks ? Bye, lecrabe

Hello Ouvrir le fichier .SCR original avec Notepad.exe puis l enregistrer sous un autre nom dans Mes Documents ... Maintenant est il modifiable ? Bye, lecrabe

Hello Voir ci apres un petit rappel sur l Annotativite qui est apparue avec la version 2008 ... L Icone dont parle Christian REB , c la variable ANNOALLVISIBLE = 1 Bye, lecrabe -------- Infos sur les Commandes & Variables liees au Mode ANNOTATIF -------- Par Patrice B. -------- Le Mode Annotatif est apparu avec la version 2008 d AutoCAD -------- Vers 1.03 SAVEFIDELITY <0/1> 1 Annotations (Texte, Bloc, Hach, Cotat) en AutoCAD <= 2007 (ACAD 2008) SELECTIONANNODISPLAY <0/1> 1 Annotations Multi-Echelles Visibles / Invisibles (ACAD 2008) ANNOALLVISIBLE <0/1> 1 Afficher/Masquer Objets Annotatifs ne gérant pas l’échelle courante (ACAD 2008) ANNOTATIVEDWG <0/1> = 0 (=1 si DWG Bloc Annotatif) ANNOAUTOSCALE (-4,-3,-2,-1,1,2,3,4) = -4 (ACAD 2008) ANNOTATIVEDWG <0/1> = 1 Indique si le dessin se comportera comme un Bloc Annotatif une fois insere dans un autre dessin : donc c un Bloc Annotatif CANNOSCALE 1:1 1:1 Valeur « NORMALE » si vous n’utilisez pas le mode ANNOTATIF (ACAD 2008) MSLTSCALE <0/1> 1 = 1 : Les Types de ligne affiches dans l'Onglet Objet sont mis à l'Echelle par l'Echelle d'Annotation ;; ;; Commande: ECHELLEOBJET / _OBJECTSCALE ;; Selection des Objets Annotatifs ... ;; PUIS Selection des Echelles Annotatives concernees ... ;; ;; Commande: MODIFLISTECHELLE / _SCALELISTEDIT ;; Consultation / Creation / Suppression des Echelles Annotatives ;;

Hello Pour voir si c TON Profil AutoCAD qui est endommage !? 1) Copier / Coller du Raccourci de lancement de ton AutoCAD ... Le renommer en "ACAD 20XX TEST" 2) CLIC sur le nouveau raccourci, Bouton droit / Proprietes, Onglet Cible 3) Champ Cible, aller a la FIN, ajouter 2/3 espaces, ajouter /P TEST 4) Lancer le nouveau raccourci et retester la commande CHAMP ... Exemple sur mon raccourci de AutoCAD MAP 2023 : "C:\Program Files\Autodesk\AutoCAD 2023\acad.exe" /product MAP /language "fr-FR" /P TEST Bye, lecrabe

Hello @bonuscad Mais comment veux tu faire tourner du Lisp AutoCAD sur Mensura ? Ou alors on a Mensura et aussi AutoCAD !? Bye, lecrabe

Hello C juste un rappel amical ! Ne pas oublier le Update AutoCAD 2024.1 sorti en Aout 2023 : https://help.autodesk.com/view/ACD/2024/FRA/?guid=AUTOCAD_2024_1_FIXED_ISSUES Et pour ceux qui ont du AutoCAD / Archi / CIVIL / MAP 2023, une autre sortie de cet ete : https://help.autodesk.com/view/ACD/2023/FRA/?guid=AUTOCAD_2023_1_4_FIXED_ISSUES Bon WE, Bye, lecrabe

Hello @Olivier Eckmann MERCI j ai corrige et aussi sur georezo.net/forum ... https://georezo.net/forum/viewtopic.php?pid=362894 Bye, lecrabe

Objet: Update MAP 2024.0.1 Dispo Hello Ne pas oublier le Update MAP 2024.0.1 sorti en Aout 2023 : https://help.autodesk.com/view/MAP/2024/FRA/?guid=AUTOCAD_MAP_2024_0_1_UPDATE Et aussi le Update AutoCAD 2024.1 sorti aussi en Aout 2023 : https://help.autodesk.com/view/ACD/2024/FRA/?guid=AUTOCAD_2024_1_FIXED_ISSUES Et pour ceux qui ont du MAP 2023, une autre sortie de cet ete : https://help.autodesk.com/view/ACD/2023/FRA/?guid=AUTOCAD_2023_1_4_FIXED_ISSUES Bye, lecrabe

Hello OUI sans Code d autorisation , c impossible ! Bye, lecrabe

Hello SVP tu peux partager un petit DWG du style : A gauche : AVANT -- A droite : APRES Avec 3/4 Polylignes et 10/20 Bloc bien places / mal places On parle de quel types de Polylignes : 2D Legere, 2D Lourde (Polyligne 2D splinee /courbee), 3D simple, 3D splinee Bye, lecrabe

Hello Je soutiens Bonuscad ! La fonctionnalite de Masquage / Isolation d objet qui est apparue avec la version 2011 peut s averer "mortelle" !? - Isolement & Masquage d’Objets ( OBJECTISOLATIONMODE = 0 / 1 -- Defaut = 0 ) Si OBJECTISOLATIONMODE = 1 quand vous sauvez le DWG ... Bye, lecrabe

Hello 1) Tu as un AutoCAD, ACAD Archi, etc OU un AutoCAD MAP / ACAD CIVIL ? 2) As tu essayé de l ouvrir en mode RÉCUPÉRER ? Bye, lecrabe