Arrière plan

[myweb]

Bonjour,

 

Je souhaiterais savoir comme mettre en premier plan une polyligne afin de ne pas voir les autres claque à l'intérieur.

 

Merci :D

[infograf94]

Selectionne la PL, puis commande _draworder, puis Avant

 

ou alors Selectionne le fond, puis commande _draworder, puis Arriere

[myweb]

Bonjour et merci

 

Il faudrait aussi que 'lon ne voit pas ce qui il y a à l'intérieur de la polyligne comme si elle etait opaque

 

Merci pour votre aide. ;)

[Laurent_CAMPEDEL]

Si le besoin se fait sentir pour 1 ou 2 zones, il suffit de passer par une présentation est de faire un fenêtre avec 1 ou 2 trous.

Sinon, il faut employer la commande wipeout des outils express, mais ce sont des objets relativement instables...

[myweb]

BOnjour,

 

Le besoin est pour des polylignes ainsi que du texte car mon arrière plan est un quadrillage de dalles.

Sur un de mes dessins c'est fait mais lorsque je copie la polyligne ou le texte cette propriété disparait.

 

 

[Edité le 26/6/2005 par myweb]

[xl05]

Pour avoir un acces plus rapide, tu copies ces lignes dans le pop501 du menu AutoCAD.mns

ID_DrawordeF [Affichage \tEn avant]^C^C^P(ai_draworder "_f") ^P

ID_DrawordeB [ \tEn arrière]^C^C^P(ai_draworder "_b") ^P

 

Quand tu vas copier ou déplacer ton objet il faudra recomencer le manip, dans ce cas, isole tes calques à mettre en avant ou arrière plan puis libère les.

[Maximilien]

je l'ai intégrer dans un lisp mais ca pourrais te servir : (bien sûr il faut que les menu express soit intégré.

 

 (SetQ H NIL)
(WHILE (= H NIL) (SETQ H (ENTSEL)))
(COMMAND "WIPEOUT" "Polyligne" H "Oui")
(SetQ H NIL)

[didier]

Bonjour,

 

dans la série on partage et on avance,

je propose ceci:

clic sur un texte,

création d'une polyligne d'entourage suivant valeur de décalage

un petit WIPEOUT sur cette entité,

mise en avant du texte

et le tour est joué

bien sûr, c'est une vielle routine donc je n'ai pas encore de REACTOR suite à l'effacement du texte...

 

;;pour cacher un texte avec une valeur de décalage

(setq oldosmode (getvar "osmode"))

(setvar "osmode" 0)

(setq calque_courant (getvar "clayer"))

(setq textent (car (entsel "\nChoix du Texte\n")))

(if (= "TEXT" (cdr (assoc 0 (entget textent))))

(progn

(setq calque_text (cdr (assoc 8 (entget textent))))

(setq hauteur_text (cdr(assoc 40(entget textent))))

(setvar "clayer" calque_text)

(setvar "ucsicon" 0)

(command "_ucs" "ob" textent)

(setq decal (* 0.5 hauteur_text))

(setq tb (textbox (list (cons -1 textent)))

p1 (car tb)

p2 (cadr tb)

p3 (list (car p1) (cadr p2))

p4 (list (car p2) (cadr p1))

)

(setq xp1 (- (car p1) decal))

(setq yp1 (- (cadr p1) decal))

(setq p11 (list xp1 yp1))

 

(setq xp2 (+ (car p2) decal))

(setq yp2 (+ (cadr p2) decal))

(setq p22 (list xp2 yp2))

 

(setq xp3 (- (car p3) decal))

(setq yp3 (+ (cadr p3) decal))

(setq p33 (list xp3 yp3))

 

(setq xp4 (+ (car p4) decal))

(setq yp4 (- (cadr p4) decal))

(setq p44 (list xp4 yp4))

(setvar "plinewid" 0)

(command "polylign" p11 p33 p22 p44 "c")

(COMMAND "WIPEOUT" "_P" (entlast) "_y")

(command "draworder" textent "" "av")

(command "_ucs" "_P")

(setvar "ucsicon" 1)

(setvar "clayer" calque_courant)

) ;progn

) ;if c'est du texte

 

(if (/= "TEXT" (cdr (assoc 0 (entget textent))))

(progn (alert "\nl'Objet choisi n'est pas du Texte simple ligne\n")

(quit)

) ;progn

) ;if c'est pas du texte

(setvar "osmode" oldosmode)

 

amicalement