0 Members and 1 Guest are viewing this topic.
(defun c:kaboum (/ it)(setq it (vlax-ename->vla-object (car (entsel))))(vlax-safearray->list (variant-value (vlax-invoke-method it "Explode")))(vla-delete it))
And you can also use QSELECT to select all blocks then..... KA-BOOOOOMMM!!!!!
Quote from: Matt W on September 07, 2011, 03:42:21 PMAnd you can also use QSELECT to select all blocks then..... KA-BOOOOOMMM!!!!!Yeah, the routine.
Quote from: alanjt on September 07, 2011, 03:44:01 PMQuote from: Matt W on September 07, 2011, 03:42:21 PMAnd you can also use QSELECT to select all blocks then..... KA-BOOOOOMMM!!!!!Yeah, the routine. Just t'rowin' out anudder option, dat's all.
Quote from: Matt W on September 07, 2011, 03:45:13 PMQuote from: alanjt on September 07, 2011, 03:44:01 PMQuote from: Matt W on September 07, 2011, 03:42:21 PMAnd you can also use QSELECT to select all blocks then..... KA-BOOOOOMMM!!!!!Yeah, the routine. Just t'rowin' out anudder option, dat's all.Just trollin.
Thank you Ronjonp for the shorter way. Lee, I was typing during talking on phone...I was distracted. Have a nice one guys.
Hi all !Can you help me covert Unexplode Blocks to Allow exploding Blocks and reverse.Thanks all !