Grouper / Degrouper

[emma28j]

comment puis je reparametrer la commande grouper et degrouper en menu contextuel (bien pratique car pas besoin de donner un nom a chaq groupe) ????

[BIM G CO]

Grouper/dégrouper?

 

bah je fais Ctrl+Shift+A pour passer l'un à l'autre état.

[didier]

coucou,

 

de mon côté, je répondrais plutôt

Ctrl + H

 

amicalement

[Pieroka]

Là vous expliquez comment passer du mode "groupe sélectionnable/non sélectionnable".(ctrl+H ou ctrl+shft+A)

 

Je crois que vous n'avez pas compris sa question. il demande comment créer des groupes sans passer par le dialogue (en créant des noms automatiquement genre GROUP01...etc...)en programmant une fonction en menu contextuel, comme c'était le cas dans les versions avant la 2004 je crois. (il y avait une barre d'outils avant même).

 

D'ailleurs votre réponse m'interresse aussi... ;)

[jf]

dans Bonuscad il y a "grpdegrp.vlx" qui fait ça tres bien

[emma28j]

c'est a dire ???

bonuscad es fourni avec la version de 2007 ? s'installe t'il automatiquement a l'instal de 2007 ?

 

Y a t'il une possibilité pour mettre les commande grouper/degrouper ds le menu contextuel de 2007 sans passer par la commande et le menu "group" ?

en attendant vos reponse...

hihihihi

 

[Edité le 14/11/2006 par emma28j]

[bonuscad]

dans Bonuscad il y a "grpdegrp.vlx" qui fait ça tres bien

 

Je ne sais pas si il n'y a pas confusion.....

 

Je n'ai pas compilé mes sources, et ce que j'ai pu écrire ne s'appelle pas ainsi.

 

Ce que j'ai pu fournir et ceci, je ne sais pas si c'est la même chose dont parle jf ! :exclam:

 

(defun c:degroup ( / ent dxf_ent dxf_def dxf_grp lst lst_name_gr ent_grp)
(while (null (setq ent (entsel))))
(setq dxf_ent (entget (car ent)))
(setq dxf_def (entget (cdr (assoc 330 dxf_ent))))
(cond
	((eq (cdr (assoc 100 dxf_def)) "AcDbGroup")
		(setq
			dxf_grp (dictsearch (namedobjdict) "ACAD_GROUP")
			lst (member (cons 350 (cdar dxf_def)) (reverse dxf_grp))
			nam_gr (list (cadr lst) (car lst))
			ent_grp (dictsearch (cdr (assoc -1 dxf_grp)) (cdar nam_gr))
		)
		(entdel (cdar ent_grp))
		(princ "\nEntités dégroupées")
	)
	(T
		(princ "\nEntité non groupée")
	)
)
(princ)
)
(defun c:regroup ( / js)
(setq js (ssget))
(cond
	(js
		(setvar "cmdecho" 0)
		(command "_.-group" "_create" "*" "" js "")
		(setvar "cmdecho" 1)
		(princ "\nGroupe créé.")
	)
	(princ "\nAucune sélection.")
)
(princ)
)
(princ "\nCommande REGROUP/DEGROUP")(princ)

[jf]

bonjour

 

je parlais de Bonuscad 2002 telechargeable sur ce site dans "ressources" "telechargement membre"

[jf]

oups ! erreur c est dans telechargement administrateur gratuiciel