Como puedo eliminar todos los achurados de un dibujo

[Anonymous]

Buenos dias.

Hay alguna forma de eliminar los solidos y achurados que se encuentren en un dibujo de autocad, ya que muchos achurados se encuentran dentro de un bloque el cual esta dentro de otro bloque.y para poder eliminarlo toca ingresar a cada bloque y eliminarlos, y un dibujo promedio tiene mas de 500 bloques con achurados y es un trabajo muy complicado.

el comando FILL-DESACTIVADO no me sirve por que solo oculta los achurados pero no los elimina del dibujo.

[Edwin.Saez · Accepted solution]

@Anonymous,

Considero que el único problema que tendrías es eliminar los hatch que se encuentran dentro de los bloques, por lo tanto, te envío este lisp para que lo pruebes.

 *lisp by Tharwat*

(defun c:deletehatchblock (/ doc)
  (vlax-for bks (vla-get-blocks (setq
                      doc (vla-get-ActiveDocument (vlax-get-acad-object))
                    )
                  )
    (if (and (eq :vlax-false (vla-get-islayout bks))
             (eq :vlax-false (vla-get-isXref bks))
        )
      (vlax-for obj bks
        (if (and (wcmatch (vla-get-objectname obj)
                          "AcDbSolid,AcDbHatch,AcDbWipeout"
                 )
                 (vlax-write-enabled-p obj)
            )
          (vla-delete obj)
        )
      )
    )
  )
  (vla-regen doc AcAllViewports)
  (princ)
)(vl-load-com)

[Anonymous · Accepted solution]

Muy amable, me sirvio esa rutina a la perfeccion, gracias por el aporte

[Edwin.Saez · Accepted solution]

Fue un gusto poder ayudarte! 😄

por favor Acepta como solución si te ayudo mi respuesta!

[j_cordero]

hola que tal oye la rutina elimina

:

"AcDbSolid,AcDbHatch,AcDbWipeout"

si solo quiero los sólidos seria solo AcDbSolid

[karenyusieth]

Alguien me puede orientar con como agregar esa lisp a autocad ? 

Alguien tiene el archivo que porfa lo comparta o como se genera ese archivo 

gracias

[calderg1000]

Saludos @karenyusieth 

Para cargar una rutina autolisp al Autocad, debes utilzar el comando APPLOAD, luego direccionas hacia la ubicacion del archivo que contiene la rutina, seleccionas el archivo y presionas LOAD.

Luego ya puedes utilizar el nuevo comando, digitando su nombre, en este caso debes digitar: deletehatchblock 

Aqui te adjunto el archivo de la rutina, espero te sea de ayuda

Adjunto link de video explicativo.

https://www.youtube.com/watch?v=jCA3p35tPHU