Aller au contenu
Problème de lien d'inscription (résolu ?) ×

AutoCAD 2019

260 sujets dans ce forum

  1. Impression d'onglets en PDF

    Par Invité Phil31,
    • 3 réponses
    • 510 vues

  2. Probleme création PDF depuis autocad

    Par Phil31,
    • 1 réponse
    • 444 vues

  3. Rotation d'attributs de blocs, selon les polylignes les plus proches

    Par Kilian336,
    • 14 réponses
    • 877 vues

  4. importation calques

    Par Invité opalestc,
    • 1 réponse
    • 451 vues

  5. [résolu] bloc et poignée: relatif ou absolu

    Par Invité bubblebe,
    • 8 réponses
    • 2,3 k vues

  6. Export MNT

    Par Invité Matt,
    • 1 réponse
    • 363 vues

  7. Importer un semis de TEXTE depuis un csv

    Par Vijinn,
    • 4 réponses
    • 826 vues

  8. Changer les décimales dans des champs mtext

    Par Fabs,
    • 0 réponse
    • 2 k vues

  9. Bloc avec objet Nettoyer

    Par AdrienMEURET,
    • 19 réponses
    • 3,8 k vues

  10. Modification de formule

    Par Invité 14PLE50,
    • 2 réponses
    • 389 vues
    • Invité
    • Invité

  11. Modifier les Coordonnés d'une ligne en modifiant la précision?

    Par tibe,
    • 6 réponses
    • 805 vues

  12. Hachures (catalogue)

    Par LeGritche,
    • 2 réponses
    • 984 vues
    • Invité
    • Invité

  13. Decaler plusieurs polylignes fermées simultanément

    Par Maxime10,   
    • 5 réponses
    • 773 vues

  14. Lisp RB sur Autocad 2019

    Par Joutof,
    • 9 réponses
    • 3,1 k vues

  15. changer les attributs de plusieurs bloc à la fois avec gatte

    Par ABDELO,
    • 2 réponses
    • 819 vues

  16. Perte de données

    Par Geof,
    • 12 réponses
    • 1,3 k vues
    • Geof
    • Geof

  17. Plus de PAN avec le bouton du milieu

    Par Invité alf,
    • 5 réponses
    • 1,1 k vues

  18. fusion des dessins avec le lisp de patrick_35 "Grf"

    Par Fabs,
    • 2 réponses
    • 755 vues
    • Fabs
    • Fabs

  19. [Résolu] Impression par Autoscript

    Par William44850,
    • 7 réponses
    • 1,1 k vues

  20. RECHERCHE UN LISP DE CALCUL DE SURFACE

    Par abricot,
    • 18 réponses
    • 4,1 k vues

  21. Echelle d'insertion en pouces

    Par dainese,
    • 6 réponses
    • 1,1 k vues

  22. [Résolu] Impossible charger cuix

    Par William44850,
    • 4 réponses
    • 998 vues

  23. Problème autosnap, Accrochage "Point Topo"

    Par Alaric,
    • 5 réponses
    • 948 vues

  24. Wbloc en sélectionnant le bloc sans rechercher son nom.

    Par Fabs,
    • 0 réponse
    • 759 vues

  25. commande Lisp

    Par Invité Philippe,
    • 0 réponse
    • 752 vues
    • Invité
    • Invité


  • Statistiques des forums

    • Total des sujets
      49,2 k
    • Total des messages
      298,6 k

  • Sujets

  • Messages

    • AntoineB
      Nuage de points et DAO sur Mensura 12

      Par AntoineB · Posté(e)

      Salut et bienvenue, Je ne peux malheureusement pas t'aider, j'utilise les nuage de points de manière très basique. Par exemple, je fais des filtres sur mes points puis je transforme le tout en terrain. Bon courage
    • Geo34
      Autopiste / Mensura

      Par Geo34 · Posté(e)

      @Philippe_B  Je viens de lire l'intitulé de ton poste donc je rajouterai également une moins grande souplesse dans la création de giratoire et une création aléatoire pour le tracé des carrefours. La palette de signalisation est également moins complète , pas d'outil d'aide pour le tracé d'échangeur routier et autoroutier...  
    • >>NicoM
      Optimisation de l'insertion de blocs avec des attributs

      Par >>NicoM · Posté(e)

      Bonjour, Cela fait un moment que je n'ai pas posé de question sur ce forum, mais je suis bloqué sur un problème et j'aimerais obtenir des conseils. Je cherche à insérer un bloc comportant plusieurs attributs dans AutoCAD, en affectant leurs valeurs directement depuis une feuille Excel. Actuellement, j'ai une version fonctionnelle qui affecte les propriétés au dernier bloc inséré, et les attributs récupèrent et compilent ces propriétés. Cependant, le temps d'exécution est assez long, et j'aimerais optimiser ce processus (voir code ci-dessous). Mon objectif serait de sauter l'étape intermédiaire des propriétés et d'intégrer directement les attributs dans le bloc. Il me semblait qu'avec Entmake, Attdef et Attrib, c'était plus rapide et relativement simple, mais je n'arrive pas à comprendre leur fonctionnement. En parcourant le code Edit_bloc3.5 de (gile), j'ai l'impression d'être encore plus perdu qu'au départ. Auriez-vous des suggestions pour optimiser le temps d'exécution et simplifier ce processus ? Merci d'avance pour votre aide !   ;; BOUCLE POUR LES POTEAUX   (setq index 0)   (while (< index nb-row)       ;; Récupération de la liste courante     (setq lst (nth index data-list))       ;; Liste des variables à définir     (setq var1 '(ID A B phi H D C Nb N1 N1_larg N1_long S1 L1 fL1 fL2 N2 S2 E2 L2 fX2 fY2 N31 N312 S31 E31 L31 fY31 N32 N322 S32 E32 L32 fX32 V_béton P_tot Ratio pos_X pos_Y visi_sch))       ;; Liste des indices correspondants dans lst     (setq ind1 '(6 7 8 9 10 11 12 15 16 17 18 19 20 21 22 24 25 26 27 28 29 32 33 34 35 36 37 40 41 42 43 44 45 50 51 52 61 62 63))             ;; Association des variables aux valeurs récupérées         (mapcar '(lambda (var index) (set var (vlax-variant-value (nth index lst)))) var1 ind1)               ;; Conversion explicite des coordonnées en réel         (setq pos_X (if (numberp pos_X) pos_X (atof pos_X)))         (setq pos_Y (if (numberp pos_Y) pos_Y (atof pos_Y)))             ; insertion du poteau         (setq insertion-point (list pos_X pos_Y 0))         (command "_-insert" "# ptx 2 rangs - Barre droite" insertion-point 1 1 0)       (setq ent (entlast))               ; attribution des propriétés             (setpropertyvalue ent (strcat "AcDbDynBlockProperty" "ID") ID)             (setpropertyvalue ent (strcat "AcDbDynBlockProperty" "A") A)             (setpropertyvalue ent (strcat "AcDbDynBlockProperty" "B") B)             (setpropertyvalue ent (strcat "AcDbDynBlockProperty" "phi") phi)             (setpropertyvalue ent (strcat "AcDbDynBlockProperty" "H") H)             (setpropertyvalue ent (strcat "AcDbDynBlockProperty" "D") D)             (setpropertyvalue ent (strcat "AcDbDynBlockProperty" "C") C)             (setpropertyvalue ent (strcat "AcDbDynBlockProperty" "Nb") Nb)             (setpropertyvalue ent (strcat "AcDbDynBlockProperty" "N1") N1)             (setpropertyvalue ent (strcat "AcDbDynBlockProperty" "S1") S1)             (setpropertyvalue ent (strcat "AcDbDynBlockProperty" "L1") L1)             (setpropertyvalue ent (strcat "AcDbDynBlockProperty" "fL1") fL1)             (setpropertyvalue ent (strcat "AcDbDynBlockProperty" "fL2") fL2)             (setpropertyvalue ent (strcat "AcDbDynBlockProperty" "N2") N2)             (setpropertyvalue ent (strcat "AcDbDynBlockProperty" "S2") S2)             (setpropertyvalue ent (strcat "AcDbDynBlockProperty" "E2") E2)             (setpropertyvalue ent (strcat "AcDbDynBlockProperty" "L2") L2)             (setpropertyvalue ent (strcat "AcDbDynBlockProperty" "fX2") fX2)             (setpropertyvalue ent (strcat "AcDbDynBlockProperty" "fY2") fY2)             (setpropertyvalue ent (strcat "AcDbDynBlockProperty" "N31") N31)             (setpropertyvalue ent (strcat "AcDbDynBlockProperty" "N312") N312)             (setpropertyvalue ent (strcat "AcDbDynBlockProperty" "S31") S31)             (setpropertyvalue ent (strcat "AcDbDynBlockProperty" "E31") E31)             (setpropertyvalue ent (strcat "AcDbDynBlockProperty" "L31") L31)             (setpropertyvalue ent (strcat "AcDbDynBlockProperty" "fY31") fY31)             (setpropertyvalue ent (strcat "AcDbDynBlockProperty" "N32") N32)             (setpropertyvalue ent (strcat "AcDbDynBlockProperty" "N322") N322)             (setpropertyvalue ent (strcat "AcDbDynBlockProperty" "S32") S32)             (setpropertyvalue ent (strcat "AcDbDynBlockProperty" "E32") E32)             (setpropertyvalue ent (strcat "AcDbDynBlockProperty" "L32") L32)             (setpropertyvalue ent (strcat "AcDbDynBlockProperty" "fX32") fX32)             (setpropertyvalue ent (strcat "AcDbDynBlockProperty" "N312") N312)             (setpropertyvalue ent (strcat "AcDbDynBlockProperty" "V_béton") V_béton)             (setpropertyvalue ent (strcat "AcDbDynBlockProperty" "P_tot") P_tot)             (setpropertyvalue ent (strcat "AcDbDynBlockProperty" "Ratio") Ratio)             ; insertion du schéma         (setq insertion-point (list (+ 454 pos_X) (- pos_Y 17) 0))         (command "_insert" "# Schéma ptx Y2" insertion-point 1 1 0)         (setq ent (entlast))             ;; Liste des variables à définir     (setq variables3 '(N1_larg N1_long visi_sch))         ;; Liste des indices correspondants dans lst     (setq propriétés3 '("X" "Y" "Visibilité1"))                       ;; Association des variables aux valeurs récupérées             (setpropertyvalue ent (strcat "AcDbDynBlockProperty" "Y") N1_larg)             (setpropertyvalue ent (strcat "AcDbDynBlockProperty" "X") N1_long)             (setpropertyvalue ent (strcat "AcDbDynBlockProperty" "Visibilité1") visi_sch)         ;; Incrémentation de l'index pour passer à l'itération suivante     (setq index (1+ index)))
    • Manu_CAD
      Remplacer une chaine de caractère par une autre

      Par Manu_CAD · Posté(e)

      Non il y a des textes et des multitextes et si le texte ou multiutexte se trouve dans le layer INFO_FR, on doit remplacer SF6 par GAZ et s'il se trouve dans le layer INFO_NL, on doit SF6 par GAS. C'est enfonction de la langue d'utilisation. Oui, pas de problème
    • didier
      Remplacer une chaine de caractère par une autre

      Par didier · Posté(e)

      Bonjour @Manu_CAD J'ai bien compris pour la première partie avec les noms de blocs avec préfixe S_IO_B*, je vais le faire. Par contre, je n'ai pas compris ce que vous appelez la troisième étape, c'est le nom du calque qu'il faut changer ? Dernière chose, je dois m'absenter quelques jours, je ne sais pas quand j'aurai du temps pour ce faire, mais je le ferai. Amicalement

  • Sujets

×
×
  • 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é