Aller au contenu

capde06

Membres
  • Compteur de contenus

    619
  • Inscription

  • Dernière visite

  • Jours gagnés

    4

Tout ce qui a été posté par capde06

  1. je l'ai testé sur un plan acev environ 25 onglets ca a tres bien marché
  2. essai ca (defun c:tata () (vl-load-com) (setq lliste (layoutlist)) (foreach a lliste (setvar "ctab" a) (command "_exportlayout" a) ) ) [Edité le 5/10/2009 par capde06] [Edité le 5/10/2009 par capde06]
  3. simple active l'onglet en question bouton de droite sur l'onglet et exporter présentation en objet
  4. il suffit de mettre un asterix devant le chemin exp "command" "inserer" point "" "" "" "" "*monbloc" e bloc est décomposé
  5. la version du fichier est ecrit dans le dwg dans la 1ere ligne moi jai ca avoir si ca te convient (defun DWGVER (/ dwgfile rfile dwgver acadv) (setq dwgfile (strcat (getvar "dwgprefix") (getvar "dwgname"))) (setq rfile (open dwgfile "r")) (setq dwgver (substr (read-line rfile) 1 6)) (close rfile) (cond ((= dwgver "AC1024") (setq acadv "AutoCAD 2010") ) ((= dwgver "AC1021") (setq acadv "AutoCAD 2007, 2008 ou 2009") ) ((= dwgver "AC1018") (setq acadv "AutoCAD 2004, 2005 ou 2006") ) ((= dwgver "AC1015") (setq acadv "AutoCAD 2000, 2000i ou 2002") ) ((= dwgver "AC1014") (setq acadv "AutoCAD R14") ) ((= dwgver "AC1012") (setq acadv "AutoCAD R13") ) ((= dwgver "AC1009") (setq acadv "AutoCAD R11 ou R12") ) ((= dwgver "AC1006") (setq acadv "AutoCAD R10") ) ((= dwgver "AC1004") (setq acadv "AutoCAD R9") ) ((= dwgver "AC1002") (setq acadv "AutoCAD R2.6") ) ((= dwgver "AC1.50") (setq acadv "AutoCAD R2.05") ) ) ;_ Fin de cond (write-line (strcat "Le dessin courant a été créé avec " acadv) P2) )
  6. capde06

    chemin des X-REFS

    regarde dans laide la varia&ble PROJECTNAME
  7. et ca kesako (defun gc:mafonction ()....) pourquoi "gc" ca vient de totalarea.lsp TOTALAREA version 4.02 (gile) [Edité le 24/9/2009 par capde06]
  8. capde06

    applicatif CADTOPO

    j'ai supprimé le lien mais jai oublié de le réactiver je vais essayer de trouver le temps pour le remettre jette un œil de temps en temps
  9. regarde la commande CHAMP moi je fait ca dans fichier > propriété du dessin onglet Personnalisé je cree un Nom indice avec valeur A sur mes mise en page je cree un CHAMP qui va chercher la valeur de l'indice et le tour est joué
  10. sur quel site as tu crée ton mobil tag ca marche tres bien
  11. capde06

    Volet déroulant XREF

    la commande XREFCLASSIQUE
  12. capde06

    Petit Quizz [expert]

    moi jai ca Commande: EDITSPLINE Sélectionnez une spline: Entrez une option [adJuster données/Clore/Déplacer sommet/Affiner/Inverser/convertir en Polyligne/annUler]:
  13. essai celle la peut être ca ira mieux ROLLOVERTIPS > 0
  14. il y a aussi la variable LIMCHECK qui contrôle si tu peux dessiner hors des limites. idem limites [Edité le 9/9/2009 par capde06]
  15. regarde dans "options" "préférence utilisateur"
  16. capde06

    convertion pdf dwg

    essai le prog PDF GRABBER
  17. rien a voir mais pratique pour ceux qui on des doutes sur les échelles de fenêtre (defun c:fech() ;;vérifie l'echelle d'une fenetre dans lespace papier (vl-load-com) (alert (strcat "Echelle : 1/" (rtos (* (expt (vla-get-customscale(vlax-ename->vla-object(car(entsel))) ) -1) 1000)2 0))) ) je multiplie par 1000 parce que unité dessin = 1m
  18. capde06

    cotation

    merci ca marche nickel
  19. capde06

    cotation

    je l'ai su mais....... comment on fait pour mettre le texte de cotation sur plusieurs lignes
  20. capde06

    Somme valeur champs

    oui mais il faut passer par un tableau enfin moi je fais comme ca ca marche comme excel [Edité le 26/8/2009 par capde06]
  21. j'utilise ces fonctions pour lire et modifier un attribut ok ;; ; met a jour un bloc : entité avant entget + etiquette + code + valeur (defun upd_blk(obj eti code txt) (setq ent_att (entnext obj)) (while (/= (cdr (assoc 0(entget ent_att))) "SEQEND") (if (= (cdr(assoc 2(entget ent_att))) eti) (progn (setq e (entget ent_att)) (entmod (subst (cons code txt) (assoc code e)e)) (entupd obj) ) ) (setq ent_att (entnext ent_att)) ) ) ;; ; met a jour une entité : entité avant entget + code + valeur (defun upd_ent(obj code txt) (setq obj (entget obj)) (entmod (subst (cons code txt) (assoc code obj) obj)) ) maintenant quand je met le bloc avec attribut dans une étiquette multiple je n'arrive pas a lire ou modifier les attributs avez vous ce type de programme jai bien essayé mais la on tombe sur une entité complexe pas simple
  22. capde06

    modifications attriut

    après avoir redifini le bloc il faut le synchroniser commande BATTMAN
  23. une belle amélioration comme on aimerait en voir moins souvent - ils ont changé de place les objets dans la boite de dialogue des xref - maintenant on peut en charger ou décharger qu' un fichier a la fois. - mais on a toujours pas le choix du système de coordonné dans lequel on veut insérer le fichier ex : je suis dans un SCU je dois passer en SCG avant la commande xref une option choix du système pour l'insertion serai la bienvenue bref je passe a l'ancienne commande xrefclassique
  24. capde06

    objet annotatif

    merci rebcao mais rien n'y fait j'ai du les effacer par erreur j'suis une burne
  25. capde06

    objet annotatif

    mystère mes objets annotatif disparaissent j'enregistre je ferme le fichier j'ouvre les objets on disparut je pense pas avoir de mauvaise manip elle est ou la variable j'espère qu il y a une variable parce je suis mal ..............
×
×
  • 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é