PHILPHIL Posté(e) le 14 avril 2016 Posté(e) le 14 avril 2016 bonjour il arrive parfois que sur certains fichier que je recupere, il y est des droites ou demie droite qui sont placées a pas mal d unites du sujet du plan. en faisant un zoom "etendue", ou "tout" ca ne prend pas en compte ces droites ou demie droites.on est obligé de faire un zoom arriere a la molette, pour les voir et les effacer. existe t'il un lisp, pour un zoom tres tres etendue tenant compte des droites, demie droites ?( oui autre solution c'est vrai, selection de toutes droite demie droite et effacer, mais c'est trop radical ) sinon apres coup voici la "radicale methode" (defun c:effacer_droite_demie_droite (/ droite1 demiedroite1 nbdroite nbdemiedroite) (setq droite1 (ssget "_x" '((0 . "xline")))) (setq demiedroite1 (ssget "_x" '((0 . "ray")))) (if (= droite1 nil) (setq nbdroite 0) (progn (setq nbdroite (sslength droite1)) (command-s "effacer" droite1 "")) ) (if (= demiedroite1 nil) (setq nbdemiedroite 0) (progn (setq nbdemiedroite (sslength demiedroite1)) (command-s "effacer" demiedroite1 "")) ) (prompt (strcat "\nNOMBRE DE DROITE TROUVEES ET EFFACEES : " (rtos nbdroite 2 0))) (prompt (strcat "\nNOMBRE DE DEMIE DROITE TROUVEES ET EFFACEES : " (rtos nbdemiedroite 2 0))) (princ) ) merci a+Phil Citer FREELANCE Autodesk Architecture 2025 sous windows 11 64 REVIT 24 pouces vertical + 30 pouces horizontal + 27 pouces horizontal
FRAXA Posté(e) le 14 avril 2016 Posté(e) le 14 avril 2016 (modifié) bonjour, commande Selection rapide, type d'objet droite, suppr.La même chose pour les demi-droite. ( oui autre solution c'est vrai, selection de toutes droite demie droite et effacer, mais c'est trop radical ).J'ai écrit trop vite Modifié le 14 avril 2016 par FRAXA Citer HPZ400 Workstation Intel Xeon W3550 3.07 GHz 6 Go ram QUADRO FX 1800
Messages recommandés