Choix des objets

[CDL]

Commande choix des objets : contours fermés

 

RECTANGLE F et C

POLYGONE F et C

Souhaits

CERCLE F et C

FORME F et C la forme peut être une polyligne ou un cercle

 

Une OPTION Découpe : les vecteurs sont coupés sur le trait du contour

Une OPTION Inverser : soit ma sélection soit le reste du dessin

 

[Invité Patrick]

Tu veux dire que tu souhaites pouvoir sélectionner les objets qui sont à l'intérieur d'un cercle en cliquant sur un cercle existant?

[CDL]

Les deux :si il n'existe pas, pouvoir le créer.

ça fait un peut beaucoup faut faire peut etre le tri

 

Et en plus que le mode rectangle cercle ou forme en cours soit afficher sur la bare d'etat

(comme dans VIZ)

 

Ainsi que le mode coupe actif/inactif

 

y reste de la place

[Tramber]

Je me demande s'il n'y a pas qqe chose de similaire dans les Express Tools ???

[bonuscad]

En version pleine, on pourrait utiliser le code suivant: (c'est qu'une ébauche à perfectionner et à tester)

 

(defun C:plss( / ENT p_open PTLST DAT LL IDX SS)

(while (not ENT)

(setq ENT(entsel "\nSélectionner une Polyligne:"))

(if ENT

(progn

(setq ENT(entget(car ENT)))

(if (/= (cdr(assoc 0 ENT)) "LWPOLYLINE")

(progn

(prompt "\nEntitée sélectionée n'est pas une Polyligne. Réessayer")

(setq ENT nil)

)

(progn

(if (/= (logand(cdr(assoc 70 ENT)) 1) 1)

(setq p_open T)

(setq p_open nil)

)

)

)

)

(prompt "\nAucune sélection. Réessayer")

)

)

(setq

LL(length ENT)

IDX 0

)

(repeat LL

(setq DAT(nth IDX ENT))

(if (=(car DAT)10)

(progn

(if (not PTLST)

(setq PTLST(list(cdr DAT)))

(setq PTLST(append PTLST(list(cdr DAT))))

)

)

)

(setq IDX(1+ IDX))

)

(cond

(p_open

(setq SS (ssget "_F" ptlst))

)

(T

(initget "Fenetre Capture")

(if (eq (getkword "\nSélection par [Fenetre/Capture]: ") "Capture")

(setq SS(ssget "_CP" ptlst))

(setq SS (ssget "_WP" ptlst))

)

)

)

(setvar "PICKFIRST" 1)

(sssetfirst nil SS)

(princ)

)

 

NB: Bien que les objets ne soient pas mis en surbrillance avec les poignées malgré PICKFIRST, la sélection est bien effective. Si polyligne ouvertre sélection par Trajet, fermée : proposition de Fenêtre ou Capture.