Annonces

À partir du mois de décembre, nous archiverons le contenu de la communauté datant de 10 ans et plus. Cette FAQ fournit de plus amples informations.

[webinaire] La gestion des annotations dans #AutoCAD

patrick.emin
Alumni
Alumni

[webinaire] La gestion des annotations dans #AutoCAD

patrick.emin
Alumni
Alumni

Bonjour,

 

Notre webinaire "Gestion des annotations dans AutoCAD" a eu lieu le lundi 13 mai 2019 à 18:00, en voici l'enregistrement:

 

 

Description : « Il sera présenté dans ce webinaire l’utilisation et la gestion des annotations suivant le principe de l’annotativité, les échelles de présentations seront mises en corrélation avec les échelles de présentations. »

 

Plan :

  1. La gestion des échelles
  2. La gestion des présentations pour l’annotativité
  3. Création de textes annotatifs
  4. Création de cotes annotatives
  5. Création de repères multiples annotatifs
  6. Ajout suppression d’échelles d’annotation
  7. Questions réponses

 

Présenté par: Jacques Rigal

Projet J, Formateur et consultant CAD & BIM; Autodesk Expert Elite Member; Animateur et modérateur de la communauté et forum Autodesk; Utilisateur AutoCAD, AutoCAD Architecture, Revit, 3DS MAX, Naviswork, etc.

 

image.png


Patrick Emin animateur de la communauté francophone


Vous avez trouvé un message utile? Alors donnez un "J'aime" à ce message!
Votre question a eu une réponse satisfaisante? Voulez vous avoir l'amabilité de cliquer sur le bouton
 APPROUVER LA SOLUTION  en bas de la réponse qui apporte une solution?
Signez notre Livre d'Or
0 J'aime
Répondre
1 445 Visites
5 Réponses
Replies (5)

braudpat
Mentor
Mentor

Hello Jacquou le Croquant

 

1) J'ai bien aime ta Presentation !

 

2) Vous trouverez ci-joint une excellente routine "Sel_Annot" Lisp de notre Grand Maitre Jedi du Lisp : Gilles

Cette routine permet de retrouver TOUS (ou presque) les objets annotatifs du DWG !

De type : text/mtexte , hachure , cotation , ligne de repere multiple

 

Car passer (survoler) sur tous les objets et attendre pour voir apparaitre (ou pas) le symbole d' Annotativite

c tres long et tres penible !!

 

3) Merci @_gile  !!

 

Au fait Gilles, SVP est il possible d'ameliorer la routine, pour trouver AUSSI les Blocs ANNOTATIFS !?

 

Regards, Patrice

 

Patrice ( Supporting Troops ) - Autodesk Expert Elite
If you are happy with my answer please mark "Accept as Solution" and if very happy please give me a Kudos (Felicitations) - Thanks

Patrice BRAUD

EESignature


jacquesrigal3467
Advisor
Advisor

merci @braudpat 

Jacques Rigal
Cette publication vous a-t-elle été utile ? N’hésitez pas à attribuer la mention J’aime à cette publication.
Avez-vous obtenu la réponse à votre question ? Cliquez ensuite sur le bouton ACCEPTER LA SOLUTION.

EESignature

0 J'aime

O_Eckmann
Mentor
Mentor

Merci @jacquesrigal3467 pour cette présentation claire.

J'étais resté sur une impression il y a quelques années de quelque chose de compliqué pour l'annotativité et j'avais surtout zappé le fait de pourvoir choisir la position de chaque objet annotatif pour chacune des échelles, ce qui est vraiment intéressant.

Je vais me pencher à nouveau sur cette fonctionnalité à fort potentiel.

 

Olivier

Olivier Eckmann

EESignature

_gile
Mentor
Mentor

@braudpat wrote:

Au fait Gilles, SVP est il possible d'ameliorer la routine, pour trouver AUSSI les Blocs ANNOTATIFS !?


Pas testé en profondeur.

 

;; 
;; http://cadxp.com/topic/44316-svp-routine-selection-facile-des-objets-annotatifs/page__pid__255347#entry255347
;; 
;; Routine: SelAnnot par GC 
;; 

;; 
;; GC >>> Noter que pour les lignes de repere non multiple (ancienne mode) 
;; SEUL le texte peut être annotatif, ils sont donc traites dans la categorie "Texte mtexte"
;; (Pas teste en profondeur)
;; 

;; 
;; Supprime du jeu de selection les objets non annotatifs 
;; 

(defun filterAnnot (ss / i ent dict)
  (if ss
    (repeat (setq i (sslength ss))
      (setq ent (ssname ss (setq i (1- i))))
      (if (not (setq dict (cdadr (member '(102 . "{ACAD_XDICTIONARY") (entget ent)))))
        (ssdel ent ss)
        (if (not (setq dict (cdr (assoc -1 (dictsearch dict "AcDbContextDataManager")))))
          (ssdel ent ss)
          (if (not (dictsearch dict "ACDB_ANNOTATIONSCALES"))
            (ssdel ent ss)
          )
        )
      )
    )
  )
  ss
)

;; 
;; Sélectionne les objets annotatifs par type 
;; 

(defun c:SelAnnot (/ kw ss fr)
  (initget "Bloc Texte Hachure Cotation Repere")
  (setq kw (getkword
             "\nChoisir une option [Bloc/Texte mtexte/Hachure/Cotation/ligne de Repere multiple] <Texte>: "
           )
        fr (cond
             ((= kw "Bloc") '((0 . "INSERT")))
             ((= kw "Hachure") '((0 . "HATCH")))
             ((= kw "Cotation") '((0 . "DIMENSION")))
             ((= kw "Repere") '((0 . "MULTILEADER")))
             (T '((0 . "TEXT,MTEXT")))
           )
  )
  (sssetfirst nil (filterAnnot (ssget fr)))
)

 

 



Gilles Chanteau
Programmation AutoCAD LISP/.NET
GileCAD
GitHub

braudpat
Mentor
Mentor

Hello @_gile 

 

1) MERCI ta Modif pour inclure les Blocs fonctionne bien !

 

2) De ton excellente routine "SelAnnot" v1.02 , j'ai derive une autre routine "SelAnnotAll" v1.03

avec une dizaine de lignes en commentaire ...

Ainsi on dispose d'une autre routine" SelAnnotAll" qui ne pose AUCUNE question

et donc selectionne automatiquement TOUS les objets ANNOTATIFs !

 

Thanks, Happy WE, Regards, Patrice

 

Patrice ( Supporting Troops ) - Autodesk Expert Elite
If you are happy with my answer please mark "Accept as Solution" and if very happy please give me a Kudos (Felicitations) - Thanks

Patrice BRAUD

EESignature