---

Hallo Forum,
ich suche eine Möglichkeit, wie ich Inventor dazu zwingen kann, die Rasteransichten durch die Präzisen zu ersetzen.
Da ich die Funktion im VBA als auch in VB.net benötige dachte ich, ich schreib diese im Inventor VBA Forum. Hier der Link zu:
http://ww3.cad.de/foren/ubb/Forum258/HTML/001692.shtml

Dort wurde mir bereits gesagt, dass ich es mit dem Befehl
MakeAllViewsPrecise() welches eine Methode des Inventor-DrawingDocument-Objekts ist bewerkställigen kann.

Leider scheint das API-Objekt von DrawingDocument die Methode nicht zu haben :-(
Weiß jemand wo in der API diese Funktion versteckt ist?

Vielen Dank im Vorraus
DerBrain87

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

---

hab ich etwa etwas gefunden, dass nicht geht? :-(

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

---

Da es diese Funktion offensichtlich tatsächlich in VB.Net nicht gibt habe ich es jetzt so gemacht, dass ich in mein Vorgabe-VBA-Projekt folgende Sub geschrieben habe:

Code:

---

Public Sub MakeAllViewsPrecise()
Dim oDoc As Inventor.Document: Set oDoc = ThisApplication.ActiveDocument
If oDoc.DocumentType = kDrawingDocumentObject Then
  Dim oDD As Inventor.DrawingDocument: Set oDD = oDoc
  Call oDD.MakeAllViewsPrecise
End If
 
End Sub

---

und diese nun über mein VB.Net aufrufe.
Sollte es einen direkteren Weg geben, bin ich natürlich dankbar wenn er mir aufgezeigt wird aber es ist zumindest eine Lösung.

Gruß DerBrain87

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

---

Hallo

Kann es sein das du eine Interop.dll < Version 18 verwendest? Das gesuchte API-Objekt wurde erst mit Version 18 (Inventor 2014) eingeführt und da ist es bei mir auch vorhanden.

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

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