style de tracé

[christophe32]

Bonjour,

Je travaille réguliérement avec des sous-traitant d'étude sur autocad 2009 qui ont leurs propres styles de tracé (impression), or je voudrais modifier l'ensemble de ces styles de chaque présentation à ma façon de travailler.

Patrick_35, a fait un bon lisp pour modifier l'ensemble des imprimantes mais il n'y a pas la possibilité de modifier les tyles de tracé....

Quelqu'un peut m'aider

Merci....@+

[Patrick_35]

Un sujet à relancer donc.

 

Tu peux utiliser la présentation courante pour définir le style de tracé et dupliquer celui-ci sur les autres.

 

On définit une variable globale qui pointe sur le document actif

(setq doc (vla-get-activedocument (vlax-get-acad-object)))

 

On définit une variable qui récupère la présentation active

(setq def (vla-get-activelayout doc))

 

On récupère le style de tracé

(setq def (vla-get-stylesheet def)

 

Il est possible de faire plus court

(setq def (vla-get-stylesheet (vla-get-activelayout doc)))

 

Puis avec une boucle vlax-for sur (vla-get-layouts doc), je change le style de mes présentations avec (vla-put-stylesheet ma_variable_de_boucle def)

 

Je te laisse mettre en forme.

 

@+

[christophe32]

Merci

c'est cool de ta part d'expliquer le cheminement, j'ai bien essayé de reprendre le lisp MIM pour l'adapter, cependant je suis plutot naze en lisp.

Le top serait de me faire parvenir le lisp tout pres.....je sais c'est la solution de simplicité mais je craint fort de ne pas y arrivé.

 

Fais-tu également de la programmation en VBA?? (langauge pour lequel j'essai de m'initier pour autocad)

[Patrick_35]

Essaye plutôt un neuf que de reprendre.

 

Courage.

 

ps : Je ne programme pas en vba, bien que le vlisp soit assez proche, car vba ne permet pas certaines choses avec Autocad.

 

@+