Création d'un bouton ou d'une icône à partir d'une règle ilogic

[victorschmitt]

Bonjour,

Je voulais savoir si il était possible de créer une icône ou un bouton à partir d'une règle ilogic. Ou sinon de pouvoir intégrer au commandes utilisateur notre règle ilogic.

Vous remerciant de l'attention que vous pourrez porter à mes questions.

Cordialement

Victor Schmitt  

[_gile]

Salut,

Ce forum est dédié à AutoCAD, pour Inventor, c'est ici.

[victorschmitt]

effectivement je supprime le post dans ce cas la merci 

[patrick.emin]

Cette discussion a été déplacée ici depuis le forum AutoCAD

[ThomasB44]

Salut @victorschmitt

Pourquoi ne pas créer un formulaire global par exemple ?

Ici ce formulaire présente des boutons pour appeler des règles externes utilisées régulièrement.

Il existe un autre moyen via une macro VBA et un bouton personnalisé à créer pour appeler cette macro qui elle-même appellera la règle.

Consulte ce lien :

http://forums.autodesk.com/t5/inventor-customization/run-an-internal-ilogic-rule-from-vb-net/m-p/605...

[victorschmitt]

Bonjour

ThomasB44

On a effectivement créer des règles d'impression de plan  regroupé dans un formulaire :   

Je voulais savoir si il y avait justement un moyen de créer soit à partir du formulaire soit à partir de la règle un simple bouton sur lesquelles on pourrait cliquer pour déclencher une de ces règles , le but final étant de l'intégrer à notre commande utilisateur :

Je vais jeter un coup d'œil au lien de ton message précédent, si tu a d'autre élément de réponse je suis preneur.

Merci pour ta réponse en tout cas .

Victor

Inventor 2016 SP2

[ThomasB44 · Accepted solution]

Donc tu sais déjà comment ajouter une règle externe dans un formulaire.

Pour le bouton dans tes commandes utilisateur :

Il faut créer une macro dans le projet de l'application "default.ivb" pour qu'elle soit toujours accessible depuis n'importe quel fichier

Dans la macro tu insères ce code :

SyntaxEditor Code Snippet

Sub Hello() 'Nom de la macro
RuniLogic ("Nom et chemin complet avec l'extension de la règle externe à indiquer ici")
End Sub
Public Sub RuniLogic(ByVal RuleName As String)
Dim iLogicAuto As Object
Dim oDoc As Document
Set oDoc = ThisApplication.ActiveDocument
If oDoc Is Nothing Then
MsgBox "Missing Inventor Document"
Exit Sub
End If
Set iLogicAuto = GetiLogicAddin(ThisApplication)
If (iLogicAuto Is Nothing) Then Exit Sub
iLogicAuto.RunExternalRule oDoc, RuleName
End Sub
Public Function GetiLogicAddin(oApplication As Inventor.Application) As Object
Dim addIn As ApplicationAddIn
On Error Goto NotFound
Set addIn = oApplication.ApplicationAddIns.ItemById("{3bdd8d79-2179-4b11-8a5a-257b1c0263ac}")
If (addIn Is Nothing) Then Exit Function
addIn.Activate
Set GetiLogicAddin = addIn.Automation
Exit Function
NotFound:
End Function

 Ensuite dans "personnaliser les commandes utilisateur" tu retrouveras le nom de la macro ici :

Plus qu'à insérer le bouton 

[victorschmitt]

Merci !

Ca marche nickel , je voudrai savoir si il est à présent possible de customiser l'icône.

Encore merci pour les réponse .

Victor Schmitt

Inventor 2016 SP2

[ThomasB44]

De rien 

Pour customiser l'icone, suis pas à pas les étapes indiquées sur ce lien, à partir de "To create a button use the Customize command"

http://modthemachine.typepad.com/my_weblog/2008/11/creating-buttons-for-vba-macros.html

N'oublie pas que tu devras redémarrer ton Inventor.