GEGEMATIC

salut, bonne technique, en ayant 2 définitions externe des blocs A.dwg et B.dwg renommer A en B redéfinir B en insérant le bloc depuis B.dwg insérer a.dwg pour que sa définition soit présente à nouveau dans le dessin, si on en a besoin pour autre chose ... /!\ si les blocs A de couleur jaune ne doivent pas être transformé en B, alors ça marche pas ... a+ gégé

Salut, mon bon vieux PowerClic fait ça en 2/2 Plug-in selectbyattrib plug-in point2block mais bon, pour trianguler des point, une commande lisp à 3 getpoint 3 vl-cmdf, ça serait eput être encore plus efficace, non ? a+ Gégé

Salut Olivier du coup je me suis dit: il suffit de changer 3dorbit pour qu'elle passe en qtexmode, car en générale, en vue 3d, on regarde pas les textes. Mais en fait, 3dorbit ne tiens pas compte de qtexmode ! cette commande repasse en qtexmode=0 ! je désespère d'Autodesk, ils nous torturent ... Gégé (defun c:3dorb () (setvar "qtextmode" 1) (vl-cmdf "_REGEN") (vl-cmdf "_delay" 500) (vl-cmdf "_3dorbit") (setvar "qtextmode" 0) (vl-cmdf "_REGEN") )

Sur que ça m'interesse ! Il faut être Autodesk pour mettre ce parametre dans une varibale, mais pas dans le dialogue propriété du tracé ! tu en as encore d'autre comme ça ? Car avant, il y avait une option géniale, que je ne trouve plus: la qualité séparée pour les OLE et les RASTER. Quand j'avais des fonds de plan raster (ça m'arrive encore) je mettais la qualité a 200PPP pour le radter, et au max pour les OLE, comme ça je mettais les logo du cartouche en OLE. ça n'existe plus dans le dialogue . a+, gégé

Salut Olivier, super intéressant, mais ça me fout les boules ! dans les années 2000, une de mes grandes activités sur les fourme a été de diffuser des outils pour remplacer les polices ttf (très très lentes à cette époque) : - des ttf convertis en shx (en utilisant Microstation) - des lisp repérant les polices TTF et leur substituant du shx. Il y a peu, j'ai au contraire remplacé tous les shx par du TTf, car le drivers pdf d'autocad génère des commentaires à la place du shx, est c'est très très lourd. donc je vois revenir le problème: un mode travail, un mode tracé, du lisp à tire larigot, car en fait ces histoires de substitutions sont toujours plus compliquées que ce que l'on croit, le formatage des mtext et mleader créent beaucoup de problème ... grr! Gégé

Salut, Du pur Crabe dans le texte ! a+ gégé

salut, la encore, ce n'est pas si simple: civil contient une partie de Map, mais pas les modèles métiers. A+ gégé

salut, ça fait entre 1600 et 1660 HT le renouvèlement. a+ Gégé

Salut les gras, et mercis pour ces infos. finalement, je reste en suite, car au moins pour la partie map/civil, je vais certainement l'abandonner dans les années à venir, et je pourrais continuer ma migration avec autocad 2021. c'est toujours le flou, donc ya toujours un loup ... a+ Gégé

Salut à tous, je dois renouveler mes abonnements, des suites, et on me propose de passer à une collection. -> C'est bien ou pas ? -> ai-je vraiment le choix ? A+ Gégé

Salut à tous, A l'impression d'un pdf avec de nombreus hyperliens, attachés à des ligne repère de type multileader bloc, on a constaté une confusion totale des liens. remplacé la multileader par une simple polyligne, tout est rentré dans l'ordre ... a+ gégé

Quelle vilaine nouvelle, et on a mis 3 mois à s'en rendre compte ! J'utilise ses découvertes tous les jours, et comme je l'avais cité dans un de mes derniers sujets, j'aurai du être surpris qu'il ne pointe pas le bout de son nez ... Un grand, dont je ne connaissais pas grand chose, très discret sur lui même.

salut vieux crabe, et merci, je laisse tomber les Atlas, c'est encore un truc pas suivi/pas fini ... le bug du décalage est connu depuis longtemps: signalé en 2013 mais le plus drôle, c'est la solution proposée par Autodesk en 2017 la "solution" Autodesk Qui en plus est fausse dans le dignostic, car on retrouve le problème en A3 et élégant, à des degrés divers... Cette fonctionnalité marche très bien sous Qgis, mais le client veux du Autocad ... alors je vais bricoler à l'ancienne... a+ gégé

Salut à tous, (et le Crabe en particulier ...) est-ce que quelqu'un peut me confirmer qu'ATLAS ne gère pas les SCU ?

