DIMSTYLE ET TEXTSTYLE

[formula1]

Bonjours,

J'ai besoin d'un coup de main car je ne trouve pas dans l'aide de autocad commen inserer des dimstyle et des textstyle avec leur propriete.

J'ai trouver comment ajouter different textstyle et dimstyle mais pour leur propeiéta du genre taille des fleche, taille du texte, etc...

Merci d'avance.

[sechanbask]

Salut,

J'espère que ça pourra te servir:

 

Dim MTextObj As AcadMText
Set MTextObj = ThisDrawing.ModelSpace.AddMText(pins, largeur_du_Mtext, texteins)
       With MTextObj
       'partie à modifier
       .height = taille
       .Rotation = directiontexte
       .AttachmentPoint = acAttachmentPointMiddleLeft
       'regen du texte uniquement
       .Update
       End With

[formula1]

Sechanbask, je ne veus pas inserer du mtext mais des styles de texte et des style de cote comme ça quand j'en aurrai besoin, au lieu d'aller les chercher sur un autre fichier, je pourrais les charger directement.

[lili2006]

Bonsoir,

 

Il faut créer un fichier gabarit (.dwt) des styles que tu souhaites réutiliser ou:et les mettres sur une palette, par exemple. Si tu veux importer des éléments déjà créés pour fournir ton gabarit, tu peux aussi utiliser "désign-center".

 

[sechanbask]

La réponse de lili2006 ne te convient pas ?

Tu veux vraiment faire un bouton pour une macro qui va te chercher d'autres styles de texte ?

[formula1]

Ce sera une macro pour charger d'autre style de cote et d'autre style de texte que ceux par défaut.

[sechanbask]

Il me semble que c'est un peu coton, c'est pire que pour les types de ligne car il faut chercher les styles de texte dans des fichiers externes.. mais en informatique tout est possible, sauf que parfois le chemin est long..

Tu as un début de code pour que je te donne un coup de main, où tu n'arrive pas à débuter?

[formula1]

Ben, j'ai trouver dans l'aide de AUTOCAD comment inserer un style de cote mais pour ce qui est de ses propriétés, il n'est rien mentionné.

C'est pour cela que je demande sur ce forum, car je sais qu'il y a toujours quelqu'un pour aider.