Jump to content

Help, Script or method to "Unlock" all objects in file?


Recommended Posts

Hi I have a file I have adopted that uses tons (hundreds) of Locks on objects.

(Select object or group of objects, -> Modify -> Lock)

It is a serious pain to work in this file, it requires going to Modify->Unlock

over and over to the point of insanity. There are groups that are locked, so unlock that and find that everything inside that group is locked, and then do that hundreds of times.

Does anyone know of a script or other method that might Unlock all objects in a single batch process?

Link to comment

Try this. You'll need to make a new palette and script, then paste this code into it and run it). Have not tested thoroughly, feel free anyone to improve.

{----------------------------------------------------------------------------------------------------------------------------}

Procedure unlocker;

VAR

h : HANDLE;

Procedure unlockme(h : HANDLE);

BEGIN

SetSelect(h);

UnLckObjs;

END;

BEGIN

ForEachObject(unlockme,(INSYMBOL & INOBJECT & INVIEWPORT & (ALL)));

DSelectObj(ALL);

END;

Run(unlocker);

{----------------------------------------------------------------------------------------------------------------------------}

Link to comment

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
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...