Aller au contenu

Champ echelle personnalisée de fenêtre


jerome.s

Messages recommandés

rien a voir

mais pratique pour ceux qui on des doutes sur les échelles de fenêtre

 

 

(defun c:fech() ;;vérifie l'echelle d'une fenetre dans lespace papier

 

(vl-load-com)

(alert (strcat "Echelle : 1/" (rtos (* (expt (vla-get-customscale(vlax-ename->vla-object(car(entsel))) ) -1) 1000)2 0)))

)

 

je multiplie par 1000 parce que unité dessin = 1m

 

Vous fîtes ce que vous pûtes

et vous m'épatâtes !!!!

Lien vers le commentaire
Partager sur d’autres sites

  • 4 mois après...

Bonjour à toutes et tous,

 

y a til une manipulation pour avoir un facteur de 10 dans le champ?

 

J'utilise les mêmes unités que toi.

 

Alors, j'ai redéfini ma liste d'échelle et supprimé les autres.

 

Tu peux alors choisir ton champ Objet => Fenêtre => Échelle standard

 

 %%,1).StandardScale \f "%en0">%

Civil 3D 2025 - COVADIS_18.3b

https://www.linkedin...3%ABt-95313341/

Lien vers le commentaire
Partager sur d’autres sites

Re,

 

En fait, au démarrage d'un nouveau dessin, ce lisp fait le nettoyage par défaut (Car gros soucis d'échelles d'annotation superflue avec la V2008,...)=>

 

Échelle par défaut (la plus "usuelle" pour moi => 1/50)

 

 

 (while (assoc 350 (dictsearch (namedobjdict) "ACAD_SCALELIST"))
(progn
(vla-delete (vlax-ename->vla-object (cdr (assoc 350 (dictsearch (namedobjdict) "ACAD_SCALELIST")))))
)
)

(apply ' command (append (list "-scalelistedit")(list
"a" "1/50" "1:5" 
"a" "1/100" "1:10"
"a" "1/200" "1:20"
"a" "1/25" "10:25"
"a" "1/75" "10:75"
"a" "1/20" "1:2"

"q" )))

(command "cannoscale" "1/50" )

(prin1)

 

Je l'ai également transféré en script de cette façon =>

 

 _-scalelistedit R O
S 1:1
S 1:2
S 1:4
S 1:5
S 1:8
S 1:10
S 1:16
S 1:20
S 1:30
S 1:40
S 1:50
S 1:100
S 2:1
S 4:1
S 8:1
S 10:1
S 100:1
S 1/128" = 1'-0"
S 1/64" = 1'-0"
S 1/32" = 1'-0"
S 1/16" = 1'-0"
S 3/32" = 1'-0"
S 1/8" = 1'-0"
S 3/16" = 1'-0"
S 1/4" = 1'-0"
S 3/8" = 1'-0"
S 1/2" = 1'-0"
S 3/4" = 1'-0"
S 1" = 1'-0"
S 1-1/2" = 1'-0"
S 3" = 1'-0"
S 6" = 1'-0"
S 1'-0" = 1'-0"
A cm - 1/25
10:25
A cm - 1/20
1:2
A cm - 1/50
1:5
A cm - 1/75
10:75
A cm - 1/100
1:10
A cm - 1/200
1:20
Q

 

S, pour supprimer lorsque je récupère des plans de l'extérieur

A, pour ajouter avec mes unités (comme toi, en cm)

Civil 3D 2025 - COVADIS_18.3b

https://www.linkedin...3%ABt-95313341/

Lien vers le commentaire
Partager sur d’autres sites

Créer un compte ou se connecter pour commenter

Vous devez être membre afin de pouvoir déposer un commentaire

Créer un compte

Créez un compte sur notre communauté. C’est facile !

Créer un nouveau compte

Se connecter

Vous avez déjà un compte ? Connectez-vous ici.

Connectez-vous maintenant
×
×
  • Créer...

Information importante

Nous avons placé des cookies sur votre appareil pour aider à améliorer ce site. Vous pouvez choisir d’ajuster vos paramètres de cookie, sinon nous supposerons que vous êtes d’accord pour continuer. Politique de confidentialité