GEGEMATIC

Salut, la référence au style de texte ne gère pas la couleur, mais on peut fonctionner en 2 temps: (setq tc (vla-get-truecolor (setq oml (vlax-ename->vla-object (car (entsel)))))) (setq tc (vla-get-truecolor oml)) (vla-put-colorindex tc 1) (vla-put-truecolor oml tc);_toute la mleader est rouge (setq llc (vla-get-LeaderLineColor oml)) (vla-put-colorindex llc 3) (vla-put-LeaderLineColor oml llc);_la fleche devient verte, le texte reste rouge a+ gégé

Salut, tout le pb des mleader c'est que le format du texte est situé dans un style, je crois qu'on le trouve dans un code 340 et 343 je ne m'en suis jamais servi. en gros c'est un ename ou un eobj style qu'il faudrait modifier. a+ gégé

Salut Phil oh ce n'est pas nouveau ... Nous faisons des plans de l'existant de réseaux humide aériens selon un procédé bien rodé depuis 2003 ! (en gros un mélange de SIG, de détails et de photos) J'avais simplement introduit une nouveauté: avant les liens étaient repérés par un LEADER + Bloc (ça marchait très bien) nous somme passé à un MLEADER -> catastrophe ! Tout m’intéresse en terme de BIM ! Je suis preneur ! Mais en 2015, sur un grosse opération, j'avais un peu peur de me lancer dans un projet 100% revit, alors que le reste de l'opération était 100% DWG. J'ai donc fait l'opération sous MEP, pour pouvoir bidouiller. Rétrospectivement, j'ai bien fait, car du bidouillage, il y en a eu ... Mais lorsque j'ai créé mes composant MEP, j'ai gardé les tables de dimensions, les sources, de manière à ce qu'elles soient toutes prêtes pour Revit. en fait, Autocad Mep et Revit Mep ont beaucoup de point communs... Sauf la vitesse ! a+ gégé

