Jump to content

Change visibility for the latest placed block


pttr

Recommended Posts

Hi,

I'm trying to change the visibility of the last placed block.

I could not find a way that suited me for the code below.

(defun vblty (/ Visibility1 blk )
     (setq blk (entlast))
  (if (/= Visibility1 "")
	;Place Visibility1 to block
    )
)

 

I have looked at some other topics, but the code is always a bit over my level of LISP understanding.

 

Any help is much appreciated! :)

Link to comment
Share on other sites

Lee Mac has a fairly comprehensive set of routines here ( http://www.lee-mac.com/dynamicblockfunctions.html#getvisibilityparametername ) and to use (entlast) I think you'll need to change that to be a VLA-Object something like:

 

(setq blk (vlax-ename->vla-object (entlast)))

 

He is usually pretty good with his routines and fairly easy to follow

Link to comment
Share on other sites

if talking a dynamic block then yes thanks to Lee-mac 1st, then can display visibility values and choose. Works for any dynamic block as it reads the visibility values. You insert block and then visibility values are displayed.

 

Multiradio9.png.4aa769abe91d20b82e06f4b5d68d281a.png

Is this what you want as its 3 lisps, 2 are library functions the dcl and Lee-mac dynamic block functions. let me know will post code.

 

 

Edited by BIGAL
  • Like 1
Link to comment
Share on other sites

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.

Guest
Unfortunately, your content contains terms that we do not allow. Please edit your content to remove the highlighted words below.
Reply to this topic...

×   Pasted as rich text.   Restore formatting

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

×
×
  • Create New...