dimstyles

[zebulon_]

Bonjour,

 

J'ai un style de cote dont je souhaite changer l'échelle générale

 

;; récupérer la collection de style de cotes

(setq DIMST (vla-get-dimstyles (vla-get-activedocument (vlax-get-acad-object))))

;;extraire le style de cote CADSYS-COT-50

(setq DI (vla-item DIMST "CADSYS-COT-50"))

 

après, quand je fais un dump j'obtiens

Commande: (vlax-dump-object DI T)

; IAcadDimStyle: Un groupe de paramètres de cote déterminant la présentation

d'une cote

; Valeurs de propriétés:

; Application (RO) = #

; Document (RO) = #

; Handle (RO) = "1B8"

; HasExtensionDictionary (RO) = 0

; Name = "CADSYS-COT-50"

; ObjectID (RO) = 2130269632

; ObjectName (RO) = "AcDbDimStyleTableRecord"

; OwnerID (RO) = 2130263120

; Méthodes prises en charge:

; CopyFrom (1)

; Delete ()

; GetExtensionDictionary ()

; GetXData (3)

; SetXData (2)

T

 

et je n'ai que Name comme propriété. Je suppose que les propriétés du style de cote sont stockées ailleurs (dictionnaire, xdata ?) et comment on peut modifier ces propriétés (hauteur de texte, echelle générale etc ?)

 

Merci

Vincent

 

[(gile)]

Salut,

 

J'ai renoncé à jouer avec les styles de cote en Visual LISP. La seule façon que j'avais trouvé est d'utiliser CopyFrom, mais c'est pas si simple...

 

