Communauté
Salut,
A priori la procédure semble correcte.
J'avais fait ce LISP pour des fichiers convertis depuis ArhciCAD.
Peut être ton fichier est-il issu d'un autre logiciel ?
Si tu as le temps, copie/colle le code suivant à la ligne de commande valide et poste ici ce qui est retourné dans la fenêtre de texte.
Si tu peux aussi me dire les fichiers SHX demandés dans la boite de dialogue.
{code}((lambda ()
(vlax-for ts (vla-get-TextStyles
(vla-get-ActiveDocument (vlax-get-acad-object))
)
(print
(strcat (vla-get-Name ts) " : " (vla-get-FontFile ts))
)
)
(textscr)
(princ)
)
){code}
A priori la procédure semble correcte.
J'avais fait ce LISP pour des fichiers convertis depuis ArhciCAD.
Peut être ton fichier est-il issu d'un autre logiciel ?
Si tu as le temps, copie/colle le code suivant à la ligne de commande valide et poste ici ce qui est retourné dans la fenêtre de texte.
Si tu peux aussi me dire les fichiers SHX demandés dans la boite de dialogue.
{code}((lambda ()
(vlax-for ts (vla-get-TextStyles
(vla-get-ActiveDocument (vlax-get-acad-object))
)
(strcat (vla-get-Name ts) " : " (vla-get-FontFile ts))
)
)
(textscr)
(princ)
)
){code}
Alors je ne vois pourquoi ça ne marche pas.
- tu ouvres ton fichier
- tu fais annuler à la boite de dialogue
- tu charges le LISP
- tu lances RFORM
- tu copies/colles la fonction lambda donnée plus haut
Le retour devrait être :
"Standard : txt"
"GENERATED_STYLE_1 : swissc.ttf"
" : ltypeshp.shx"
"GENERATED_STYLE_3 : swiss.ttf"
"txt : txt.shx"
"9213-0A(FAUX-PLANCHER-NIV+1)|STANDARD : isocpeur.ttf"
si c'est bien le cas tu enregistres et ne devrait plus avoir ce soucis avec ce fichier.
- tu ouvres ton fichier
- tu fais annuler à la boite de dialogue
- tu charges le LISP
- tu lances RFORM
- tu copies/colles la fonction lambda donnée plus haut
Le retour devrait être :
"Standard : txt"
"GENERATED_STYLE_1 : swissc.ttf"
" : ltypeshp.shx"
"GENERATED_STYLE_3 : swiss.ttf"
"txt : txt.shx"
"9213-0A(FAUX-PLANCHER-NIV+1)|STANDARD : isocpeur.ttf"
si c'est bien le cas tu enregistres et ne devrait plus avoir ce soucis avec ce fichier.
Tu peux charger le LISP rform au démarrage (dans le boite de dialogue de la commande APPLOAD, la valise)
et dans chaque fichier où se présente ce problème, tu fais rform et tu enregistres, ça devrait fonctionner.
La fonction lambda ne servait qu'à tester le contenu des styles de textes.
et dans chaque fichier où se présente ce problème, tu fais rform et tu enregistres, ça devrait fonctionner.
La fonction lambda ne servait qu'à tester le contenu des styles de textes.
Vous n'avez pas trouvé ce que vous recherchiez ? Posez une question à la communauté ou partagez vos connaissances.
Publier dans les forums
