Polylignes VS Régions...

[jalna]

Bonjour,

 

Il est facile de créer une région à partir d'une polyligne....

 

Mais comment faire pour passer d'une région en polyligne?

 

Si je décompose ma région cela devient des lignes...

 

J'aimerais décomposer ma région est avoir une polyligne!!

 

Merci à vous....

[lecrabe]

 

Bonjour Jalna

 

Eh ben (en tant que vieux dinosaure AutoCADien), avant de transformer mes polylignes closes en régions, j'en garde une copie dans "un coin" de mon dessin ! :)

 

Comme ça, je peux revenir dessus, les modifier et en refaire d'autres régions ! :D

 

Wharf wharf, dixit Le Decapode qui n'a pas répondu à ta question ... :o

 

Le Decapode "honteux"

 

[jalna]

Salut lecrabe!!

 

Tout à fait daccord avec toi, mais le problème c'est que les fichiers ne viennent pas de chez moi!!!!!

 

 

[Tramber]

Il n'y a pas de solution. Car une région peut contenir des objets non compatibles avec l'édition des polylignes.

 

Faut tout refaire à la main, à moins d'avoir un bon lisp sous la main. Il y en a déjà eu qui ont été publiés ici.

 

[(gile)]

Salut,

 

si tu peux "isoler" tes régions (qu'il n'y ait pas d'interférences avec d'autres objets en vue de dessus) tu peux utiliser la commande CONTOUR (_boundary) en choisissant "Type d'objet" Polyligne, tu feras des poly par dessus les régions.

[bonuscad]

Si je décompose ma région cela devient des lignes...

 

C'est le cas quand l'objet source était une polyligne simple donc la routine suivante devrait fonctionner dans ce cas précis. (Ajuster le cas échant la variable PEDITACCEPT)

 

((lambda ( / )
(command "_point" (getvar "lastpoint"))
(setq e_mark (entlast))
(while (null (setq ent_sel (entsel "\nChoix de la région: "))))
(cond
	((eq (cdr (assoc 0 (entget (car ent_sel)))) "REGION")
		(command "_.explode" ent_sel)
		(setq js (ssadd))
		(setq e_next (cdar (entget e_mark)))
		(while e_next
			(setq js (ssadd e_next js))
			(setq e_next (entnext (cdar (entget e_next))))
		)
		(command "_.pedit" (cadr ent_sel) "_yes" "_join" js "" "")
	)
)
(entdel e_mark)
(prin1)
)) 

[jalna]

OK

 

:P Merci bonuscad

Je viens de tester ca fonctionne!!

 

Mais pourquoi il me met un point temporaire??

 

Etant nul en prog j'aimerais qu'il me place un message si je clique sur autre chose qu'une région...

 

Mais en attendant je te remercie pour ta routine!!!

 

:P Bon Week-End

 

[(gile)]

Je me permet de répondre à la place de Bonuscad (il est déconnecté)

 

Le point temporaire est une sorte de balise qui marque le départ de la boucle qui récupère les lignes issues de la région explosée.

 

J'ai juste ajouté une ligne au LISP de Bonuscad pour le message en cas de sélection non-valide et un test sur la variable PEDITACCEPT.

 

((lambda (/)
  (command "_point" (getvar "lastpoint"))
  (setq e_mark (entlast))
  (while (null (setq ent_sel (entsel "\nChoix de la région: ")))
  )
  (cond
    ((eq (cdr (assoc 0 (entget (car ent_sel)))) "REGION")
     (command "_.explode" ent_sel)
     (setq js (ssadd))
     (setq e_next (cdar (entget e_mark)))
     (while e_next
(setq js (ssadd e_next js))
(setq e_next (entnext (cdar (entget e_next))))
     )
     (if (zerop (getvar "peditaccept"))
(command "_.pedit" (cadr ent_sel) "_yes" "_join" js "" "")
(command "_.pedit" (cadr ent_sel) "_join" js "" "")
     )
    )
    (T (prompt "\nL'entité sélectionnée n'est pas une région."))
  )
  (entdel e_mark)
  (prin1)
)
) 

[jalna]

Super!!

:P Merci gile!!

 

Bon week end!!