Aller au contenu

extruder une région suivant un chemin en VBA


Messages recommandés

Posté(e)

Bonjour à tous, je développe pour mon travail une application autocad VBA pour représenter l'assemblage entre plusieurs poutres.

J'ai des aciers dépassant de ces poutres que je dois représenter des aciers dépassant.

Pour cela je dessine la section de mon acier et je veux le faire extruder en suivant un chemin et le tout en VBA, sans que l'utilisateur n'est à indiquer ce chemin... ouf

 

Est-ce que cela est possible???

merci d'avance de votre aide

Posté(e)

Salut et bienvenue,

 

Oui c'est possible, tu trouveras un exemple dans l'Aide aux dévellopeurs >> ActiveX and VBA Reference >> Code Examples >> AddExtrudedSolidAlongPath Example

Gilles Chanteau - gileCAD - GitHub
Développements sur mesure pour AutoCAD

Posté(e)

Salut,

 

L'extrusion a toujours la même longueur ou est-elle fonction d'un autre paramètre ? Peut-être en appliquant les SCU dans l'axe de la poutre tu économiseras à l'utilisateur quelques cliks.

 

Par contre là j'ai pas saisi... :

J'ai des aciers dépassant de ces poutres que je dois représenter des aciers dépassant.

 

Dans l'absolu même si je ne saurai (encore) le faire je pense que c'est possible...

 

Tiens nous au courant !

"La ligne droite est le plus court chemin entre deux points, à condition que les deux points soient bien en face l'un de l'autre" P. Desproges.

Posté(e)

Je ne connais pas le VBA, mais on utilise les mêmes fonctions en VisualLISP.

 

La fonction AddExtrudedSolidAlongPath nécessite 3 arguments :

1°) l'objet (espace objet, espace papier ou bloc)

2°) la region à extruder

3°) le chemin (ligne, polyligne, cercle, ellipse, spline ou arc) peu importe si cet objet a été acquis avec un GetEntity, ou crée par le programme avec un AddLine, AddLightWeightPolyline ou autre.

 

c'est à l'utilisateur d'indiquer le chemin à l'aide d'un clic

 

Revois l'exemple, si je comprends bien, le chemin (une spline) est créé par la routine puis passé comme argument à AddExtrudedSolidAlongPath.

Gilles Chanteau - gileCAD - GitHub
Développements sur mesure pour AutoCAD

Posté(e)

Ne pas oublier la polyligne3D et préciser que la spline doit être plate.

Bureau d'études dessin.

Spécialiste Escaliers

Développement - Formation

 

./__\.
(.°=°.)
Posté(e)

Merci à tous.. j'ai réussi à extruder mon objet comme je le voulais.

Maintenant, je me bats pour modifier mon SCU par la prog... afin de n'avoir qu'une fonction pour faire mon objet extruder et d'orienter ma surface de départ en fonction de mon scu

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é