AutoCAD uses the EXPLODE command to 'convert' an inserted block back to its. (Not available in AutoCAD LT.) Multiline Text Explodes into text objects. Color and materials assignments are retained. Mesh Objects Explodes each face into a separate 3D face object. To get rid of a block definition completely you will need to. Explodes into lines, splines, solids (arrow heads), block inserts (arrow heads, annotation blocks), multiline text, or tolerance objects, depending on the leader. Two terrorists, brothers Dzhokhar Tsarnaev and Tamerlan Tsarnaev, planted two homemade pressure cooker bombs, which detonated 14 seconds and 210 yards (190 m) apart at 2:49 p.m. Sub Ch10_ExplodingABlock() ' Define the block Dim blockObj As AcadBlock Dim insertionPnt(0 To 2) As Double insertionPnt(0) = 0 insertionPnt(1) = 0 insertionPnt(2) = 0 Set blockObj = _ (insertionPnt, "CircleBlock") ' Add a circle to the block Dim circleObj As AcadCircle Dim center(0 To 2) As Double Dim radius As Double center(0) = 0 center(1) = 0 center(2) = 0 radius = 1 Set circleObj = blockObj.AddCircle(center, radius) ' Insert the block Dim blockRefObj As AcadBlockReference insertionPnt(0) = 2 insertionPnt(1) = 2 insertionPnt(2) = 0 Set blockRefObj = _ (insertionPnt, "CircleBlock", 1#, 1#, 1#, 0) ZoomAll MsgBox "The circle belongs to " & blockRefObj.ObjectName ' Explode the block reference Dim explodedObjects As Variant explodedObjects = blockRefObj.Explode ' Loop through the exploded objects Dim I As Integer For I = 0 To UBound(explodedObjects) explodedObjects(I).Color = acRed explodedObjects(I).Update MsgBox "Exploded Object " & I & ": " _ & explodedObjects(I).ObjectName explodedObjects(I).Color = acByLayer explodedObjects(I). Select the erase icon and pick any point on one of the inserted blocks then. AutoCAD blocks inserted with MINSERT cannot be exploded directly. If you want to make the geometry within the block independent again you can Explode the block. The Boston Marathon bombing was a domestic terrorist attack that took place during the annual Boston Marathon on April 15, 2013.
0 Comments
Leave a Reply. |
AuthorWrite something about yourself. No need to be fancy, just an overview. ArchivesCategories |