Lisp to turn on/off hatch patterns...

It's easy to turn off the layer a hatch is on, beyond that it gets a bit
more interesting - there is no on/off property for hatch objects, though
there is a visibility property. While individual objects can be set
invisible, you won't then be able to select them to make them visible. Take
a look at the code for Poof.lsp (customer files, 2/18/2004) for examples of
using this property.

Mike Weaver

 

Can anybody share a routine to quickly turn on/off hatch patterns?

 

FillMode=0, Regen

FillMode=1, Regen

--
R. Robert Bell, MCSE
www.AcadX.com


Can anybody share a routine to quickly turn on/off hatch patterns?

 

Good one. I thought fillmode was for solid fills only.

Mike

 

Thanks, Robert. That was *exactly* what I needed.

Regenall for paperspace, though...

Craig

 

Happy to help (and good point about regenall, for the lurkers.)

--
R. Robert Bell, MCSE
www.AcadX.com


Thanks, Robert. That was *exactly* what I needed.

Regenall for paperspace, though...

Craig

 

Thanks

 

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(defun c:HATCHTOGGLEDISPLAY ( / a b c d e)
(setq
a (ssget "x" (list (cons 0 "hatch"))) ; select all hatches
b (sslength a)
c 0.0
ht (IF ( = ht 0 ) 1 0)
) ;_ end of setq
(while (setq d (ssname a c))
(setq
e (entget d)
e (append e (list (cons 60 ht))) ; change the group 60
) ; end of setq
(entmod e) ; modify the entities
(setq c (1+ c))
); end while
) ; end of function
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

 

LOL. Robert, apparently that has
been around since at least R14 and
I had overlooked that use for it.
Thanks for the lesson!!

 

Scary, isn't it. There is so much in there that it is getting difficult to
keep track of all the possibilities!

--
R. Robert Bell, MCSE
www.AcadX.com


LOL. Robert, apparently that has
been around since at least R14 and
I had overlooked that use for it.
Thanks for the lesson!!