Salut, je suivrais l'avis d'Arnaudalp, le contenu France de Civil est famélique, les standards de représentation sont très éloignés des habitudes Françaises, (je n'arrivais pas à comprendre le profil en long que je venais de tracer) Tout ça doit pouvoir se paramétrer, mais c'est du boulot. Je n'ai que Covadis "simple", et pour moi, il est plus rentable de payer l'abonnement que de tout basculer sur Civil. (dont j'utilise par ailleurs certaines fonctionnalités ) Mais il y a des spécialistes qui devraient pouvoir te donner un avis plus éclairé ? a+ gégé

Salut Didier, je parlais de la doc lisp en ligne, enfin mise à jour il y a un ou 2 ans, après un grand vide (la dernière a jour était la 2010 je crois) Mon lien (vers la 2018) doc 2018 a+ gégé

Salut, incroyable cette histoire ... déjà, comme j'étais dans mon monde, en terme d'hyperliens, je n'avais même pas pensé à en créer vers le web... (d’où ma réponse hier) donc comme toi, aucun hyperlien avec ton dessin (autocad 2019) alors j'ai essayé avec des liens vers des photos: toujours rien j'ai supprimé les liens vers le web: toujours rien j'ai ajouté ma ligne repère: toujours rien j'ai ajouté 3 des mes lignes repère: Une avait un lien ! Mais pas les 2 autres ! ça semble expliquer le fait que les mélange semblait non aléatoire: Autocad supprimerait un nombre (variable quand même) d'hyperliens, puis en crée avec un décalage. Conclusion: Ligne rpère + hyperlien -> mal de tête assuré ... a+ gégé

Ben vla aut' chose ! Oui, j'ai un lien qui a l'air tout bien, mais Autocad mélange tous les liens, c'est assez rigolo, mais c'est pas pro ... A+ Gégé

Salut Eric, envoyer un test est vite compliqué, car il faut des liens, et un minimum de fichiers liés pour que l'on puisse constater le pb, donc je n'ai rien de prêt, car sinon la pièce jointe fera 500mo tu ira aussi vite que moi pour construire ton propre test (5 liens ça devrait marcher). Pour nous, avec autocad 2017 et 2019, c'est systématique: Lien sur mleader(avec bloc) = mélange des liens (peut être pas aléatoire ...) Les mêmes 700 liens sur des support polyligne, ou même bloc dynamique -> tout est OK. par contre je serai curieux de voir si tu ne constate pas le problème ! a+ gégé

Sur que c'est venu après la 2015 Olivier, j'aurais jamais pensé à utiliser trueview pour contourner ce problème! par contre, je rétitère mon averissement: Hyperliesn:Problème avec les mleader J'ai testé ce problème jusqu’à la version 2019, et il est vraiment lié au support mleader (dans mon cas mleader+bloc, je n'ai peut être pas testé mleader + texte) Du coup, j'ai du transformer 700 liens mleader vers un bloc dynamique d’aspect similaire, mais ça a été du sport ... ce bug autocad m'aura couté ! a+ gégé

salut à tous et à toutes, je ne crois pas que ça ait changé, il n'existe pas de propriété ou de méthode pour assigner un état de calque à un viewport ? La combine que j'utilise jusqu'a présent est de créer une vue du viewport, et ensuite lui coller un état de calque, restaurer l'état de calque, et ça ça marche. mais c'est super lourd, car ça ne marche que par des "(command " donc ça oblige a parcourir les onglets. dans la nouvelle doc LISP (enfin), j'ai trouvé des propriétés et méthodes modelview, SheetView et SyncModelView mais il n'y a pas grand chose comme info, et les tests que j'ai fait ne marchent pas, aucun etat de calque n'est appliqué Quelqu'un en sait plus ? Ci dessous un résumé de mes tests infructueux: ;;préparation (setq colViews (vla-get-views (vla-get-ActiveDocument (vlax-get-acad-object)))) (setq v1 (vla-item colViews "A-1")) (vla-put-layerstate v1 "A-1") ;;test en ligne de commande Commande: (setq vp (eobj));_eobj invite à la selection d'un objet Commande: (vla-put-ModelView vp v1) "Erreur Automation. Aucune description n'a été entrée." error successerreur : Erreur Automation. Aucune description n'a été entrée.; redéfinir après erreur Commande: (vla-put-SheetView vp v1) nil commande: (vla-update vp) nil Commande: (vla-SyncModelView vp) "Erreur Automation. Aucune description n'a été entrée." error successerreur : Erreur Automation. Aucune description n'a été entrée.; redéfinir après erreur

Salut, Il doit y avoir plusieurs sujet lisp sur la liaison avec calc. je donne ce code lisp, ou tout est d'origine .com ;****************************************************************************** ;§/openoffice/ Ouvrir une feuille de calcul au format csv spécifiée en utilisant l'API OOo pour VB / feuille ;;on peut définir avant (setq oOo-csv-separ ";") ;;site web de réference : ;;http://www.kalitech.fr/clients/doc/VB_APIOOo_fr.html ; (defun OpenCsvWithoOOsCalc ( feuille / Oprop openPar) (if (not feuille) (setq feuille (getfiled "Feuille de calcul à charger : " (getvar "dwgprefix") "csv" 0) ) ) (setq feuille (strcat "file:///" (pw_slashit feuille ))) ;;;Set serviceManager = CreateObject("com.sun.star.serviceManager") (setq serviceManager (vlax-create-object "com.sun.star.serviceManager") ) ;;Set Desktop = serviceManager.createInstance("com.sun.star.frame.Desktop") (setq Desktop (vlax-invoke-method serviceManager 'createInstance "com.sun.star.frame.Desktop" ) ) ;;;LoadParams:=VarArrayCreate([0,-1],varVariant); (setq openPar (vlax-make-safearray vlax-vbVariant '(0 . 2))) ;;;'On appelle la fonction setOOoProp définie précédemment pour récupérer la structure ;;; Set OpenPar(0) = setOOoProp("ReadOnly", True) ;;; ;(setq Oprop (setOOoProp "ReadOnly" :vlax-true)) (setq Oprop (setOOoProp "ReadOnly" :vlax-false)) (vlax-safearray-put-element openPar 0 Oprop) ;;;;;; Set OpenPar(2) = setOOoProp("Hidden", False) (setq Oprop (setOOoProp "Hidden" :vlax-false)) (vlax-safearray-put-element openPar 1 Oprop) ;;; - * - * ;; attention, ce qui suit est primordial pour ouvrir du csv avec openoffice: ;;;Dim oPropertyValue(0) As New com.sun.star.beans.PropertyValue ;;;oPropertyValue(0).Name = "FilterOptions" ;;;oPropertyValue(0).Value = "44" ;;; ;;;oDoc = starDeskTop.loadComponentFromURL( oUrl, "_blank", 0, oPropertyValue ) (cond ((= oOo-csv-separ ",") (setq Oprop (setOOoProp "FilterOptions" "44"));_ 44 pour , car (ascii ",") = 44 ) ((= oOo-csv-separ ";") (setq Oprop (setOOoProp "FilterOptions" "59"));_59 pour ; ) (t (setq Oprop (setOOoProp "FilterOptions" "44"));_ 44 pour , car (ascii ",") = 44 ) ) (vlax-safearray-put-element openPar 2 Oprop) ;;; ;;;mFileProperties(0).Name = "FilterName" ;;; ;;;mFileProperties(0).Value = "scalc: Text - txt - csv (StarCalc)" ;;; (setq Oprop (setOOoProp "FilterName" "scalc: Text - txt - csv (StarCalc)")) ;;; (vlax-safearray-put-element openPar 3 Oprop) ;;; ;;;Set DocumentoOOo = Desktop.loadComponentFromURL("private:factory/scalc", "_blank", 0, openPar) (Setq DocumentoOOo (vlax-invoke-method Desktop 'loadComponentFromURL feuille "_blank" 0 openPar ) ) )

salut, J'ai un vieux code bricolé qui me sert encore a faire un "pasteEtatCalque" d'un fenêtre à l'autre. ;;************************************************************************** ;§/calques/ lit l'état gelé-libéré fen courante d'un viewport et génere la chaine layer-string-state/none ;;inspiré de Paul Turvill (defun c:PickReferenceViewport (/ v2 frz flist l1 n is-viewport) (command "_pspace") (while (not is-viewport) (prompt "\nSelectionnez la fenêtre de référence pour l'état de calques" ) (setq v2 (ssname (ssget ":s" '((0 . "viewport"))) 0) ;;; (car ;;; (entsel ;;; "\nSelectionnez la fenêtre de référence pour l'état de calques" ;;; ) ;;; ) ) ;;pick the viewport (if (= "VIEWPORT" (cdr (assoc 0 (entget v2)))) (setq is-viewport T) (prompt "\nNot a viewport, please select a viewport") ) ) (setq frz (cdadr (assoc -3 (entget v2 (list "acad"))))) ;;...and frz will contain the viewport's extended data, with each frozen ;;viewport as the argument of a different "1003" code group. ;;To get a comma-delimited list of the frozen viewports, use: (setq flist nil) (foreach n frz (if (= (car n) 1003) (setq L1 (cdr n) ;; flist (strcat flist L1 ",") flist (cons L1 flist) ) ) ;;if ) ;;flist ;;Any layer not contained in flist is thawed in the selected viewport. (setq layer-string-state flist) (vl-propagate 'layer-string-state) ) ;;************************************************************************** ;§/calques/ restaure l'état gelé-libéré fen courante à un autre viewport à partir de la chaine layer-string-state/none (defun c:PickTargetViewport (/ v2 nvport is-viewport) (while (not is-viewport) (prompt "\nSelectionnez la fenêtre cible pour l'état de calques") (setq v2 (ssname (ssget ":s" '((0 . "viewport"))) 0) ;;; (car ;;; (entsel ;;; "\nSelectionnez la fenêtre cible pour l'état de calques" ;;; ) ;;; ) ) ;;pick the viewport (if (= "VIEWPORT" (cdr (assoc 0 (setq eg (entget v2))))) (setq is-viewport T) (prompt "\nNot a viewport, please select a viewport") ) ) (setq nvport (cdr (assoc 69 eg))) (command "_mspace") ;;(pw_setvar "cvport" nvport) (setvar "cvport" nvport) (command "_VPLAYER" "_thaw" "*" "" "") (command "_VPLAYER") (foreach l layer-string-state (if (tblsearch "LAYER" l) (command "_freeze" l "") ) ) (command "") (command "_pspace") )

Titi, La Rolls est à 50K€, et le tiens à moins de 20 k€ ? j'ai vu que la Rolls fait 2 millions de pts par secondes ! Le tiens "seulement" 360000 mais en gros combien de temps par station ? 2eme question, avec des nuages aussi dense, comment ça se passe sous Autocad ? Il vaut peut être mieux extraire les infos sous un logiciel comme Cyclone avant ? a+, gégé

En tout cas, l'exemple de Thierry laisse rêveur ...

Salut Titi, comme tu l'as dit, je n'utilise pas le scan, et comme je l'ai dit, je suis près à changer d'avis ... Surtout si les scanners abordables permettent d'avoir un pixel photo sur chaque point (ça doit beaucoup aider l'interprétation) le but de mon message (que je sais caricatural) était simplement de rappeler à X_all qu'avant de faire un investissement de l'ordre de 20k€ ou plus, il faut bien avoir conscience qu'aucune machine ne fourni une panacée universelle, indépendante de l'utilisation qu'en fait la personne, de l'environnement logiciel, et du sujet à traiter. Pour les locaux techniques qui m'occupent le plus souvent, à savoir des chambres de vanne étroites et sur encombrées, et bien la réalisation et l'exploitation du nuage est très difficile. J'ai pensé à ça quand x_all a parlé Réhab: Souvent c'est dans les sous-sols en excavation, avec une forêt d'étais, de micropieux renforcés soudés, et des parois partiellement mises à nue, que les relevés ne sont pas bons. Autre exemple, les usines ou les tuyauteries sont colmatées par les poussières: pas la peine d'imaginer mesurer un diamètre sans accéder au tuyau: on ne voit qu'une silhouette de tuyaux, et on ne voit rien derrière la 1ère nappe. C'est d’ailleurs pour ça que je me suis intéressée à la photogrammétrie, car on pouvait plus facilement voir ce qui se passait entre 2 tuyaux (après nettoyage) en multipliant les angles de prise de vue. mais en milieu industriel, l'éclairage pose problème. Voilà, chaque cas et chaque utilisation fait qu'il existe autant de solutions différentes. A+, gégé

Salut X_All, comme je l'ai déjà souvent exprimé ici, je n'ai pas été convaincu par les vendeurs de scanner jusqu’à présent. (ma dernière démo date de presque 4 ans, alors j'ai un peu de retard) ce que je pense: le Scanner c'est génial pour Lascaux ou la façade de Notre Dame, mais pour un local technique bourré de masques (gardes corps, tuyaux), ou un sous sol en rénovation bourré d'étais ... ce que tu gagne sur le terrain, tu le perds au bureau. (c'est caricatural, je sais ...) Après j'ai l'expérience de ma femme, qui travaille dans un BE béton exclusivement en réha pour Paris centre: Ils ont systématiquement des problèmes avec les plans géomètre, quelque soit la technique, mais encore plus avec ceux faits au scanner ... Problème que j'ai eu également dans une usine d'emballage, ou le client avait commandé un levé scanner, après le levé traditionnel défaillant, qui était pire que levé trad. (c'était en 2017) Après, il est évident que si c'est toi qui fait le scan, et l'exploite, avec l'attention de celui qui va l'utiliser, la donne sera certainement différente. Également, le fait d'utiliser Revit change bien des choses. Pour l'instant, je fais mes levés d'intérieur avec une station totale, je choisi et j'identifie les points que je prends, je construit donc mon relevé sur le terrain et je trouve ça bien. Mais le prochain commercial me fera peut être changer d'avis ... Donc un conseil: Pendant que le scanner scanne dans une pièce, fait un croquis, prends quelques cotes au disto et des photos, dans l'autre pièce ... a+ gégé

Salut, dans ton cas tu aura certainement besoin d'écouter tout le monde: Olivier pour l'identifiant géré par autocad, auquel tu pourra ensuite accoler ton propre identifiant et VHD et didier pour stocker cette information de façon pérenne dans le dessin (pas besoin de fichier extérieur): en utilisant des xdata ou un dictionnaire. Pour lier des entités entre elles, cet article de blog devrait t'être utile. a+ gégé

L'Eglise est impressionnante !

Salut Olivier, ce que tu dis confirme notre impression, et pour le genre d'application que l'on a, c'est un fiasco Une église, le royaume du mat et de la lumière tamisée, et de l'espace: ça doit être un bon sujet... mais pas un jour de soleil ? dans nos cas, des stations de pompages très encombrées, on n'avait pas de recul, et souvent le corps ne pouvait que pivoter. on a essayé de refaire une séance en déplaçant l'appareil avec les bras, mais le manque de retour cadrage fait que ça n'a pas marché (il est bon qu'il y ait une large plage de recouvrement entre deux photos) Au final, le temps d’acquisition devient énorme, avec une concentration très importante de celui qui prends les photos, lorsque le sujet ne s'y prête pas. a+ Gégé

Salut, pour ce qu'on la pratique, la photogramétrie marche super bien en tournant autour du sujet, mais pas l'inverse. (il doit y avoir des techniques et des soft avancé pour ça, mais les tests qu'on a fait n'ont pas été concluant ...) les résultats vont du truc époustouflant (réalisme de dingue, précision à 5mm) a la catastrophe, sans que cela soit si prévisible que ça. On en a tiré quelques règles: La photogramétrie aime le mat et le rugueux, avec un motif compliqué (en gros, un vieux mur de pierre: le top !) mais n'aime pas le lisse, uniforme unicolore et brillant. a+ gégé

Salut, pamcad fait ça avec la commande "déviation angulaire" mais il faudrait pouvoir modifier les définitions de tuyaux, qui sont des .txt, à ta convenance. et là, c'est pas gagné ... heureusement que bonus est là ... a+ Gégé

salut, j'avais fait un article de blog à ce sujet: Imprimer des profils en travers Covadis dans un carnet de détail maintenant, ça date de 2012 ... a+ gégé

Salu Lilian, en fait ma question était le fruit de plusieurs confusions. Ce qu'il faut savoir, tout bêtement, c'est que dans un .layer de stylisation, les filtres spatiaux sont enregistrés dans le système de coordonnées de la couche source, et pas dans le système du dessin. C'est logique, puisqu'un layer de stylisation est utilisable dans n'importe quel système. mais j'avais un problème d'affichage, et en regardant le .layer, je m'étais étonné du système L93 de celui ci. mais en fait, le cadastre en shapes est en L93. A+ Gégé

Salut vieux Crabe ! tu connais tes classiques ! pour info, mon dwt comportais à l'ouverture, un texte contenant la commande: (ade_projsetwscode "") a+ gégé

Salut à tous.tes ! Dans un dessin dont le système est RGF93.CC45, je crée un filtre par polygone, et ce filtre est enregistré dans un autre système, le Lambert93 en rédigeant, je pense avoir compris, c'était le système à la création du dessin. (mon dwt est en L93) je vous tiens au courant A+ gégé