fabcad

Bonjour, je souhaiterais savoir si des personnes ont ecrit des programmes LISP ou en VBA qui gèrent l'application Graph pour générer des graphiques de type histogrammes sur autocad. fabcad

:exclam: peut-être un logiciel de conception mécanique ! sais-pas non plus ! fabcad

Bonjour Didier, Merci pour l'info j'utilise pour ma part le gratuiciel PDF CREATOR qui suit le même raisonnement. Ton gratuiciel gère-t-il les calques ??? Fabcad

:mad: Les champs se mettent à jour avec la variable fieldeval sauf le champ DATE c'est agaçant de programmer une fonction LISP ou VBA afin de mettre à jour des dates sur plusieurs présentations. Encore et encore c'est que le début... fabcad

Bonjour et bravo pour ton idee Sergech, Pour ma part je souhaiterais savoir si avec une programmation vba ou autolisp nous pourrions générer des fichiers SVG ? Est-ce que la structure d'un fichier SVG change suivant les viewers SVG ? Avec Autodesk map nous pouvons générer des requetes en mode rapport qui est en fait l'envoi des propriétés d'objets interrogés (calque, longueur, couleur, etc ainsi que des données alphanumériques liées à ces objets) dans un fichier Texte.TXT séparés par des points-virgules. fabcad [Edité le 16/11/2004 par fabcad]

Qu'est-ce qu'un plugin. et que faut-il téléchargé sur le site www.w3c.org. fabcad

Oui bel évènement mais trop cadencé pour les horaires des différentes conférences. Ils ont de très bons orateurs mais sur certaines conférences le temps manquait pour poser les questions! Je n'ai pas pu aller à la conférence des trucs et astuces sur AutoCAD 2005 car j'étais affairé sur le domaine SIG avec le référentiel à grande Echelle d'IGN. Si vous avez de bons trucs et astuces à nous communiquer... fabcad

Le langage de dessin SVG n'est pas supporté par AutoCAD, facile à comprendre puis qu'AutoDESK (de visu à autodesk in-vivo) mise beaucoup sur son format vectoriel DWF. Star Office de Sun Systems enregistre sous le format SVG, Adobe Illustrator je crois aussi. Sinon il y a le logiciel gratuit Sodipodi sur www.clubic.com qui utilise ce format comme format natif. fabcad [Edité le 15/11/2004 par fabcad]

pamola il y a les attributs de blocs mais il y a aussi la gestion de ce genre de données avec DBCONNECT. avec une base de données tu pourras créer des etiquettes autonomes (mtextes avec récupération des champs de la table) fabcad

SUR AUTODESK MAP 3D 2005 CELA EST POSSIBLE. SUR LES VERSIONS ANTERIEURES JE NE POURRAIS PAS TE REPONDRE. FABCAD

Bonjour a tous, Ya t'il des personnes qui recherchent comme moi un peu plus d'ergonomie dans ce logiciel... j'aimerais créer des graphiques (histogrammes camemberts...) d'après des données liées de sgbd et d'objets autocad map. merci d'avance, fabcad

Bonjour dfbiagio, Ayant fais des recherches sur le sujet j'avais trouvé sur ce site : http://www.cnig.serveur-1.net/fiches/55DAOCAO.doc plein d'informations pratiques sur la CAO DAO SIG. Bonne lecture et si cela peut t'aider. fabcad

Merci Patrick, Est-ce la version française ? fabcad

Je souhaiterais savoir si la composante "Parcellaires" (scans des planches cadastrales de la DGI)du Référentiel à Grande Echelle seront insérées et géoréférencées sur AutoCAD. fabcad

Trouvez sur les forums concernant l'explication sur le style de tracé nommé INVISIBLE et vous trouverez la solution a vos problemes. fabcad

Avec la fonction _rectang d'autocad quelle variable gère la Largeur. C'est bizarre que la variable PLINEWID ne modifie pas cette largeur. fabcad

Merci patrick pour l'info, Mais doit-il être installé sur une version autodesk map 3d 2005 ??? Car il existe un patch pour map 3d 2005 mais il ne resout que les problemes map !!! fabcad

