Aller au contenu

xrefs en couleur


Messages recommandés

Posté(e)

Slt à tous,

depuis lomgtemps j'utile ce petit lisp fort pratique pour moi

 

(defun c:xco ()

(setq a (entsel "\nChoix de la reference externe "))

(setq b (entget (car a)))

(setq c (assoc 2 b))

(setq d (cdr c))

(setq s (strcat d "*"))

(setq coul (acad_colordlg 256))

(command "-layer" "c" coul s "")

)

 

mais il a un énorme inconvénient, c'est que lorsque les couleurs ne sont pas bylayer, eh bien ça marche po. Si qlq à une astuce pour moi.

Merci davance

Posté(e)

Salut,

 

Tu peux aussi utiliser ce lisp pour mettre en xref en une seule couleur (dans l'exemple en gris).

 

(vl-load-com)

(defun c:8 (/ cdoc lst)

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

(vla-startundomark cdoc)

(vlax-for l (vla-get-layers cdoc)

(setq lst (cons (cons l (vla-get-lock l)) lst))

(vla-put-lock l :vlax-false)

(vla-put-color l 8)

)

(vlax-for i (vla-get-blocks cdoc)

(vlax-for e i (vla-put-color e 256))

)

(foreach n lst

(vla-put-lock (car n) (cdr n)))

(vla-endundomark cdoc)

)

Excalibur

Posté(e)

Slt,

Je viens d'essayer le lisp d' excalibur, il est bien, mais je n'ai pas le choix des couleurs je ne sais pas choisir l'xref dont je veux changer la couleur et le plus important de tout c'est qu'il change mon dessin courant aussi.

Le lisp ATB quand à lui ne fonctionne pas.

Quand à Rebcao je ne comprends pas très bien ce que le CTB viens faire là dedans.

Je fais de la coordination de techniques et donc j'ai plusieurs xrefs, j'ai besoin par exemple de mettre le plan de chauffage en rouge le plan d'architecture en gris le plan d'élec en vert etc...

Alors lorsque les couleurs sont forcées à l'origine c'est embêtant.

Dans mon lisp je peux sélectionner les xrefs indépendamment les uns des autres et je peux leur donner une couleur bien précise.

Je ne désespère pas.

 

Bien à vous tous

 

Posté(e)

Je viens d'essayer, ça fonctionne effectivement, mais, mon souci c'est que je ne veux pas toucher au fichier d'origine.

Merci quand même.

Je cherche tjs

A+

Posté(e)
Bonjour,

 

Pourquoi ne pas utiliser tout simplement les [surligneur] STYLES de TRACE = STB [/surligneur] et NON CTB...

 

 

Christian

 

Alors c'est vraiment ce qu'il te faut... :D

Posté(e)

D'où toute l'astuce de Rebcao...

 

En effet du peux afficher les couleur de ton STB à l'écran.

Pour ce faire tu vas dans le "page setup manager" de ta page et tu coche "display plot styles" que tu trouveras juste en dessous du "plot styles" que tu auras choisi...tu auras maintenant les couleurs que tu as choisi sur l'ecran. :D

 

ps: je te donne les commandes en Anglais car je ne les connait pas en Francais.

 

[Edité le 12/2/2009 par bono05]

Posté(e)

Slt,

Lorsque j'ouvre le "page setup ùmanager" il n'y a pas de case pour cocher "display plot styles" il y a uniquement "Display when creating a new layout".

Je veux bien essayer, mais...

 

Biagio

 

Ps: Pas de soucis pour l'anglais je ne connais QUE les commandes en anglais merci

Posté(e)

Bien...apres Page setup manager clique sur ton 'current page setup" dans la liste qui correspond à la "pages setup" de ton plan ...ensuite sur "modify"

et là tu trouveras la case a cocher en dessous de "plot styles table" (en haut à droite).

 

j'espère que cela t'aide...

 

 

[Edité le 12/2/2009 par bono05]

Posté(e)

Slt à tous,

Eh oui, je travaille dans l'espace objet et non pas dans l'espace papier. Donc ça ne m'arrange po bien.

Je l'ai quand même testé, mais même dans l'espace papier il ne change pas les objets qui ne sont pas Bylayer.

Je peux aller dans le fichier source et mettre tous les objets Bylayer, mais certains objets modifié sont des blocs. Parfois, pour corser le tout, je trouve, même, des blocs dans des blocs (Le foutoir quoi). C'est pour cette raison que je cherche qlq chose pour me faciliter la vie.

Le lisp de "excalibur" fonctionne bien mais le seul problème c'est qu'on n'a pas le choix des couleurs (quoiqu’une petite modif réglerai ce problème) et le plus dommage c'est qui change tout, même le dessin courant.

Je cherche tjs.

 

Posté(e)

mais certains objets modifié sont des blocs. Parfois, pour corser le tout, je trouve, même, des blocs dans des blocs (Le foutoir quoi).

 

Edit_bloc te permet de mettre tous les composants de tous les blocs sur le calque 0, en couleur DuBloc ...

Gilles Chanteau - gileCAD - GitHub
Développements sur mesure pour AutoCAD

Posté(e)
Bonjour,

 

Je ne vois pas ce qui empêche de travailler dans l'espace objet des fenêtres de présentation et oublier l'onglet OBJET...

 

Christian

 

 

+1 !! :D

Posté(e)

Slt,

 

Bonjour,

 

Je ne vois pas ce qui empêche de travailler dans l'espace objet des fenêtres de présentation et oublier l'onglet OBJET...

 

Christian

 

A vrais dire j'y avais pensé, mais j'ai encore deux problèmes avec ça,

1° Toutes mes mises en page tombent à l'eau, comment faire pour créer un espace papier dans un espace papier

2° Les objets qui ne sont pas Bylayer ne changent pas non plu

 

Avant de vous saluer je tiens, tous, à vous remercier pour votre aide

 

Bien à vous

 

Biagio

 

PS: Quelle est la démarche pour le lisp Edit_bloc

Créer un compte ou se connecter pour commenter

Vous devez être membre afin de pouvoir déposer un commentaire

Créer un compte

Créez un compte sur notre communauté. C’est facile !

Créer un nouveau compte

Se connecter

Vous avez déjà un compte ? Connectez-vous ici.

Connectez-vous maintenant
×
×
  • 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é