Groupe d\'objets

[geomou]

Bonjour,

 

J'ai reçu un fichier autocad qui comporte (vraiment ) beaucoup de groupes sans noms. :(

Pour les upprimer je suis obligé de les sélectionner un par un et de cliquer ensuite sur décomposer. Cela prend environ 15 secondes par objet.

N'existe-t-il pas une commande qui permette la suppression de tous les objets en un seul clic ?

 

Merci d'avance pour vos réponses

[bryce]

Bonjour,

 

Tu veux décomposer seulement les groupes sans nom, ou bien tous les groupes ?

 

Voici un lisp qui les décompose tous :

 

(defun c:ungroup (/ acdoc groups group )
(vl-load-com)
(setq	acdoc (vla-get-ActiveDocument (vlax-get-acad-object))
		groups (vla-get-groups acdoc)
)
(vla-startundomark acdoc)
(vlax-for group groups
	(vla-delete group)
)
(vla-endundomark acdoc)
(princ)
)