Lorsque cette fonctionnalité avait été ajoutée, je l'avais testée, et il me semble que ça avait marché. je ne l'avais plus jamais utilisé, puisque le temps de mise en oeuvre, par rapport à mon besoin, ne la rendait pas attractive. Mais là j'avais 125 tuiles, ça m'a paru intéressant de l'utiliser. - Sous la 2015, que j'utilise d'ordinaire, l'expérience s'arrete au message "Erreur lors du chargement des paramètres d'atlas." - Sous la 2017, je m'approche d'un résultat , avec quelques limitations ... Avec le SCU général, les tuiles sont créées au bon endroit, mais la fenêtre principale pointe dans une zone décalée d'a peu près 200m en X et Y (210.123 et 193.123) tandis que la fenêtre clé pointe au bon endroit, mais avec les calques que j'ai choisi d'afficher désespérément gelés ... donc je vais faire autrement ...

Pour le SCU, je vais pouvoir le gérer en imprimant des xref que je vais tourner, mais j'ai également un problème avec les champs numérotation: Comme j'ai des dalles sélectionnées manuellement, j'ai mis numérotation séquentielle, et la, ça marche pas (alors que les numéros de Type A-1, A-2 marchaient très bien des idées ? a+ gégé

Salut à tous, c'est une impression ou cette commande ne gère pas les SCU ? a+ Gégé

je voulais faire qq chose de mieux, mais j'ai eu un pb insoluble, le fait que _pastclip ne soit pas terminé avant que l’interpréteur lisp ne passe à autre chose. ;;************************************************************* ;;§/hyperliens/chainage de pasteclip d'une photo puis création du lien/ none ;;ne marche pas car la commande "_pasteclip" ne temporise pas: la suite s'exécute alors que la commande n'est pas finie ; (defun c:paste_hyper_photo (/ en chem jpg lf) (setq lastent (entlast)) (setq pt (getpoint "\nEntrez la position de la flèche de direction de l'hyperlien")) ;;(vl-cmdf "_pasteclip" pt 10 0) (vla-SendCommand (vla-get-ActiveDocument (vlax-get-acad-object)) "_pasteclip 0,0 10 0") (setq img (entlast)) (if (/= img lastent) (progn (setq oimg (vlax-ename->vla-object img)) (setq chem (vla-get-imagefile oimg)) ;;(pau) ;;(entdel (entlast)) ;;ImageFile = "E:\\ACLSP\\dwg14\\Saint-Gobain\\2019\\PHOTOS\\2019-06-14\\PHOTOGRAMMETRIE\\P1760799.JPG" (setq lastent (entlast)) (command "_.MLEADER" pt pause ) (setq lea (entlast)) (if (/= lea lastent) (ajoute_hyperlien lea chem chem "") (prompt "\nPas de ligne repère créée") ) ) ) (entdel img) (prompt "\nPas d'image collée") ) j'ai donc essayé une autre méthode pour lire ce presse papier: merci patrick ... mais outre qu'il y a un pb de sécurité qui ouvre un dialogue malencontreux, on arrive pas à lire autre chose que du texte, je ne sais pas si il existe d'autre mots clefs. donc j'ai arrêté là. a+ gégé

salut, finalement je me suis tourné vers une solution qui me paraissait archi simple ce matin, mais qui au final ne l'était pas tant que ça. J'ai donc du renoncer un peu, mais finalement j'ai ça: Il faut copier la photo dans le visualisateur, puis la coller dans le dessin, et ensuite lancer la commande place_hyper_photo ;;************************************************************* ;;§/hyperliens/a partir de la dernière phot collée, place un hyperlien multileader/ none (defun c:place_hyper_photo (/ ech etype img oimg chem lea ) (setq etype (cdr (assoc 0 (entget (setq img (entlast)))))) (if (= etype "IMAGE") (progn (setq oimg (vlax-ename->vla-object img)) (setq chem (vla-get-imagefile oimg)) (command "_.MLEADER" pause pause ) (setq lea (entlast)) (if (/= lea img) (ajoute_hyperlien lea chem chem "") (prompt "\nPas de ligne repère créée") ) (entdel img) ) ) (prompt "\nPas d'image collée") ) ;*********************************************************************** ;;§/hyperliens/crée un hyper-lien sur un objet/ ename lien emplacement desc ;; emplacement uniquement utile pour page web, defaut "" ;;(ajoute_hyperlien (enam) lien (strcat "Rep " lien) "") ;;(ajoute_hyperlien (enam) lien (strcat "Rep " lien) "") ; (defun ajoute_hyperlien (ename lien desc emplacement / vlaobj vlahyp) (setq vlaobj (vlax-ename->vla-object ename)) (setq vlahyp (vlax-get-property vlaobj 'Hyperlinks)) (setq emplacement (vlax-make-variant emplacement)) (setq desc (vlax-make-variant desc)) (cond ((and desc emplacement) (vlax-invoke-method vlahyp 'Add lien desc emplacement) ) (desc (vlax-invoke-method vlahyp 'Add lien desc) ) ) ) je vous explique ensuite les ,pb rencontrés pour faire mieux... a+ gégé

