---

Hallo,
folgendes Vorhaben:
Bei uns ist IV 2011 mit PSP Pro 2011 gekoppelt.
Über VBA lese ich die Verwendung und die Gleichteile eines geöffneten Part aus.

Diese möchte ich nun in einer Form als Bilder darstellen.
Im PSP gibt es auch eine Vorschau. Diese verweist auf den DTY:Container0.
Der Pfad entspricht dann einfach nur dem Dateipfad der ipt.

Meine Frage nun:
Kennt Ihr eine Möglichkeit, wie ich an die Vorschau einer Inventordatei komme, ohne diese
über IV oder Apprentice öffnen zu müssen?!?
Sollte dann in etwa so aussehen, wie die Vorschaubilder im Explorer.

Danke Euch!

Code:

---

Sub Verwendung()

Dim oinv As Inventor.Application
Set oinv = ThisApplication
Dim oAIMDAddIn As ApplicationAddIn

For Each appl In ThisApplication.ApplicationAddIns
    If appl.DisplayName = "Productstream Professional" Then
    Set oAIMDAddIn = appl
    End If
Next
If oAIMDAddIn Is Nothing Then
    Exit Sub
End If
Dim oAIMDAutomation As AIMDAutomation
Set oAIMDAutomation = oAIMDAddIn.Automation
Dim oAIMKEY As String
Dim oVerw As String

If oinv.ActiveDocument Is Nothing Then
    Exit Sub
End If

If oinv.ActiveDocument.DocumentType = kDrawingDocumentObject Then
    Exit Sub
End If

oAIMKEY = oAIMDAutomation.Compass.GetAIMKEY(oinv.ActiveDocument)

Call oAIMDAutomation.Compass.Call("___Environment", "ROE_Verwendung=")
Call oAIMDAutomation.Compass.Call("___ForAllRela", "db=Folder_Xref_Parent_Document (X_CHILD_AIMKEY='" & oAIMKEY & "') ___Environment ROE_Verwendung=$(ROE_Verwendung)|#(AIMKEY)")
oVerw = oAIMDAutomation.Compass.Prepare("$ROE_Verwendung")

oVerw = Right(oVerw, Len(oVerw) - 1)

Dim oErg() As String
Dim test As Variant

oErg = Split(oVerw, "|")

End Sub

---

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hi

Lösung weiß ich nicht, aber vielleicht hilft dir der Artikel weiter.

------------------
MfG
Ralf

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Ralf,

genau das was ich gesucht habe:

ThumbnailView Component

Ich hoffe nur, dass die dll auch im SDK vom
2010'er IV enthalten ist...

Danke Dir!   

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP