How to load line types....

[narendra]

Hi All,

my client has supplied a .lin file and I want to load in autocad how could I load..I know only way to load lines type is appload but once I load like this appearing on my cad files but not appearing on other systems what can I do to appear line types on all systesm of my group.

[dbroada]

I have no idea how to use LISP to load linetypes but from the command line you type

-LINETYPE
LOAD
<name of file>

[ReMark]

Your lisp routine would have to include the path to the linetype file you want your users to load. I assume this would be on your network where the rest of your shared files are stored.

[BIGAL]

A lisp version Note the .lin file has been included in the "support files" list via CONFIG like Remark save to your server, else to one directory on every pc.

 

(setq  doc (vla-get-activedocument (vlax-get-acad-object)))
(defun loadLinetype (doc LineTypeName FileName)
 (if (and
       (not (existLinetype doc LineTypeName))
       (vl-catch-all-error-p
         (vl-catch-all-apply
           'vla-load
           (list
             (vla-get-Linetypes doc)
             LineTypeName
             FileName
           )
         )
       )
     )
   nil
   T
 )
)
(defun existLinetype (doc LineTypeName / item loaded)
 (vlax-for item (vla-get-linetypes doc)
   (if (= (strcase (vla-get-name item)) (strcase LineTypeName))
     (setq loaded T)
   )
 )
)
;load missing linetypes
;;; returns: T if loaded else nil
(loadLinetype doc "Fence" "custom.lin")
(loadLinetype doc "Tree" "custom.lin")

[narendra]

Thank you all............

[Lee Mac]

My Load Linetypes function may also be of some interest.