×
INTELLIGENT WORK FORUMS
FOR ENGINEERING PROFESSIONALS

Log In

Come Join Us!

Are you an
Engineering professional?
Join Eng-Tips Forums!
  • Talk With Other Members
  • Be Notified Of Responses
    To Your Posts
  • Keyword Search
  • One-Click Access To Your
    Favorite Forums
  • Automated Signatures
    On Your Posts
  • Best Of All, It's Free!
  • Students Click Here

*Eng-Tips's functionality depends on members receiving e-mail. By joining you are opting in to receive e-mail.

Posting Guidelines

Promoting, selling, recruiting, coursework and thesis posting is forbidden.

Students Click Here

Jobs

ISOLATE A LAYER in 2002
2

ISOLATE A LAYER in 2002

ISOLATE A LAYER in 2002

(OP)
I am using autocad 2002.  I want to click on an object and make all of the layers other than the object's layer freeze.  Does anyone know how to do this or do  I need to buy an extension?

RE: ISOLATE A LAYER in 2002

I use this lisp routine , It is not mine.



;|Finds layer of selected object, isolates it by Freezing, and zooms to (0.9) extents.
User clicks OK when finished and drawings returns to original view.
LAYER FLASH ROUTINE|;

(defun C:frezee (/ Flay lay Oldlay ITWAS OLDCMD WAITHERE XZ)
     (vl-load-com)
     (setq OldCmd (getvar "cmdecho"))
     (setvar "cmdecho" 0)
     (setq OldLay (getvar "CLAYER"))
     (setq Flay (entsel "\nSelect object on FREEZE layer : "))
     (setq XZ
          (vla-get-layer
          (vlax-ename->vla-object
          (car Flay)
          ) ;_ end of vlax-ename->vla-object
          ) ;_ end of vla-get-layer
     ) ;_ end of setq
     (command "undo" "begin")
     (command "layer" "make" XZ "")
     (command "-layer" "freeze" "*" "")
     (command "zoom" "extents")
     (command "Zoom" "0.9x")
    

     ;(setvar "clayer" Oldlay)
     ;(setvar "cmdecho" OldCmd)
     (princ)

) ;_ end of defun

Pardal

RE: ISOLATE A LAYER in 2002

(OP)
Express tools work great

RE: ISOLATE A LAYER in 2002

2
Create custom icon and use this Diesel string

^C^C_ai_molc;\_-layer;_off;*;;;

it turns all but selected layer off.
experiment with freeze but you may not be able to freeze the current layer, unless you change the "selected" to "current" first - can be done.

Red Flag This Post

Please let us know here why this post is inappropriate. Reasons such as off-topic, duplicates, flames, illegal, vulgar, or students posting their homework.

Red Flag Submitted

Thank you for helping keep Eng-Tips Forums free from inappropriate posts.
The Eng-Tips staff will check this out and take appropriate action.

Reply To This Thread

Posting in the Eng-Tips forums is a member-only feature.

Click Here to join Eng-Tips and talk with other members!


Resources