Aller au contenu

ici

Membres
  • Compteur de contenus

    10
  • Inscription

  • Dernière visite

Tout ce qui a été posté par ici

  1. ici

    Remplacement de blocs

    merci pour le lisp ca marche nikel mais j'ai un autre probleme du coup je viens de m'apercevoir que tous les blocs du dessin qui viennent d'une exportation de map info vers autocad avaient leurs coordonnees X et Y =0 mais etaient bien places.donc quand je les renomme ils se placent tous en X et Y=0 je m'explique dans l'exportation mapinfo je choisis de conserve les donnees d'attributs le fichier dxf obtenu est compose de blocs places aux bonnes coordonnees (lambert de ma commune) mais quand je fais liste les coordonnees sont XetY=0. par contre quand je le decompose le seul element graphique du bloc a savoir un point se trouve aux bonnes coordonnees. comment faire pour avoir les coordonnees des blocs egales a leur position reelle. peut on appliquer une epaisseur a un point au moins pour une sortie graphique ca n'a pas l'air possible meme avec les tables de traces. mais la je sort du sujet. c'est tout merci
  2. ici

    Remplacement de blocs

    bonjour le lisp de patrick 35 m'interesse beaucoup j'ai le meme probleme mais le lien me dirige vers un site bloque par mon administrateur est ce que quelqu'un peut me l'envoyer directement geraud.be@free.fr merci
  3. ici

    Remplacement de blocs

    bonjour le lisp de patrick 35 m'interesse beaucoup j'ai le meme probleme mais le lien me dirige vers un site bloque par mon administrateur est ce que quelqu'un peut me l'envoyer directement geraud.be@free.fr merci
  4. bonjour j'ai lt2006+ltextender le lisp de rebcao me va tres bien mais (il y a toujours un mais) est il possible de le coupler avec la selection rapide pour affiner encore la selection. d'ailleur dans la selection rapide rubrique "appliquer a" ,je n'ai que dessin entier et la case de selection a cote est grisee.
  5. ici

    viewer pour dwg autocad 2007

    bonjour il ya aussi a9cd
  6. moi c'etait pareil et maintenant ca marche! grand merci
  7. bonjour en recherchant dans mes archives j'ai trouve ca ;;Power-CLic gratuiciel/partagiciel : ;;HTTP://WWW.POWER-CLIC.COM ;; BLOC_0 BLARG0 (if pw-foreign (progn (Prompt "\nAll drawing's block redefinition © G-EAUX 2001 ") (prompt "\nBloc_o to put all entiies on 0 layer") (prompt "\nblarg0 to make all entities with bylayer width") (prompt "\nbcoul0 to make all entities with byblock color") ) (progn (Prompt "\nredéfinition automatique des blocs © G-EAUX 2001 ") (prompt "\nBloc_o pour que les entités soit sur le calque 0") (prompt "\nblarg0 pour largeur ducalque") (prompt "\nbcoul0 pour couleur dubloc") ) ) ;;definit tous les bloc fait de calque 0 ;;define all block made with layer zero entities ; (defun c:bloc_0 ( / ent first to_0 ) (defun to_0 ( / tmp eg) (while ent (setq eg (entget ent)) (if (not (equal (setq tmp (assoc 8 eg)) '(8 . "0"))) (progn (setq eg (subst '(8 . "0") tmp eg)) (entmod eg) ;(print eg) (entupd ent) ) ) (setq ent (entnext ent)) ) ) (setq first (tblnext "block" 't)) (setq ent (cdr ( assoc -2 first ))) (to_0) (while (setq ent (tblnext "block" )) (setq ent (cdr ( assoc -2 ent ))) (to_0) ) (command "._regen") ) ;;definit tous les bloc fait de ligne de largeur ducalque ;;define all block made of byblock color entities ; (defun c:blarg0 ( / ent first to_l0 ) (defun to_l0 ( / tmp eg ) (while ent (setq eg (entget ent)) (if (print (setq tmp (assoc 370 eg))) (progn (print (setq eg (subst '(370 . -2) tmp eg))) (entmod eg) ;(print eg) (entupd ent) ) ) (setq ent (entnext ent)) ) ) (setq first (tblnext "block" 't)) (setq ent (cdr ( assoc -2 first ))) (to_l0) (while (setq ent (tblnext "block" )) (setq ent (cdr ( assoc -2 ent ))) (to_l0) ) (command "._regen") ) ;;definit tous les bloc fait de ligne de couleur dubloc ;;define all block made of byblock color entities ; (defun c:bcoul0 ( / ent first to_c0 ) (defun to_c0 ( / tmp eg ) (while ent (setq eg (entget ent)) (if (print (setq tmp (assoc 62 eg))) (progn (print (setq eg (subst '(62 . 0) tmp eg))) (entmod eg) ;(print eg) (entupd ent) ) ) (setq ent (entnext ent)) ) ) (setq first (tblnext "block" 't)) (setq ent (cdr ( assoc -2 first ))) (to_c0) (while (setq ent (tblnext "block" )) (setq ent (cdr ( assoc -2 ent ))) (to_c0) ) (command "._regen") ) j'espere que ca va
  8. bonjour je reste sans voie encore merci c'est tout a fait ce que je cherchais
  9. bonjour moi je cherche la meme chose que le lisp de kallain mais en prenant une polyligne pour l'orientation à la maniere du scu de l'objet ou une solution pour le modifié(je suis novice) merci
  10. salut pdf creator fonctionne tres bien on peut meme changer la resolution au moment d'enregistrer le fichier on peut changer le format (pdf)et prendre par exemple du jpg ou un autre format image pour finir un petit utilitaire sous java pour joindre plusier pdf de formats ou d'orientations differentes et choisir l'ordre des pages un logiciel libre:POM
×
×
  • Créer...

Information importante

Nous avons placé des cookies sur votre appareil pour aider à améliorer ce site. Vous pouvez choisir d’ajuster vos paramètres de cookie, sinon nous supposerons que vous êtes d’accord pour continuer. Politique de confidentialité