---

Hallo Leute,

kann ich das Vorschaubild aus einem Dokument (oDoc.Thumbnail)
ohne Verweise auf VB6 in eine Picturebox in einem Formular laden?

Bisher mache ich das so:
        'Property Thumbnail einlesen (IAM, IPT, IDW)
        On Error Resume Next 'kein Bild verursacht einen Fehler

        Dim oThumbnailpic As stdole.IPictureDisp
        oThumbnailpic = MainProgPropMgr.oDoc.Thumbnail

        Dim oThumbnailImage As Image
        oThumbnailImage = Microsoft.VisualBasic.Compatibility.VB6.Support.IPictureDispToImage(oThumbnailpic)

        Me.PictureBox_Thumbnail.Image = oThumbnailImage

Grüße

Manfred

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

---

Hallo Manfred,

nein, dass musst du nicht. Hier ein Code-Schnipsel (für ein Apprentice Document) für die Thumbnails:

Code:

---

...
_apprenticeDocument = _apprentice.Open(argFile);

stdole.IPictureDisp oPD = _apprenticeDocument.Thumbnail;

System.Drawing.Imaging.Metafile oMF = new System.Drawing.Imaging.Metafile(new IntPtr(oPD.Handle), new System.Drawing.Imaging.WmfPlaceableFileHeader());
System.Drawing.Image.GetThumbnailImageAbort oCallback = new Image.GetThumbnailImageAbort(ThumbnailCallback);

this.picPreview.Image = oMF.GetThumbnailImage(this.picPreview.Width, this.picPreview.Height, oCallback, IntPtr.Zero);

...

public bool ThumbnailCallback()
{
return false;
}

---

Allerdings in C#, aber dürfte mit VB ähnlich funktionieren.

------------------
Grüße Igor

FX64 Software Solutions

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

---

Hallo Igor,

Danke für den Hinweis.
In VB sieht es dann so aus:

'Property Thumbnail einlesen (IAM, IPT, IDW)
On Error Resume Next 'kein Bild verurscht einen Fehler

Dim ThumbnailMTF As System.Drawing.Imaging.Metafile
ThumbnailMTF = New System.Drawing.Imaging.Metafile(New IntPtr(MainProgPropMgr.oDoc.Thumbnail.Handle), New System.Drawing.Imaging.WmfPlaceableFileHeader())

Me.PictureBox_Thumbnail.Image = ThumbnailMTF.GetThumbnailImage(ThumbnailMTF.Width, ThumbnailMTF.Height, Nothing, System.IntPtr.Zero)

Grüße

Manfred

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

---

Hallo Igor,

es scheint, als ob der Code kein brauchbares Ergebnis liefert,
wenn als Grafik D3D in Inventor eingestellt ist.
Dann ist das Bitmap leer, die VB6 Methode liefert dagegen das Bitmap
zurück.

Grüße

Manfred

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

---

Hallo Manfred,

das kann ich mir nicht vorstellen. Ich hatte nie Probleme damit. Allerdings muss ich sagen, dass ich immer mit Apprentice-Dokumenten arbeite. Vielleicht gibt es da einen Unterschied. Arbeitest du auch mit Apprentice? Wenn nicht, welchen Sinn hat die Anzeige von Thumbnails von einem, im Inventor geöffneten Inventor Dokument?

------------------
Grüße Igor

FX64 Software Solutions

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

---

Hallo Igor,

das Tool läuft in Inventor.
Ich habe noch nie mit Apprentice gearbeitet.

Das Thumbnail ist vorhanden, damit man im Formular prüfen kann, ob im gespeicherten Modell die Farbe zum Material passt und ob das Vorschaubild bereits dynamisch erzeugt wird.
Das Formular lässt sich auch in einer idw öffnen.
Man sieht dann das Thumbnail und die Properties des Modells, dessen Daten im Schriftfeld stehen.

Besonders bei Normteilen aus dem CC muss man derzeit noch zu Fuß vom festeingestellten Bild auf das dynamisch erzeugte Vorschaubild umgestellen, da dies noch nicht via API funktioniert.

Grüße

Manfred

[Diese Nachricht wurde von Manfred Zirk am 14. Jan. 2008 editiert.]

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