maksolino Posted May 3, 2012 Share Posted May 3, 2012 Hello I would like to have a lisp whith the possibility to delete entities in nested block. (without going inside the block) Thanks Quote Link to comment Share on other sites More sharing options...
Blackfish Posted May 3, 2012 Share Posted May 3, 2012 Hi, What do you mean "without going inside the block"? Can you explain a bit more... when and how would you like to select the entity? How would you like to repair an engine without opening a bonnet? Quote Link to comment Share on other sites More sharing options...
Lee Mac Posted May 3, 2012 Share Posted May 3, 2012 Written inside the forum post editor... may be typos... (defun c:nerase ( / e ) (if (setq e (car (nentsel))) (progn (vla-delete (vlax-ename->vla-object e)) (vla-regen (vla-get-activedocument (vlax-get-acad-object)) acactiveviewport) ) ) (princ) ) (vl-load-com) Or for multiple objects, maybe: (defun c:nerase ( / e ) (while (setq e (car (nentsel))) (vla-delete (vlax-ename->vla-object e)) ) (vla-regen (vla-get-activedocument (vlax-get-acad-object)) acactiveviewport) (princ) ) (vl-load-com) Window selection is not possible for a nested selection. Quote Link to comment Share on other sites More sharing options...
Blackfish Posted May 3, 2012 Share Posted May 3, 2012 Almighty Leesp... Quote Link to comment Share on other sites More sharing options...
maksolino Posted May 4, 2012 Author Share Posted May 4, 2012 You always make my wish becomes true Thanks Quote Link to comment Share on other sites More sharing options...
Lee Mac Posted May 4, 2012 Share Posted May 4, 2012 Cheers guys Quote Link to comment Share on other sites More sharing options...
Bluebird1973 Posted August 15, 2016 Share Posted August 15, 2016 Hi Lee Mac !! is it possible to select one nested (e.g. Line, Arc, ...) object/entity and delete the whole objects/entity of the same Layer out of the Block/nested Block ? Written inside the forum post editor... may be typos... (defun c:nerase ( / e ) (if (setq e (car (nentsel))) (progn (vla-delete (vlax-ename->vla-object e)) (vla-regen (vla-get-activedocument (vlax-get-acad-object)) acactiveviewport) ) ) (princ) ) (vl-load-com) Or for multiple objects, maybe: (defun c:nerase ( / e ) (while (setq e (car (nentsel))) (vla-delete (vlax-ename->vla-object e)) ) (vla-regen (vla-get-activedocument (vlax-get-acad-object)) acactiveviewport) (princ) ) (vl-load-com) Window selection is not possible for a nested selection. thx in advance ! Bluebird Quote Link to comment Share on other sites More sharing options...
Ajmal Posted February 13, 2021 Share Posted February 13, 2021 (edited) How to delete entities below the block First, I will select the block and select the area and its needs to delete all entity Lee Mac "Autoblock Break" am currently using but same time its not getting arc and another small blocks is not deleting Edited February 13, 2021 by Ajmal Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.