fabcad Posté(e) le 21 juin 2006 Posté(e) le 21 juin 2006 quelqu'un aurait il dévellopper en lisp ou vlisp une routine pour Selectionner un polygone en pointant à l'intérieur.Je suis preneur!
rebcao Posté(e) le 22 juin 2006 Posté(e) le 22 juin 2006 NON ! mais en sélectionnant le polygonne.... Je pense qu'il faudrait juste l'adapter... Christian [Edité le 22/6/2006 par rebcao] Formateur, Consultant Expert AutoCAD, REVIT MEP, INVENTOR, télécharger , des Outils AutoCAD...cad123 @ wanadoo.fr (enlever les espaces de part et d'autre de @)
bonuscad Posté(e) le 22 juin 2006 Posté(e) le 22 juin 2006 Sans trop savoir dans quel configuration tu dois executer cette action.Les polygones sont vides ou couper entièrement par d'autre entités? Essayes déjà ce bout de code voir si cela peut te rendre service, si c'est l'environnement est plus complexe, une solution simple sera difficile à mettre en place. ((lambda ( / ent dxf_ent lst) (setvar "HPBOUND" 1) (setq ent (bpoly (getpoint "\nPoint interne: "))) (cond (ent (setq dxf_ent (entget ent) lst (mapcar '(lambda (x) (trans x ent 1)) (mapcar 'cdr (vl-remove-if '(lambda (x) (/= (car x) 10)) dxf_ent))) ) (entdel ent) (if (zerop (getvar "pickfirst")) (setvar "pickfirst" 1)) (setq ent (nentselp (car lst))) (sssetfirst nil (ssadd (car ent))) ) ) (prin1) )) Choisissez un travail que vous aimez et vous n'aurez pas à travailler un seul jour de votre vie. - Confucius
Messages recommandés
Créer un compte ou se connecter pour commenter
Vous devez être membre afin de pouvoir déposer un commentaire
Créer un compte
Créez un compte sur notre communauté. C’est facile !
Créer un nouveau compteSe connecter
Vous avez déjà un compte ? Connectez-vous ici.
Connectez-vous maintenant