Bonjour, Je souhaiterais qu'avec tous les manques que j'ai évoqué auparavant, que le pinceau de copie de propriétés d'autocad inclut dans la version MAP les copies de données d'objets ainsi que les liens des Bases de Données Externes. fabcad

Dommage il oriente tous les attributs...

canotier, Je crois que que ton message parle de l'ecriture dans ta base de données des coordonnées ou autre chose sans passer par des etapes transitoires. C'est-ce qui manque dans Autodesk Map !!! Sinon la solution est de creer un bloc coordonnées et de l'inserer sur ton dessin en le liant a l'enregistrement de ta BdD (creer un cle sur ta BdD et sur ton objet bloc avec un attribut servant de clé) puis dans un dessin projet associer ton dessin et effectuer ue requete en mode rapport en récupérant toutes les valeurs des champs de l'enregistrement associé au bloc et les coordonnées de son point d'insertion. Ce rapport sera un TXT avec les champs séparés par des points-virgules et donc récupérables dans ACCESS et Excel. voila il y a peut-être d'autres solutions... fabcad

Bonsoir CGDESSINE, voici les lignes de mon programme d'edition globale d'attributs : ecris dans le bloc notes et enregistre-le sous EDIT-ATT.LSP tu pourras le charger par un glisser-déposer dans autocad et lancer la fonction en tapant sur la ligne de commande edit-att. Fabcad ;;; fonction d'edition globale d'attributs sur plusieurs attributs ;;; issue de la fonction AutoCAD ATTEDIT ;;; Créee le 18-05-1999 ;---------------------------------------------------------------------- (defun sty-att () (setq nom-b (getstring "\n Nom du bloc <*>: ")) (if (= nom-b nil) (setq nom-b "*")) (setq ETIQ (getstring "\n Spécification Etiquette de l'attribut : ")) (setq val-at (getstring "\n Spécification Valeur de l'attribut <*>: ")) (if (= val-at nil) (setq val-at "*")) (setq p1 (getpoint "\n Sélection par Fenêtre - premier point : ")) (setq p2 (getcorner p1 "\n Second point : ")) (setq sty (getstring "\n Nouveau Style des attributs : ")) (if (= sty nil) (setq sty "")) (command "-ATTEDIT" "OUI" nom-b ETIQ val-at "fe" p1 p2) (while (/= (getvar "cmdnames") "") (command "Style" sty "") ) (princ) );fin defun htr-att ;---------------------------------------------------------------------- (defun htr-att () (setq nom-b (getstring "\n Nom du bloc <*>: ")) (if (= nom-b nil) (setq nom-b "*")) (setq ETIQ (getstring "\n Spécification Etiquette de l'attribut : ")) (setq val-at (getstring "\n Spécification Valeur de l'attribut <*>: ")) (if (= val-at nil) (setq val-at "*")) (setq p1 (getpoint "\n Sélection par Fenêtre - premier point : ")) (setq p2 (getcorner p1 "\n Second point : ")) (setq htr (getstring "\n Nouvelle hauteur des attributs : ")) (if (= htr nil) (setq htr "")) (command "-ATTEDIT" "OUI" nom-b ETIQ val-at "fe" p1 p2) (while (/= (getvar "cmdnames") "") (command "Hauteur" htr "") ) (princ) );fin defun htr-att ;---------------------------------------------------------------------- (defun ang-att () (setq nom-b (getstring "\n Nom du bloc <*>: ")) (if (= nom-b nil) (setq nom-b "*")) (setq ETIQ (getstring "\n Spécification Etiquette de l'attribut : ")) (setq val-at (getstring "\n Spécification Valeur de l'attribut <*>: ")) (if (= val-at nil) (setq val-at "*")) (setq p1 (getpoint "\n Sélection par Fenêtre premier point : ")) (setq p2 (getcorner p1 "\n Second point : ")) (setq ang (getstring "\n Angle pour ces attributs : ")) (if (= ang nil) (setq angle "")) (command "-ATTEDIT" "OUI" nom-b ETIQ val-at "fe" p1 p2) (while (/= (getvar "cmdnames") "") (command "Angle" ang "") ) (princ) );fin defun ang-att ;---------------------------------------------------------------------- (defun col-att () (setq nom-b (getstring "\n Nom du bloc <*>: ")) (if (= nom-b nil) (setq nom-b "*")) (setq ETIQ (getstring "\n Spécification Etiquette de l'attribut : ")) (setq val-at (getstring "\n Spécification Valeur de l'attribut <*>: ")) (if (= val-at nil) (setq val-at "*")) (setq p1 (getpoint "\n Sélection par Fenêtre premier point : ")) (setq p2 (getcorner p1 "\n Second point : ")) (setq coul (getstring "\n Couleur pour ces attributs : ")) (if (= coul nil) (setq coul "")) (command "-ATTEDIT" "OUI" nom-b ETIQ val-at "fe" p1 p2) (while (/= (getvar "cmdnames") "") (command "CO" coul "") ) (princ) );fin defun ;---------------------------------------------------------------------- (defun cal-att () (setq nom-b (getstring "\n Nom du bloc <*>: ")) (if (= nom-b nil) (setq nom-b "*")) (setq ETIQ (getstring "\n Spécification Etiquette de l'attribut : ")) (setq val-at (getstring "\n Spécification Valeur de l'attribut <*>: ")) (if (= val-at nil) (setq val-at "*")) (setq p1 (getpoint "\n Sélection par Fenêtre premier point : ")) (setq p2 (getcorner p1 "\n Second point : ")) (setq calq (getstring "\n Calque pour ces attributs - [0] : ")) (if (= calq nil) (setq calq "0")) (command "-ATTEDIT" "OUI" nom-b ETIQ val-at "fe" p1 p2) (while (/= (getvar "cmdnames") "") (command "CA" calq "") ) (princ) );fin defun ;---------------------------------------------------------------------- (defun Val-att () (setq nom-b (getstring "\n Nom du bloc <*>: ")) (if (= nom-b nil) (setq nom-b "*")) (setq ETIQ (getstring "\n Spécification Etiquette de l'attribut : ")) (setq val-at (getstring "\n Spécification Valeur de l'attribut <*>: ")) (if (= val-at nil) (setq val-at "*")) (setq p1 (getpoint "\n Sélection par Fenêtre - premier point : ")) (setq p2 (getcorner p1 "\n Second point : ")) (setq val (getstring "\n Nouvelle Valeur des attributs : ")) (if (= val nil) (setq val ".")) (command "-ATTEDIT" "OUI" nom-b ETIQ val-at "fe" p1 p2) (while (/= (getvar "cmdnames") "") (command "Valeur" "Remplacer" val "") ) (princ) );fin defun Val-att ;---------------------------------------------------------------------- (defun c:edit-att ( / chx cnt) (setq cnt T) (while cnt (initget "Hauteur Angle Style COuleur CAlque Valeur") (setq chx (getkword "\n Option [Hauteur/Angle/Style/COuleur/CAlque/Valeur] : ")) (cond ((= chx "Angle") (ang-att)) ((= chx "COuleur") (col-att)) ((= chx "CAlque") (cal-att)) ((= chx "Hauteur") (htr-att)) ((= chx "Style") (sty-att)) ((= chx "Valeur") (Val-att)) (T (setq cnt nil)) );fin cond );fin while (prompt "\n---COPYRIGHT 05/99 par Fabcad---") (prin1) );fin defun edit-att

Bonjour a tous, Pour un diaporama créé sur Powerpoint nous avons insere un objet Express Viewer sur une diapositive mais lors du lancement du diaporama nous ne ouvons pas activer le Run du dessin DWF. D'où ma question comment activer le Run dans un diaporama Powerpoint (v2000)? merci, Fabcad

Le service pack 1 d'autodesk map 3d 2005 resout-il les problemes du noyau autocad 2005 ? fabcad

nobless Cela fonctionne aussi avec la commande diviser qui se trouve au même endroit. fabcad

Bonjour LISP ET VBA fin voici un exemple de programmation combinant lisp et vba (setvar "cmdecho" 0) (setvar "filedia" 0) (setvar "cmddia" 0) (command "_vbaload" "E:/lisp/Imprimer.dvb") (command "_vbarun" "Impression") (if (= (getvar "users5") "Fermer") (progn (command "_vbaunload" "E:/lisp/Imprimer.dvb") (setvar "filedia" 1) (setvar "cmddia" 1) );fin progn );fin if bonne utilisation fabcad