Mettre le contenu d\'un calque au premier plan

[barbichette]

Bonjour,

 

Je souhaiterai faire une macro qui fasse la chose suivante :

- le contenu du calque "! Blanc épais" est mis au premier plan

- les contenus de tous les autres calques sont mis au second plan (sans criètre de priorité entre eux)

 

Comment faire ?

et surtout quelle serait la syntaxe d'une telle macro

 

merci

 

[Edité le 21/8/2008 par barbichette]

[didier]

Bonjour,

 

qu'est ce que tu entends par macro ?

ça peut être du Diesel pour mettre dans un bouton

dans ce cas RebCao,

le spécialiste dans l'hémisphère nord te répondra certainement

 

si c'est en Lisp, reviens à la charge et on va faire quelque chose pour toi.

 

amicalement

[Fruity]

et la commande draworder? (dans la barre d'outil "Ordre de tracé")

[didier]

re bonjour,

 

en attendant les réponses qui viennent de l'Est

un truc tapé à la va-vite:

 

(defun c:barbichette()

(setq jeu (ssget "x" '((8 . "blanc épais"))))

(command "ordretrace" jeu "" "av")

)

 

amicalement

[ludo07]

Bonjour à tous,

 

ci dessous une macro à mettre dans un bouton.

 

Il faut remplacer CALQUE1 par le nom de ton calque.

 

^C^C-calque;état;E;ordre;;;établir; CALQUE1;g;*;;ordretrace;tout;;AV;-calque;état;R;ordre;S;ordre;;;

 

A+

[barbichette]

re bonjour,

 

en attendant les réponses qui viennent de l'Est

 

 

Hey ! Doucement avec l'Est !

c'est une très belle région

 

Je suis Aussi de Strasbourg....... Mort de rire

 

non sans blague, merci beaucoup de vos réponse,

je vais tester tout ça, et je vous tient au courant.

[PHILPHIL]

hello

 

en attendant les réponses qui viennent de l'Est

 

si j'ai bien tout suivi dans mes nombreuses lectures

 

didier n'est pas a l'est mais a l'est de l'est de l'est de l'est

tellement qu'il en serait meme rendu a l'ouest

( tu l'as eu ton entrecote saignante sauce rochefort ?)

 

ha mince un message de plus qui pourri le site

 

phil

[barbichette]

Bonjour à tous,

 

ci dessous une macro à mettre dans un bouton.

 

Il faut remplacer CALQUE1 par le nom de ton calque.

 

^C^C-calque;état;E;ordre;;;établir; CALQUE1;g;*;;ordretrace;tout;;AV;-calque;état;R;ordre;S;ordre;;;

 

A+

 

ca marche si le calque porte un nom simple (blanc par ex), mais étant donné que mon calque se nomme

! Blanc épais

Comment faire pour que cela marche ?

 

PS : Je suis exactement de Neudorf, et je bosse à Lingolsheim..

[ludo07]

Salut babichette,

 

je viens de faire un essais avec ton nom de calque et ça marche, si dans la macro que je t'ais donné

 

tu écris ton nom de calque entre guillemet:

 

"! Blanc épais"

 

 

 

A+

[barbichette]

ha ha ha, le fameux coup des guillements

 

merci beaucoup

[didier]

coucou

 

les forums de CadXp vont devenir le salon de coiffure du coin,

on va s'échanger les "voici" et les dernières nouvelles des expatriés

 

non,non, et toujours non, pas de Roquefort pas d'entrecôte

ici, c'est du zébu et en plus il n'y a pas de fromages

 

heureusement, il fait beau

 

amicalement

[rebcao]

Merci, merci, Didier de penser à moi...

 

Aller ce coup ci, je t'offre un Morceau de CHATEAUBRIAND sauce Béarnaise !!!

 

Voici la réponse de l' EST , où c'est plutôt chaud, très chaud en ce moment pour certains plus à l'EST ! :(

 

Voici deux Macros, une pour mettre le calque Sélectionné (par l'objet sélectionné) en AVANT et l'autre mettre le calque Sélectionné en ARRIERE ! J'ai choisi le principe de sélectionner l'objet à l'écran qui appartient au calque en question...

 

CALQUE AVANT

 

[surligneur] *^C^Cexpert;5;_-VIEW;SA;GOTOP;;P;L;GOTOP;E;;;expert;2;_Laymcur;\_-layer;G;*;;ordretrace;tout;;AV;_-view;R;GOTOP;_REGENALL;[/surligneur]

 

 

CALQUE ARRIERE

 

[surligneur] *^C^Cexpert;5;_-VIEW;SA;GOTOP;;P;L;GOTOP;E;;;expert;2;_Laymcur;\_-layer;G;*;;ordretrace;tout;;AR;_-view;R;GOTOP;_REGENALL;[/surligneur]

 

 

c'est de l'improvisation pur j'ai à peine testé... Voir ce que ça donne sur un gros dessin !

 

En cas de problème, lié au COPIER-COLLER de ces MACROS, voici un fichier TEXTE contenant les 2 macros.

 

à votre service pour les détails... Mais là c'est plus le même TARIF :(

 

Christian qui adore aussi le ChateauBriand !

 

 

[Edité le 20/8/2008 par rebcao]

[grid1334]

Essaie ces morceau de code en autolisp, ils marchent bien.

Tapez calav pour mettre le contenu d'un calque en avant et calar pour le mettre en arrière plan.

;;met le contenu d'un calque au premier plan

(defun c:calav (/ ent)

(if (setq ent (car

(entsel "\nSélectionnez un objet sur le calque cible à mettre au premier plan: ")

)

)

(sssetfirst nil (ssget "_X" (list (assoc 8 (entget ent)))))

)

(command "ordretrace" "av""")

(princ)

)

 

 

;;met le contenu 'un calque en arrière plan

(defun c:calar (/ ent)

(if (setq ent (car

(entsel "\nSélectionnez un objet sur le calque cible à mettre au dernier plan: ")

)

)

(sssetfirst nil (ssget "_X" (list (assoc 8 (entget ent)))))

)

(command "ordretrace" "ar""")

(princ)

)

 

[Edité le 18/8/2008 par grid1334]

[lili2006]

Bonjour à toutes et à tous,

 

Bienvenue grid1334,

 

Pas mal le principe de ces routines mais ne fonctionnent pas chez moi (V2008 pleine) =>

 

Commande:

Commande: calar

Sélectionnez un objet sur le calque cible à mettre au dernier plan: ordretrace

Entrez une option de disposition d'objets [Dessus/dEssous/AVant/ARrière]

: ar

Commande: CALAR Commande inconnue "CALAR". Appuyez sur F1 pour obtenir de

l'aide.

Commande:

Commande:

Commande:

Commande: calav

Sélectionnez un objet sur le calque cible à mettre au premier plan: ordretrace

Entrez une option de disposition d'objets [Dessus/dEssous/AVant/ARrière]

: av

Commande: CALAV Commande inconnue "CALAV". Appuyez sur F1 pour obtenir de

l'aide.

Commande:

 

Pourtant, la fonction se lance et j'ai même l'impression qu'elle a fonctionnée quelque fois,.... ???!!!

 

Merci d'avance,

[grid1334]

En effet cela marche jusqu'à la version 2007, mais la 2008 non, j'ai corrigé le code, en fait cette version est moins permissive au niveau de la mise en forme.

J'ai viré des espaces et mis en forme le code avec l'éditeur visual lisp, ça marche maintenant sur la 2008.

 

;;selectionne tous les objets d'un calque et les met au premier plan

 

(defun c:calav (/ ent)

(if (setq ent (car

(entsel "\nSélectionnez un objet sur le calque cible: ")

)

)

(sssetfirst nil (ssget "_X" (list (assoc 8 (entget ent)))))

)

(command "ordretrace""AV""")

(princ)

)

 

(defun c:calar (/ ent)

(if (setq ent (car

(entsel "\nSélectionnez un objet sur le calque cible: ")

)

)

(sssetfirst nil (ssget "_X" (list (assoc 8 (entget ent)))))

)

(command "ordretrace""AR""")

(princ)

)

 

[lili2006]

Bonjour à toutes et tous,

 

Désolé grid1334, j'ai toujours ce message =>

 

Commande:

Commande: calav

Sélectionnez un objet sur le calque cible: ordretrace

Entrez une option de disposition d'objets [Dessus/dEssous/AVant/ARrière]

: AV

Commande: CALAV Commande inconnue "CALAV". Appuyez sur F1 pour obtenir de

l'aide.

Commande:

Commande:

Commande:

Commande: calar

Sélectionnez un objet sur le calque cible: ordretrace

Entrez une option de disposition d'objets [Dessus/dEssous/AVant/ARrière]

: AR

Commande: CALAR Commande inconnue "CALAR". Appuyez sur F1 pour obtenir de

l'aide.

Commande:

?????!!!

[rebcao]

Bonjour,

 

personne n'a testé mes macros ? :casstet:

 

Christian

[lili2006]

Re,

 

Oups, désolé Christian,...

 

Comment fonctionnent ces macros ?

 

J'ai des options plutôt bizarre pour ce que l'on recherche ici !

 

Exemple =>

 

Commande:

Commande:

Commande: expert

Entrez une nouvelle valeur pour EXPERT : 5

Commande: _-VIEW

Entrez une option [?/SUpprimer/orthoGonal/Rappel/SAuver/Paramètres/Fenêtre]: SA

Entrez le nom de la vue à enregistrer: GOTOP

Commande:

-VUE Entrez une option

[?/SUpprimer/orthoGonal/Rappel/SAuver/Paramètres/Fenêtre]: P

Entrez une option [aRrière-plan/Classer par catégories/cliché des caLques/COupe

3D/SCu/STyle visuel]: L

Entrez un nom de vue dont le cliché des calques doit être modifié ou [?]: GOTOP

Entrez une option [Enregistrer/Supprimer] : E

Entrez une option [aRrière-plan/Classer par catégories/cliché des caLques/COupe

3D/SCu/STyle visuel]:

Entrez une option [?/SUpprimer/orthoGonal/Rappel/SAuver/Paramètres/Fenêtre]:

Commande: expert

Entrez une nouvelle valeur pour EXPERT : 2

Commande: _Laymcur

Sélectionnez l'objet dont le calque va devenir le calque courant:

BAC TRACE est maintenant le calque courant.

Commande: _-layer

Calque courant: "BAC TRACE"

Entrez une option

[?/Etablir/CHoisir/Nouv/ACtif/INactif/COuleur/TLigne/EPaisseurl/MAtériau/Tracé/S

Tracé/Geler/Libérer/Verrouiller/Déverrouiller/étAt]: G

Entrer la liste des noms de calque de geler ou : *

Impossible de geler le calque "BAC TRACE". Il s'agit du calque COURANT.

Entrez une option

[?/Etablir/CHoisir/Nouv/ACtif/INactif/COuleur/TLigne/EPaisseurl/MAtériau/Tracé/S

Tracé/Geler/Libérer/Verrouiller/Déverrouiller/étAt]:

Commande: ordretrace

Choix des objets: tout

764 trouvé(s)

Choix des objets:

Entrez une option de disposition d'objets [Dessus/dEssous/AVant/ARrière]

: AV

Commande: _-view

Entrez une option [?/SUpprimer/orthoGonal/Rappel/SAuver/Paramètres/Fenêtre]: R

Entrez le nom de la vue à restaurer: GOTOP

Régénération du modèle.

Commande: REGENALL

Commande inconnue "REGENALL". Appuyez sur F1 pour obtenir de l'aide.

Commande:

-VUE Entrez une option

[?/SUpprimer/orthoGonal/Rappel/SAuver/Paramètres/Fenêtre]: F

Entrez le nom de la vue à enregistrer: test

Spécifiez le premier coin: Spécifiez le coin opposé:

Commande:

Commande:

Commande: expert

Entrez une nouvelle valeur pour EXPERT : 5

Commande: _-VIEW

Entrez une option [?/SUpprimer/orthoGonal/Rappel/SAuver/Paramètres/Fenêtre]: SA

Entrez le nom de la vue à enregistrer: GOTOP

Commande:

-VUE Entrez une option

[?/SUpprimer/orthoGonal/Rappel/SAuver/Paramètres/Fenêtre]: P

Entrez une option [aRrière-plan/Classer par catégories/cliché des caLques/COupe

3D/SCu/STyle visuel]: L

Entrez un nom de vue dont le cliché des calques doit être modifié ou [?]: GOTOP

Entrez une option [Enregistrer/Supprimer] : E

Entrez une option [aRrière-plan/Classer par catégories/cliché des caLques/COupe

3D/SCu/STyle visuel]:

Entrez une option [?/SUpprimer/orthoGonal/Rappel/SAuver/Paramètres/Fenêtre]:

Commande: expert

Entrez une nouvelle valeur pour EXPERT : 2

Commande: _Laymcur

Sélectionnez l'objet dont le calque va devenir le calque courant:

BAC TRACE est maintenant le calque courant.

Commande: _-layer

Calque courant: "BAC TRACE"

Entrez une option

[?/Etablir/CHoisir/Nouv/ACtif/INactif/COuleur/TLigne/EPaisseurl/MAtériau/Tracé/S

Tracé/Geler/Libérer/Verrouiller/Déverrouiller/étAt]: G

Entrer la liste des noms de calque de geler ou : *

Impossible de geler le calque "BAC TRACE". Il s'agit du calque COURANT.

Entrez une option

[?/Etablir/CHoisir/Nouv/ACtif/INactif/COuleur/TLigne/EPaisseurl/MAtériau/Tracé/S

Tracé/Geler/Libérer/Verrouiller/Déverrouiller/étAt]:

Commande: ordretrace

Choix des objets: tout

764 trouvé(s)

Choix des objets:

Entrez une option de disposition d'objets [Dessus/dEssous/AVant/ARrière]

: AV

Commande: _-view

Entrez une option [?/SUpprimer/orthoGonal/Rappel/SAuver/Paramètres/Fenêtre]: R

Entrez le nom de la vue à restaurer: GOTOP

Régénération du modèle.

Commande: REGENALL

Commande inconnue "REGENALL". Appuyez sur F1 pour obtenir de l'aide.

Commande:

-VUE Entrez une option

[?/SUpprimer/orthoGonal/Rappel/SAuver/Paramètres/Fenêtre]: P

Entrez une option [aRrière-plan/Classer par catégories/cliché des caLques/COupe

3D/SCu/STyle visuel]: R

Entrez le nom de la vue pour modifier l'arrière-plan ou [?]: ?

Entrez le nom de la vue à répertorier :

Vues enregistrées:

Nom de la vue Espace

"-1a" o

"-1b" o

"-1c" o

"-1d" o

"-1e" o

"01" o

"02" o

"03" o

"04" o

"05" o

"06" o

"07" o

"08" o

"09" o

"10" o

"11" o

"12" o

"13" o

 

Etc,etc,...

 

L'idée de grid1334 est plutôt séduisante : On selectionne une entité du calque que l'on veut passer en avant ou arrière plan,...

 

Christian, est-ce que tes macros répondent à ce souhait ?

 

Merci d'avance,

[lili2006]

Re,

 

Pour info, j'ai posté la réponse précédente avant de lire ton post Christian,

 

Les"grands esprits" se rencontreraient-ils par hasard ???

 

Hum, Hum !! ;)

[grid1334]

Bizarre ça a pourtant bien fonctionné sur la 2008, essai de recharger ta macro, sinon ouvre la avec l'editeur visual lisp (taper vlide) puis "Outils - formater le code dans l'éditeur", enfin enregistre et charge la à nouveau.

[rebcao]

Visiblement, dans la Macro du message il y a curieusement un ESPACE qui n'existe pas !!!

 

après _-Layer;G;* [surligneur] _[/surligneur];;!!! J'ai édité mon messaage PAS D'ESPACE !!! :(

 

c'est pour ça que j'ai ajouté le lien vers un fichier TEXTE. Utilises plutôt ce lien.

 

Christian

[lili2006]

Rere,

 

Dans le doute, j'ai fais ce que tu préconises et même sur une nouvelle session AutoCAD, j'ai toujours ce message =>

 

Commande:

Commande:

CALAV

Sélectionnez un objet sur le calque cible: ordretrace

Entrez une option de disposition d'objets [Dessus/dEssous/AVant/ARrière]

: AV

Commande: CALAV Commande inconnue "CALAV". Appuyez sur F1 pour obtenir de

l'aide.

Commande:

Commande:

Commande:

Commande: calar

Sélectionnez un objet sur le calque cible: ordretrace

Entrez une option de disposition d'objets [Dessus/dEssous/AVant/ARrière]

: AR

Commande: CALAR Commande inconnue "CALAR". Appuyez sur F1 pour obtenir de

l'aide.

Commande:

 

Peut-être d'autres personnes ici vont tester, .... P't'être un problème chez moi,...

 

Merci encore, ...

[lili2006]

rere,

 

Christian, c'est une copie du fichier texte joint !

 

Vraiment un pb chez moi ??!!!

 

Merci encore,

[Tuathan]

Merci Rebcao,

 

pas de soucis chez moi les macros fonctionnent a merveille en prennant celle du fichier texte

 

PS - Desole pour le manque d'accent, mon clavier grec fait des siennes :casstet:

[lili2006]

Re,

 

Bienvenue Tuathan

 

Peux-tu faire une copie de ta ligne de commande STP ?

 

Merci d'avance,