Dashed and Dot to Hidden

[pt_zooropa]

Hi guys,
Could someone tell me, if it's possible (with a lisp code) to change Dot and Dashed linetype to Hidden?
Thanks,

[rkmcswain]

Do you want to change the linetype of layers or of entities or of both?

[pt_zooropa]

Do you want to change the linetype of layers or of entities or of both?
Some drawings have layers with other linetypes and have objects too. I think the best solution would be to change the layers, or the objects, so that there would be just the sort of hidden linetype.

[tedg]

Some drawings have layers with other linetypes and have objects too. I think the best solution would be to change the layers, or the objects, so that there would be just the sort of hidden linetype.
Well here's a quick, crude stab at what a routine may look like.

(defun c:hidlt ()
(command "-layer" "ltype" "hidden" "test" "") ;; changes the linetype to hidden on "test" layer
(command "_chprop" "all" "" "ltype" "bylayer" "") ;;changes all entites' linetype to ByLayer
(princ)
)
There's probably a better way, but it's a start.
Good luck...

[pt_zooropa]

Ok. I dont want to change entities to Bylayer, only change all entities of drawing to specific Layer and keep linetypes. Only Dot and Dashed must change to Hidden.
Thanks.

['gile']

Hi,

Try this:

(vl_load_com)
(vlax-for blk (vla-get-Blocks
(vla-get-ActiveDocument (vlax-get-acad-object))
)
(vlax-for obj blk
(if (and (vlax-property-available-p obj 'LineType T)
(member (vla-get-Linetype obj) '("DOT" "DASHED"))
)
(vla-put-lineType obj "HIDDEN")
)
)
)

[pt_zooropa]

Thanks for your help!
But it returns error:
"no function definition: VLAX-GET-ACAD-OBJECT; error: An
error has occurred inside the *error* functionAutoCAD variable setting
rejected: "blipmode" nil"

['gile']

Sorry,
no function definition: VLAX-GET-ACAD-OBJECT
You got this message because I forgot to add a (vl-load-com) at the begining.
This expression is needed to load the vlax functions. You can add it to your startup suite so that the vlax functions should be automaticaly loaded.

; error: An
error has occurred inside the *error* functionAutoCAD variable setting
rejected: "blipmode" nil
This message means that the *error* function haven't be reset to the built in one in another routine which redefine it (restting blipmode sysvar).