.shx dans Autocad [Fermé]
Signaler
michbaill
Strotzman -
- Messages postés
- 5
- Date d'inscription
- mercredi 21 novembre 2007
- Statut
- Membre
- Dernière intervention
- 30 septembre 2008
Strotzman -
A voir également:
- Shx autocad
- .shx - Meilleures réponses
- Ltypeshp.shx - Meilleures réponses
- Fichier shx autocad ✓ - Forum - Logiciels
- .shx dans Autocad - Forum - AutoCAD
- Bibliothèque type de ligne autocad - Forum - AutoCAD
- Telecharger autocad 2015 francais version d'evaluation - Forum - AutoCAD
- Telecharger autocad 2007 ✓ - Forum - AutoCAD
3 réponses
diname
- Messages postés
- 2223
- Date d'inscription
- mardi 1 mai 2007
- Statut
- Contributeur
- Dernière intervention
- 4 août 2019
Bonjour,
Je m'interroge, pourquoi cherches tu à délier les .shx? je comprends pas la nécessité.
un .shx correspond à des styles d'écritures, ton fichier dessin va automatiquement chercher un .shx existant sur ton autocad dans le cas ou il ne reconnait pas le style d'écriture du fichier transmis. C fréquent suite à des dessins réalisé sous d'autre logiciel, il serait peut être judicieux de ne rien supprimer pour éviter des plantes.
Je m'interroge, pourquoi cherches tu à délier les .shx? je comprends pas la nécessité.
un .shx correspond à des styles d'écritures, ton fichier dessin va automatiquement chercher un .shx existant sur ton autocad dans le cas ou il ne reconnait pas le style d'écriture du fichier transmis. C fréquent suite à des dessins réalisé sous d'autre logiciel, il serait peut être judicieux de ne rien supprimer pour éviter des plantes.
fydo
en faisant ce lisp :)
(defun C:RSHX ()
(vl-load-com)
(vlax-for item
(vla-get-textstyles
(vla-get-ActiveDocument (vlax-get-acad-object))
)
(if
(not
(vl-filename-extension (setq fname (vla-get-fontfile item)))
)
(setq fname (strcat fname ".shx"))
)
(cond ((findfile fname) nil)
((findfile (strcat (getenv "WINDIR") "\\FONTS\\" fname))
nil
)
(t
(vla-put-fontfile item "ltypeshp.shx")
(princ "\nChange ")
(princ fname)
(princ " on ltypeshp.shx")
)
)
)
(princ)
)
(princ "\nRSHX , purge unreferenced shape files")
(defun C:RSHX ()
(vl-load-com)
(vlax-for item
(vla-get-textstyles
(vla-get-ActiveDocument (vlax-get-acad-object))
)
(if
(not
(vl-filename-extension (setq fname (vla-get-fontfile item)))
)
(setq fname (strcat fname ".shx"))
)
(cond ((findfile fname) nil)
((findfile (strcat (getenv "WINDIR") "\\FONTS\\" fname))
nil
)
(t
(vla-put-fontfile item "ltypeshp.shx")
(princ "\nChange ")
(princ fname)
(princ " on ltypeshp.shx")
)
)
)
(princ)
)
(princ "\nRSHX , purge unreferenced shape files")
Ok, je n'avais pas fait le lien, à vrai dire mon ordi à quelques chevaux sous le capot! :o)
T'aurais pas une solution à soumettre? Moi je ne vois pas.