Parfois AutoLISP est plus simple (et pas forcément beaucoup plus lent si on n'utilise pas command)

 

Tu peux utiliser entmod, par exemple pour modifier l'échelle globale à 10.0

 

(setq elst (entget (tblobjname "DIMSTYLE" "CADSYS-COT-50")))
(if (assoc 40 elst)
 (entmod (subst '(40 . 10.0) (assoc 40 elst) elst))
 (entmod (append elst (list '(40 . 10.0))))
)

 

[Edité le 13/5/2008 par (gile)]

[bseb67]

Salut zebulon_!

 

Je ne suis pas trop sur, mais si tu rends le style que tu veux modifier courant:

(command "-COTSTYLE" "restaurer" nom_cot)

puis tu fais

(command "dimscale" ech)

....

ca a l'air de fonctionner

 

Tu modifies les paramètres du style de cote courant.

 

Exemple:

 

Commande: -COTSTYLE

 

Style de cote courant: ISO-25 Annotatif: Non

Remplacement de la cote courante:

DIMSCALE 5.0000

Entrez une option de style de cote

[ANnotatif/Sauvegrd/Restaurer/Etat/Variables/Appliquer/?] : variables

 

Entrez le nom d'un style de cote, [?] ou : "ISO-25"

DIMADEC 0 Emplacements des décimales dans les angles

DIMALT Inactif Unités alternatives sélectionnées

DIMALTD 3 Nombre de décimales de l'unité alternative

DIMALTF 0.0394 Facteur d'échelle de l'unité alternative

DIMALTRND 0.0000 Valeur d'arrondissement des unités d'alternance

DIMALTTD 3 Changer la précision décimale des tolérances

DIMALTTZ 0 Tolérance alternative de suppression du zéro

DIMALTU 2 Changer les unités

DIMALTZ 0 Unité alternative de suppression du zéro

DIMAPOST Préfixe et suffixe pour le texte alternatif

DIMARCSYM 0 Symbole de longueur d'arc

DIMASZ 2.5000 Dimension de la flèche

DIMATFIT 3 Ajustement texte et flèches

DIMAUNIT 0 Format des unités angulaires

DIMAZIN 0 Suppression du zéro angulaire

DIMBLK FerméePleine Cartouche de la flèche

DIMBLK1 FerméePleine Cartouche de la première flèche

DIMBLK2 FerméePleine Cartouche de la deuxième flèche

DIMCEN 2.5000 Dimension de la marque centrale

DIMCLRD DUBLOC Couleur de la ligne de cote et de la ligne de

repère

DIMCLRE DUBLOC Couleur de la ligne d'attache

DIMCLRT DUBLOC Couleur du texte de cote

DIMDEC 2 Changer la précision décimale des tolérances

DIMDLE 0.0000 Prolongement de la ligne de cote

DIMDLI 3.7500 Espacement de la ligne de cote

DIMDSEP , Séparateur des décimales

DIMEXE 1.2500 Prolongement au-dessus de la ligne de cote

DIMEXO 0.6250 Décalage de l'origine de la ligne d'attache

DIMFRAC 0 Format de fraction

DIMFXL 1.0000 Ligne d'attache fixe

DIMFXLON Inactif Activer la ligne d'attache fixe

DIMGAP 0.6250 Espace entre la ligne de cote et le texte

DIMJOGANG 90 Angle de raccourcissement de cote de rayon

DIMJUST 0 Justification du texte sur les lignes de cote

DIMLDRBLK FerméePleine Nom de bloc des lignes de repère

DIMLFAC 1.0000 Facteur d'échelle linéaire

DIMLIM Inactif Générer les limites de cote

DIMLTEX1 BYBLOCK Ligne d'attache de type 1

DIMLTEX2 BYBLOCK Ligne d'attache de type 2

DIMLTYPE BYBLOCK Type de ligne de cote

DIMLUNIT 2 Format d'unité linéaire

DIMLWD -2 Epaisseur de ligne repère et épaisseur de

ligne de cote

DIMLWE -2 Epaisseur de ligne de prolongement

DIMPOST Préfixe et suffixe pour le texte de cote

DIMRND 0.0000 Valeur arrondie

DIMSAH Inactif Séparer les blocs de flèches

DIMSCALE 1.0000 Facteur d'échelle général

DIMSD1 Inactif Supprimer la 1ère ligne de cote

DIMSD2 Inactif Supprimer la 2ème ligne de cote

DIMSE1 Inactif Supprimer la première ligne d'attache

DIMSE2 Inactif Supprimer la deuxième ligne d'attache

DIMSOXD Inactif Supprimer les lignes de cote extérieures

DIMTAD 1 Placer le texte au-dessus de la ligne de cote

DIMTDEC 2 Précision décimale des tolérances

DIMTFAC 1.0000 Tolérance du facteur d'échelle de hauteur de

texte

DIMTFILL 0 Arrière-plan texte activé

DIMTFILLCLR DUBLOC Couleur de l'arrière-plan texte

DIMTIH Inactif Le texte à l'intérieur des attaches est

horizontal.

DIMTIX Inactif Placer le texte à l'intérieur des attaches

DIMTM 0.0000 Tolérance négative

DIMTMOVE 0 Mouvement du texte

DIMTOFL Actif Forcer la ligne à l'intérieur des lignes

d'attaches

DIMTOH Inactif Texte à l'extérieur horizontal

DIMTOL Inactif Cotation de tolérance

DIMTOLJ 0 Justification verticale des tolérances

DIMTP 0.0000 Tolérance positive

DIMTSZ 0.0000 Dimension de la marque

DIMTVP 0.0000 Position verticale du texte

DIMTXSTY Standard Style de texte

DIMTXT 2.5000 Hauteur du texte

DIMTZIN 8 Suppression zéro de la tolérance

DIMUPT Inactif Texte positionné par l'utilisateur

DIMZIN 8 Suppression zéro

[zebulon_]

Bonjour,

Parfois AutoLISP est plus simple (et pas forcément beaucoup plus lent si on n'utilise pas command)

Cela m'a bien l'air d'être le cas ici et on va utiliser le bon vieux entmod qui a fait ses preuves.

 

Pour bseb67, justement, je veux autant que possible éviter d'utiliser les command. Dans l'exemple que tu donnes

(command "dimscale" ech)

où dimscale est effectivement une commande, mais la variable dimscale existe également. On peut donc jouer avec en utilisant getvar et setvar.

 

En d'autres temps, les cotes ne pouvaient s'utiliser qu'avec un sous-menu "cot" ou "cot1" (_dim ou _dim1) et on peut toujours écrire ce genre de code :

(command "_dim1" "_restore" "CADSYS-COT-1")
(command "_dim1" "DIMSCALE" 50)
(command "_dim1" "_save" "CADSYS-COT-50")

Mais ce n'est pas mieux, puisqu'il y a toujours les command ;)

 

Merci

 

Amicalement

Vincent

 

[bseb67]

Re,

 

Pour bseb67, justement, je veux autant que possible éviter d'utiliser les command

 

ok, mais après avoir regardé le nom des paramètres et les variables autocad,

et bien ceux sont les mêmes :cool: ,

=> donc tu peux faire un restaurer, puis des setvar et enfin sauvegarder

Il n' y aura que 2 "command" alors.

 

Je ne sais pas si c'est faisable en lisp ou vlisp, la seule chose que j'ai pu constater, c'est que certaines

choses ne sont pas du tout faisable en lisp. Mais seulement avec ta petite souris et l'interface autocad

 

a+.

[zebulon_]

Bon ben voilà, j'ai réussi à faire ce que je voulais.

 

Donc : j'ai un fichier dans lequel j'ai défini un style de cote, valable pour un dessin au 1/1ème. Fichier que j'ai appelé CADSYS-COT0.dwg et qui est défini en mètres. (j'en ai fait 2 autres similaires dans le cas où je bosse en cm ou en mm, que j'ai appelé CADSYS-COT1.dwg et CADSYS-COT2.dwg, mais ce n'est pas le plus important)

 

Ce style de cote a cette allure :

http://img294.imageshack.us/img294/8251/ddimdz7.jpg

 

Il s'appelle CADSYS-COT-GABARIT qui possède 3 styles dépendants qui définissent les particularités pour les cotes angulaires, rayon et diamètre (il pourrait y en avoir d'autres). Ce qu'il faut savoir, c'est que ces styles dépendants s'appellent CADSYS-COT-GABARIT$1 (ou $2, $3 etc... en fonction de leur utilisation).

 

Le but est de copier dans un nouveau fichier ce style de cote, avec tous ses styles dépendants, de leur appliquer une échelle générale (par exemple 50, pour une utilisation au 1/50ème) et de les renommer avec un nom correspondant à l'échelle (par exemple CADSYS-COT-50).

 

Pour ce faire, j'ai utilisé l'excellent lisp

(defun Ouvrir_dessin_dbx (dwg / dbx)
 (if (< (atoi (substr (getvar "ACADVER") 1 2)) 16)
   (setq dbx (vlax-create-object "ObjectDBX.AxDbDocument"))
   (setq dbx (vlax-create-object (strcat "ObjectDBX.AxDbDocument." (substr (getvar "ACADVER") 1 2))))
  )
 (vla-open dbx dwg)
 dbx
) 

du non moins excellent Patrick-35

 

et pour importer, cela donne ceci

 

(defun create_dimstyle (ECH UNITS / Dbx DimName DimModel NOMFIC DIMST elst ActDimStyle AcDoc ForItem NAME POS EXT)
 (setq AcDoc (vla-get-activedocument (vlax-get-acad-object)))
 (setq DimName (strcat "CADSYS-COT-" ECH))
 (setq DimModel "CADSYS-COT-GABARIT")
 (if (not (tblsearch "DIMSTYLE" DimModel))
   (progn
     (setq NOMFIC (findfile (strcat "CADSYS-COT" UNITS ".DWG")))
     (setq Dbx (ouvrir_dessin_dbx NOMFIC))
     (setq DIMST (vla-get-dimstyles Dbx))
     (vlax-for FOR-ITEM DIMST
       (setq NAME (vla-get-name FOR-ITEM))
       (if (setq POS (vl-string-search "$" NAME))
         (setq EXT (substr NAME (+ POS 1) (strlen NAME)))
         (setq EXT "")
       )
       (if (and (wcmatch NAME (strcat DimModel "*")) (not (tblsearch "DIMSTYLE" (strcat DimName EXT))))
         (progn
           (vla-CopyObjects Dbx 
             (vlax-safearray-fill
               (vlax-make-safearray vlax-vbObject '(0 . 0))
               (list (vla-item DIMST NAME))
             )
            (vla-get-dimstyles AcDoc)
           )
           ;; changer d'échelle
           (setq elst (entget (tblobjname "DIMSTYLE" NAME)))
           (if (assoc 40 elst)
             (entmod (subst (cons 40  (distof ECH 2)) (assoc 40 elst) elst))
             (entmod (append elst (list (cons 40 (distof ECH 2)))))
           )
           ;; changer de nom
           (entmod (subst (cons 2 (strcat DimName EXT)) (assoc 2 elst) elst))
         )
       )
     )
     (vlax-release-object dbx)
   )
   (alert (strcat DimModel " présent dans le fichier"))
 )
 ;; activer le style de cote DimName
 (setq ActDimStyle (vla-item (vla-get-dimstyles AcDoc) DimName))
 (vla-put-ActiveDimStyle AcDoc ActDimStyle)
)

 

où ECH est un texte qui décrit l'échelle et UNITS qui décrit l'unité de travail

 

Exemple : (Create_Dimstyle "50" "0")

 

pour importer et rendre actif un style de cote au 1/50ème à partir du fichier CADSYS-COT0.dwg

 

Amicalement

Zebulon_

 

PS : j'ai un peu changé le lisp, parce que je me suis rendu compte que les cotes dépendantes sont purgeables. Le lisp précédent ne les recréait pas si le style de cote "racine" existait toujours.

 

[Edité le 14/5/2008 par zebulon_]

[lili2006]

Bonsoir à toutes et tous,

 

Comment peut-on tester cette routine qui semble très intéressante ?

 

Merci d'avance.

[zebulon_]

Bonjour,

 

J'ai déposé les fichiers ici . En même temps, je teste comment on peut partager de fichiers par le site de mon FAI. Donc, si ça marche pas, c'est que j'ai dû faire quelque chose de travers.

 

Le dossier contient 3 fichiers dwg qui contiennent les modèles de cotation (en m, mm et cm), un fichier dcl et un fichier lsp, le tout à metre dans un répertoire référencé dans les outils/options/fichiers/chemin de recherche de fichiers de support

 

Amicalement

Vincent

 

[lili2006]

Bonjour à toutes et tous,

 

Merci beaucoup zebulon_.

 

Je teste et revient.

[lili2006]

Re,

 

C'est carément génial ce principe !

 

Et si je modifie le style de cote, comment dois-je m'y prendre pour que le lisp continue de fonctionner ? En fait, je voudrais remplacer tes styles par les miens. [ Ici mes styles de cotes que j'utilise depuis une palette,... ça se corse, non ?!!].De même, je voudrais pouvoir garder le calque d'insertion de mes différents styles,...Est-ce possible?

 

A priori sur une V2008, les lignes de repères ne fonctionne pas (il faut faire échap pour sortir de ce cycle infernal) =>

 

Commande: Cctlili

Cotation repère au 1:250_leader

Indiquez le point de départ de la ligne de repère:

Indiquez le point suivant:

Indiquez le point suivant ou [Annotation/Format/annUler] :

Indiquez le point suivant ou [Annotation/Format/annUler] :

du texte annotation: \ Entrez la ligne suivante du texte annotation: \ Entrez

la ligne suivante du texte annotation: \ Entrez la ligne suivante du texte

annotation: \ Entrez la ligne suivante du texte annotation: \ Entrez la ligne

suivante du texte annotation: \ Entrez la ligne suivante du texte annotation: \

Entrez la ligne suivante du texte annotation: \ Entrez la ligne suivante du

texte annotation: \ Entrez la ligne suivante du texte annotation: \ Entrez la

ligne suivante du texte annotation: \ Entrez la ligne suivante du texte

annotation: \ Entrez la ligne suivante du texte annotation: \ Entrez la ligne

suivante du texte annotation: \ Entrez la ligne suivante du texte annotation: \

Entrez la ligne suivante du texte annotation: \ Entrez la ligne suivante du

texte annotation: \ Entrez la ligne suivante du texte annotation: \ Entrez la

ligne suivante du texte annotation: \ Entrez la ligne suivante du texte

annotation: \ Entrez la ligne suivante du texte annotation: \ Entrez la ligne

suivante du texte annotation: \ Entrez la ligne suivante du texte annotation: \

Entrez la ligne suivante du texte annotation: \ Entrez la ligne suivante du

texte annotation: \ Entrez la ligne suivante du texte annotation: \ Entrez la

ligne suivante du texte annotation: \ Entrez la ligne suivante du texte

annotation: \ Entrez la ligne suivante du texte annotation: \ Entrez la ligne

suivante du texte annotation: \ Entrez la ligne suivante du texte annotation: \

Entrez la ligne suivante du texte annotation: \ Entrez la ligne suivante du

texte annotation: \ Entrez la ligne suivante du texte annotation: \ Entrez la

ligne suivante du texte annotation: ; erreur: Fonction annulée ligne suivante

du texte annotation: \ Entrez la ligne suivante du texte annotation: \ Entrez

la ligne suivante du texte annotation: \ Entrez la ligne suivante du texte

annotation: \ Entrez la ligne suivante du texte annotation: \ Entrez la ligne

suivante du texte annotation: \ Entrez la ligne suivante du texte annotation: \

Entrez la ligne suivante du texte annotation: \ Entrez la ligne suivante du

texte annotation: \ Entrez la ligne suivante du texte annotation: \ Entrez la

ligne suivante du texte annotation: \ Entrez la ligne suivante du texte

annotation: \ Entrez la ligne suivante du texte annotation: \ Entrez la ligne

suivante du texte annotation: \ Entrez la ligne suivante du texte annotation: \

Entrez la ligne suivante du texte annotation: \ Entrez la ligne suivante du

texte annotation: \ Entrez la ligne suivante du texte annotation: \ Entrez la

ligne suivante du texte annotation: \ Entrez la ligne suivante du texte

annotation: \ Entrez la ligne suivante du texte annotation: \ Entrez la ligne

 

Merci d'avance et encore félicitations,...

 

 

[Edité le 15/5/2008 par lili2006]

[zebulon_]

Bonjour,

 

j'ai déposé au même endroit une mise à jour

 

Amicalement

Vincent

 

 

[Edité le 16/5/2008 par zebulon_]

[lili2006]

Bonjour à toutes et tous,

 

Je te remercie de ton aide précieuse.

Je teste et revient,...

[lili2006]

Re,

 

J'allucine !

 

C'est carément génial comme principe,..

 

Je ne sais pas comment tu as fait mais il est clair que je vais décortiquer tes écrits !

Est-ce que je dois maintenant vider le gabarit de travail des styles de cotes éxistantes par rapport au gabarit que tu m'a fournis ou bien inutile ?

 

Je ne sais pas non plus comment je peux te remercier pour cette personnalisation qui a dû te prendre un certain temps, :o

 

J'espère un jour pouvoir te renvoyer l'ascenseur, mais permet moi d'avoir un doute,... ;)

 

[Edité le 16/5/2008 par lili2006]

[zebulon_]

Bonjour,

 

Est-ce que je dois maintenant vider le gabarit de travail des styles de cotes existantes par rapport au gabarit que tu m'a fournis ou bien inutile ?

La définition des styles de cote dans le gabarit dwt devient inutile, autant les enlever...

 

Je ne sais pas non plus comment je peux te remercier pour cette personnalisation qui a dû te prendre un certain temps

Quand tu passeras du côté de Strasbourg, on pourra déjeuner ensemble. C'est toi qui paye. :)

 

J'espère un jour pouvoir te renvoyer l'ascenseur, mais permet moi d'avoir un doute,...

On ne sait jamais. Et puis, entre bétonneux, faut bien s'entraider, non ?

 

Amicalement

Vincent

 

[lili2006]

Re,

 

Quand tu passeras du côté de Strasbourg, on pourra déjeuner ensemble.

 

Ouh là, Bordeaux-Strasbourg, c'est pas tous les jours,... Mais ce sera bien entendu avec plaisir,...

 

La définition des styles de cote dans le gabarit dwt devient inutile, autant les enlever...

 

Ok !

 

Et puis, entre bétonneux, faut bien s'entraider, non ?

 

C'est clair ! Car au niveau progiciels faut reconnaitre qu'on est pas aidé,...

 

Si je veux définir d'autres styles de cotes voire modifier celles existantes, est-ce possible ?

Je pense que oui, mais je voulais écrire, est-ce accessible à quelqu'un comme moi en décortiquent tes écritures ?

 

Merci encore zebulon_

[zebulon_]

Si je veux définir d'autres styles de cotes voire modifier celles existantes, est-ce possible ?

Je pense que oui, mais je voulais écrire, est-ce accessible à quelqu'un comme moi en décortiquent tes écritures ?

 

si tu veux ajouter un calque de plus, il faut modifier cette liste

  (setq LIST_CALQUE 
   '(
    ((0 . "Divers") (1 . "BAC COTATIONS DIVERS") (2 . "4"))
    ((0 . "Charpente") (1 . "BAC COTATIONS CHARPENTE") (2 . "8"))
    ((0 . "Semelles") (1 . "BAC SEMELLES COTATIONS") (2 . "2"))
    ((0 . "Pieux") (1 . "BAC PIEUX COTATIONS") (2 . "4"))
    ((0 . "Longrines") (1 . "BAC LONGRINES COTATIONS") (2 . "4"))
    ((0 . "Voiles-Poteaux") (1 . "BAC VOILES-POTEAUX COTATIONS") (2 . "4"))
    ((0 . "Poutres-linteaux") (1 . "BAC POUTRES-LINTEAUX COTATIONS") (2 . "4"))
    ((0 . "Ferraillage") (1 . "BAC FERRAILLAGE COTATIONS") (2 . "4"))
    ((0 . "Réseau 1") (1 . "BAC RESEAU1 COTATIONS") (2 . "211"))
    ((0 . "Réseau 2") (1 . "BAC RESEAU2 COTATIONS") (2 . "5"))
    ((0 . "Réseau 3") (1 . "BAC RESEAU3 COTATIONS") (2 . "71"))
    ((0 . "Réseau 4") (1 . "BAC RESEAU4 COTATIONS") (2 . "40"))
[surligneur]    ((0 . "Réseau 5") (1 . "BAC RESEAU5 COTATIONS") (2 . "28")) [/surligneur] 
    )
 )

le code 0 correspond à ce qui est affiché dans la boite de dialogue, le code 1 au nom du calque et le code 2 à sa couleur.

 

Si tu veux rajouter un aspect de cotation supplémentaire, il faut modifier cette liste

   (setq LIST_ASPECT
   '(
    ((0 . "Classique") (1 . "COT CLASSIQUE"))
    ((0 . "Axe Droite") (1 . "COT AXE DROITE"))
    ((0 . "Axe Gauche") (1 . "COT AXE GAUCHE"))
    ((0 . "Réservation") (1 . "COT RESERVATION"))
[surligneur]     ((0 . "Cot verdammi") (1 . "COT VERDAMMI"))[/surligneur] 
    )
 )

où le code 0 correspond à ce qui est marqué dans le DCL et le code 1, la racine du nom de style de cote. Et pour que ça marche il faut rajouter un style COT VERDAMMI-GABARIT dans le fichier gabarit dwg. Le reste, ça devrait suivre.

 

Amicalement

Vincent

 

PS : COT VERDAMMI, ça veut dire "nom de Dieu" en Alsacien et c'est un juron qu'on entend assez souvent par chez nous.

 

[lili2006]

Rere,

 

Merci pour tout zebulon_.

Je vais m'y pencher dés ce week-end et n'oublierai pas de revenir sur ce post,...

 

Merci encore de ton aide et de l'idée surtout !

Je trouve vraiment cette façon de coter très intéressante.

Dés que j'ai l'occasion de reprendre un plan, je teste de A à Z cette méthode et je verrai bien,...Mais je pense qu'il n'y a pas photo,. ;)

 

Encore merci pour cet esprit de partage et d'entr'aide.

 

Au plaisir,

[lili2006]

Rere,

 

J'ai fait un p'tit test en suivant tes indications et ben,

 

Le reste, ça devrait suivre.

,

 

pas de problème.

 

Même les lignes de repères fonctionnent maintenant, terrible !

 

Merci encore pour tout.

 

Au plaisir,

 

[Edité le 16/5/2008 par lili2006]

[lili2006]

Bonjour à toutes et tous,

 

 

Je voudrais savoir comment se font les coefficients de proportionnalités entre l'échelle de création : 1 et les autres.

Mon échelle la plus usuelle étant le 1/50, j'ai réglé les cotes dans le gabarit (échelle 1/1 !)de manière à respecter la charte graphique que je me suis imposé.

Le problème est que je ne retrouve pas la même proportion pour les autres échelles que l'on s'était imposé.

Est-ce qu'il faut recréer un style par échelle comme sur le gabarit ou il y à t-il un endroit dans le lisp ou l'on pourrait imposer une proportion dans les différentes échelles en gardant comme rapport de base celui imposé à l'échelle 1/50 ?? ( le fichier)

 

 

http://images0.hiboox.com/images/2008/teu300w5.jpg

 

Merci d'avance.

 

 

 

[Edité le 17/5/2008 par lili2006]

[zebulon_]

Bonjour,

 

les coefficients de proportionnalité entre le modèle et le style de cote c'est tout simplement l'échelle. Mon but est d'avoir un plan avec des cotes homogènes quelle que soit l'échelle. Si, sur le même plan, j'ai une vue au 1:100ème et un détail au 1:5ème, les cotes auront le même aspect en espace papier et une cote au 1:5ème sera 20x plus petite qu'une cote au 1:100ème.

 

En espace objet, une cote au 1:100ème est 100x plus grande que ce que je souhaite obtenir en espace papier puisque quand je fais une fenêtre FMULT j'applique un rapport de 1/100. Ce qui me fait retomber sur mes pieds quel que soit l'échelle.

 

Voilà, c'est la règle que je m'étais imposée, puisque cela me semblait logique.

 

Amicalement

Zebulon_

 

[lili2006]

Bonsoir à toutes et tous,

 

Je comprend tout à fait ton raisonnement zebulon_ mais j'ai constaté que suivant les échelles on ne pouvait pas garder de rapport "linéaire", (CF image ci-dessus). C'est flagrant aux échelles du 1/100 & 1/200. Tu n'as pas ce problème toi ?

J'ai rebossé le principe est refait des styles de cotes, j'adopte ta méthode et l'outil que tu as créé, sans problème. Pour moi, c'est un très bon compromis en attendant que tous le monde se mette à la cotation dans l'Espace papier,...

 

Merci encore zebulon_.

[zebulon_]

Bonsoir,

 

Tu n'as pas ce problème toi ?

Non, puisque mon impératif c'est d'avoir des cotes identiques sur mon plan quelle que soit l'echelle. La taille de la cote en espace objet est donc inversement proportionnelle à l'echelle de l'espace papier.

 

en attendant que tous le monde se mette à la cotation dans l'Espace papier,...

quand on ne fait que de la 2D je ne vois pas trop l'intérêt, mais je peux me tromper. J'aime bien, quand je modifie un plan, avoir tout sous la main : le dessin et les cotes qui vont avec. C'est un avis qui n'engage que moi.

 

Donc, pour ne pas me faire avoir, quand je fais un plan je commence par tout dessiner, puis je fais ma mise en page en choisissant le format adéquat et les echelles qui vont bien et ce n'est qu'après que je cote puisque je connais l'échelle de mise en page. Ce qui est important aussi dans ma façon de travailler, c'est d'avoir les cotes au 1/50ème sur un calque cot-50 et les cotes au 1/20ème sur un calque cot-20 etc..., parce qu'il m'arrive fréquemment d'utiliser le même détail et de le représenter à 2 échelles différentes. Je gèle le calque cot-50 dans une fenêtre et le calque cot-20 dans l'autre, comme ci-dessous.

http://img374.imageshack.us/img374/8665/cotdetxc3.jpg

Alors que toi, tu mets tout sur le même calque quelle que soit l'échelle.

 

Amicalement

Vincent

 

 

 

 

[lili2006]

Bonjour à toutes et tous,

 

Alors que toi, tu mets tout sur le même calque quelle que soit l'échelle.

 

Non,bien sur, je travaille comme toi pour les formations adultes qui viennent en perfectionnement car ils ont l'habitude de coter dans l'espace objet !

Pour mes étudiants, je leur montre les deux façons et ils préférent de loin coter dans le papier (même en 2D !). Effectivement, on passe de 20 styles de cotes à 3 ,....

 

Merci encore de tes réponses zebulon_.

 

@+,

 

[Edité le 20/5/2008 par lili2006]

[mdsv31]

Pour que mes echelles soit toujours indentiques.

 

Je créé des style de cote avec un vieux lisp trouver sur AutoCAD+ qui m'ouvre une boite de dialogue qui me demande la taille de l'ecriture de la cote une fois imprimer et l'echelle de la fenêtre.

Et il me créé le style voulu.

 

Le Lien ICI

 

@+

MDSV31

 

PS: L'adresse du site ici et c'st le truc n°4

[zebulon_]

Bonjour,

Effectivement, on passe de 20 styles de cotes à 3 ,....

mais on a les cotes sur un espace et les objets cotés sur un autre. Et, comme l'expérience le montre, il faut toujours reprendre un dessin (au moins une fois, sinon plus), je préfère mille fois avoir les cotes dans le même espace que les objets cotés pour cette raison.

Tu me diras qu'il y a la possibilité d'associer des cotes... Bof, ça ne marche bien que quand le revendeur Autocad te fais la démo. Il suffit que tu effaces quelques objets cotés pour que les cotes associées ne le soient plus. Et là il faut être doublement vigilant au moment où tu fais des modifications.

Moi, je me suis fais ma religion en la matière. Je cote en espace objet avec des cotes non associées. De toute façon, 9 fois sur 10, je modifie avec la commande étirer donc, je sélectionne le nodal de la cote également et elle est modifiée, même si elle n'est pas associée.

Et quand tes étudiants seront dans la vraie vie, peut être changeront-ils d'avis, même s'il faut se coltiner quelques styles de cotes en plus (moi, j'ai un style de cote par échelle, point barre).

 

je travaille comme toi pour les formations adultes

Je ne fais que très peu de formation. Mon boulot, c'est de faire des plans 2D essentiellement dans le domaine des ouvrages d'art que ce soit en exécution (coffrage et ferraillage) ou en avant-projet. Donc, des plans techniques quotidiennement au menu où j'essaie d'être efficace en matière de cotation, puisque cela représente au moins 50% de mon boulot.

 

La 3D et le lisp, c'est pour la récréation...

 

Amicalement

Vincent