En fait en regardant ce matin, grâce à Process explorer, what-is-it-running j'ai pu trouver la dll de photoviewer: C:\Program Files\Windows Photo Viewer mais on ne peut pas l'ajouter comme composant com. a+ gégé

Salut Fraid, c'est le type de solution que j'envisage, faire un visualisateur basic en .net mais c'est pareil, je manque toujours de temps ... Au départ, je pensais utiliser la Visionneuse de photos Windows, en me disant qu'elle serait certainement bien exposée en .com et que je pourrai la manipuler comme excel ou word. mais malheureusement, cet outil n'est pas visible directement, il est hébergé par dllhost.exe et je ne sais donc pas comment l'utiliser. a+ Gégé

Salut à tous, dans une affaire, je dois créer des hyperliens depuis des photos. j'ai tout ce qu'il faut coté hyperliens pour créer un hyperlien dans le sens: -objet pour hyperlien, -création hyperlien -choix de la photo. sauf qu'a l'usage, je préfèrerai visionner mes photos, et quand une me plait, créer l'hyperliens. Mon idée: ouvrir une appli de visualisation de photo, n'importe laquelle, disons Xnview, quand la photo est bonne, je crée mon hyperlien qui va prendre le nom de la photo affichée (et éventuellement son chemin) j'ai vu ce sujet: retour appli externe mais je me demande où Bonus a trouvé la propriété "status", car elle n'est pas documentée lorsque l'on fait un dump. toute idée est la bienvenue, je peux bien sur entrer le nom de la photo manuellement, mais ce serait vraiment un plus de faire comme ça. a+ gégé

Salut, les démos sont bluffantes, mais on a pas réussi à l'utiliser: même avec une carte graphique quadro impossible de faire marcher les CUDA. c'est pourtant tout l’intérêt de meshroom, utiliser les processeurs graphiques plutôt que l'UC. Notre meilleur logiciel en photogrammétrie reste pour l'instant Recap, avec le problème de la bande passante montante, qui n'est pas géniale en Savoie ... a+ Gégé

Salut, j'ai 2 versions, une toute simple que je te poste tout de suite,et une autre qui fonctionne avec un recalage d'helmert (reversible), par saisie de point et stockage dans un fichier ini, ou en utilisant un fichier CLD de Covadis. mais là c'est plus lourd, il faut avoir PowerClic pour le dépendances. a+ gégé ;;************************************************************************** ;;§/zoom/saisit un zoom panoramique pour la mise à jour de plusieurs fenêtres /none ;;sert à recaler les fenêtre de l'espace papier (defun c:saisit_pan ( / pb pf) ;;var globales : real-pb real-pf (if (= (getvar "tilemode") 0) (command "_mspace") ) (setq pb (getpoint "Zoom panoramique 1er point")) (setq pf (getpoint pb "Zoom panoramique 2eme point")) (setq real-pb (pw_scu2scg pb)) (setq real-pf (pw_scu2scg pf)) (command "_pan" pb pf) ) ;;************************************************************************** ;;§/zoom/suite à c:saisit_pan, permet de mettre à jour plusieurs fenêtre /none ;;sert à recaler les fenêtre de l'espace papier suite à une transaltion de plan ;;accepte les scu multiples ; (defun c:ajour_pan ( / sel lsel nvport eg l) (command "_pspace") (prompt "\nChoisissez les fenêtres à mettre à jour") (setq sel (ssget '((0 . "VIEWPORT")))) ;; (setq lsel (pw_listsel sel)) (setq lsel (LM:ss->ent sel)) ;;var globales : fen-aro fen-dep cg-ref cg-base (foreach l lsel (setq eg (entget l)) (setq ovp (vlax-ename->vla-object l)) (setq locked (vla-get-DisplayLocked ovp)) (vla-put-DisplayLocked ovp :vlax-false ) (setq nvport (cdr (assoc 69 eg))) (command "_mspace") (setvar "cvport" nvport) ;;translate (command "_PAN" (pw_scg2scu real-pb) (pw_scg2scu real-pf)) (vla-put-DisplayLocked ovp locked ) ) ) ;;lee mac programming: ;;http://lee-mac.com/selectionsettolist.html (defun LM:ss->ent ( ss / i l ) (if ss (repeat (setq i (sslength ss)) (setq l (cons (ssname ss (setq i (1- i))) l)) ) ) )

salut, pour ceux qui comme moi développent avec le langage VB, il y a ce sujet de 2012, déjà largement inspiré par les conseils de Gille. sujet sur les liaison lisp/vb.net finalement, j'ai très peu utilisé cette technique, en lisp je remplace les cases de dialogue au maximum par des choix ligne de commande, et lorsque le dialogue s'impose, je fais des DCL ultra minimaliste. a+ gégé