Incorporation d'Autodesk Inventor View dans une page Web

L'interface de programmation d'application (API) est dotée de plusieurs propriétés et méthodes que vous pouvez utiliser dans votre page Web.

Vous pouvez définir les propriétés à l'aide du libellé <param> ou utiliser les propriétés et les méthodes API avec un langage de script tel que le langage Visual Basic Script. Vous pouvez aussi créer des applications à l'aide de langages de programmation comme le C++ et le Visual Basic par l'intermédiaire de l'API.

Utilisez le libellé <object> pour incorporer Inventor View et référencer une pièce dans un fichier HTML. Vous pouvez ensuite la visualiser à partir d'Internet ou d'un intranet.

Remarque : Microsoft Internet Explorer 5.01 ou ultérieur est requis.
  1. Créez un fichier HTML comme à votre habitude.
  2. Définissez les commandes à l'aide du libellé <param> HTML. Cela permet de définir les propriétés de personnalisation des boutons destinés au redimensionnement de la fenêtre de contrôle, au changement du mode d'affichage et à l'ouverture des fichiers.
    Remarque : Il est recommandé d'utiliser le libellé <param> pour définir les propriétés au lieu des les ajouter à l'URL ou au chemin. Parfois, il est possible en effet que votre navigateur supprime les paramètres ajoutés.
  3. Utilisez le paramètre classid du libellé <object> pour incorporer Inventor View dans le fichier. Votre fichier HTML doit être défini comme suit :

    <object classid="CLSID:A6336AB8-D3E1-489A-8186-EE40F2E027FE" id=ViewerControl1>

  4. Configurez les propriétés API pour contrôler le fichier dans la page Web.

    5. Lors de la définition des paramètres de hauteur et largeur dans une page HTML, il est recommandé d'utiliser des valeurs statiques plutôt que des pourcentages. Si vous utilisez des pourcentages et que vous redimensionnez la fenêtre du navigateur, le fichier sera déformé à l'impression.

Exemple HTML

<HTML>

<HEAD><TITLE>Essai du contrôle de visualiseur</TITLE></HEAD>

<BODY>

<FORM ID="TestForm" LANGUAGE="VBScript">

<table style-class="BORDER-COLLAPSE: collapse" cellSpacing=0 cellPadding=0 border=1><tr><td>

<blockquote>

<BOLD>Fichier :</BOLD>

<input type="file" size="40" NAME="BrowseFile"></td></tr>

<tr><td align=right><INPUT NAME="OpenButton" TYPE="Button" VALUE="Ouvrir"></td></tr>

<tr><td><INPUT NAME="PerspectiveButton" TYPE="Button" Value ="Perspective">

<INPUT NAME="LargerButton" TYPE="Button" VALUE="Plus grand">

<INPUT NAME="SmallerButton" TYPE="Button" VALUE="Plus petit"> <INPUT name="cbInteractive" value ="Interactif" type="CheckBox">Interactif</td></tr>

<tr><td><INPUT NAME="ShadedButton" TYPE="Radio"> Vue ombrée

<INPUT NAME="HiddenButton" TYPE="Radio"> Ligne masquée

<INPUT NAME="WireframeButton" TYPE="Radio"> Filaire</td></tr></table></blockquote>

</FORM>

<object classid="CLSID:A6336AB8-D3E1-489A-8186-EE40F2E027FE" id=ViewerControl1 width=400 height=300>

<param name="_Version" value=65536> <param name="_ExtentX" value=13229>

<param name="_ExtentY" value=7938> <param name="_StockProps" value=0>

</object>

<SCRIPT LANGUAGE="VBScript">

Sub PerspectiveButton_OnClick()

  Dim TheForm

  Set TheForm = Document.Forms("TestForm")

  If ViewerControl1.Perspective Then

    TheForm.PerspectiveButton.Value = "Orthographic"

    ViewerControl1.Perspective = False

  Else

    TheForm.PerspectiveButton.Value = "Perspective"

    ViewerControl1.Perspective = True

  End If

End Sub

Sub LargerButton_OnClick()

   ViewerControl1.Width = ViewerControl1.Width * 1.1

   ViewerControl1.Height = ViewerControl1.Height * 1.1

End Sub

Sub SmallerButton_OnClick()

   ViewerControl1.Width = ViewerControl1.Width * 0.9

   ViewerControl1.Height = ViewerControl1.Height * 0.9

End Sub

Sub OpenButton_OnClick()

   Dim TheForm

   Set TheForm = Document.Forms("TestForm")

   ViewerControl1.Filename = TheForm.BrowseFile.Value

   TheForm.ShadedButton.checked = true

   TheForm.cbInteractive.checked = true

End Sub

Sub ShadedButton_OnClick()

   Dim TheForm

   Set TheForm = Document.Forms("TestForm")

   TheForm.HiddenButton.checked = False

   TheForm.WireframeButton.checked = False

   ViewerControl1.DisplayMode = 8708

End Sub

Sub HiddenButton_OnClick()

   Dim TheForm

   Set TheForm = Document.Forms("TestForm")

   TheForm.ShadedButton.checked = False

   TheForm.WireframeButton.checked = False

   ViewerControl1.DisplayMode = 8707

End Sub

Sub WireframeButton_OnClick()

   Dim TheForm

   Set TheForm = Document.Forms("TestForm")

   TheForm.ShadedButton.checked = False

   TheForm.HiddenButton.checked = False

   ViewerControl1.DisplayMode = 8706

End Sub

Sub cbInteractive_OnClick()

   Dim TheForm

   Set TheForm = Document.Forms("TestForm")

   if TheForm.cbInteractive.checked = False then

     ViewerControl1.Interactive = false

   else

     ViewerControl1.Interactive = true

   end if

End Sub

</SCRIPT>

</BODY></HTML>

Sujet parent : A propos d'Autodesk Inventor View