Charger type de ligne

[vinz34]

Bonjour,

 

Je cherche à charger un type de ligne en autolisp, sans passer par ce type de commande

 

(command "_.LINETYPE" "CH" "POINTILLE" "" "")

 

Je voudrais le faire proprement mais je ne sais pas comment m'y prendre.

[Patrick_35]

Salut

 

Charger le style POINTILLE du fichier AutoCAD.lin

 

(setq lin (vla-get-linetypes (vla-get-activedocument (vlax-get-acad-object))))
(and (vl-catch-all-error-p (vl-catch-all-apply 'vla-item (list lin "POINTILLE")))
 (vla-load lin "POINTILLE" (findfile "acad.lin"))
)

 

@+

[vinz34]

 

Comme d'hab,

 

Merci Patrick