Topic: Block insertion from other drawing

[Lee Mac]

Tim, would you know of a way to check whether an Undo is 'open-ended' before calling StartUndoMark to start another?

Or, is it OK to call EndUndoMark first in all cases?

[T.Willey]

Lee,

You might want to use ' InsertBlock ' method instead of entmake.  With entmake, you would have to entmake all the attributes, and other sub-entities of the block, but with InsertBlock you don't.

[T.Willey]

Tim, would you know of a way to check whether an Undo is 'open-ended' before calling StartUndoMark to start another?

Or, is it OK to call EndUndoMark first in all cases?

I just end them.  I haven't ever ran into issues with just ending them, so I have not looked into a way to count them, but I would think there should be a way.

Edit:  Look in the help at the system variable ' UndoCtl '.  It looks like what you want.

[Lee Mac]

Tim, would you know of a way to check whether an Undo is 'open-ended' before calling StartUndoMark to start another?

Or, is it OK to call EndUndoMark first in all cases?

I just end them.  I haven't ever ran into issues with just ending them, so I have not looked into a way to count them, but I would think there should be a way.

Edit:  Look in the help at the system variable ' UndoCtl '.  It looks like what you want.

Thanks mate - will investigate. 

[Lee Mac]

You might want to use ' InsertBlock ' method instead of entmake.  With entmake, you would have to entmake all the attributes, and other sub-entities of the block, but with InsertBlock you don't.

Very good point - I had overlooked that. Will update the code momentarily. 

[Lee Mac]

Code updated as per Tim's suggestion. 

Many thanks Tim for your time perusing the code. 

[T.Willey]

Code updated as per Tim's suggestion. 

Many thanks Tim for your time perusing the code. 

You're welcome.

[Lee Mac]

Perhaps something like this Tim:

Code: [Select]

(and (= 8 (logand 8 (getvar 'UNDOCTL)))
     (vla-EndUndoMark <doc>)
)

(vla-StartUndoMark <doc>)

...

(vla-EndUndoMark <doc>)


[T.Willey]

That should work, as it seems like you can only have one group going at a time.  I tried to open more than one group, but once I ended the group, the bit code 8 was gone.

Edit: No need to do an ' and ' though, as just an ' if ' would work, as the second part will always return nil.  Not that it matters though.

[Lee Mac]

Edit: No need to do an ' and ' though, as just an ' if ' would work, as the second part will always return nil.  Not that it matters though.

I agree - an IF would be better programming

*prays Se7en doesn't stumble across earlier post using AND*

[ozimad]

everyone thanks a lot! for undo block, this is really the solution i need in all my lisps.
I think it would be nice to have CABs break routine with such block, to undo all the breakings by one key press.

[Lee Mac]

You're very welcome Ozimad, I enjoyed this thread