Hallo Forum,
gibt es einen einfachen Prozess, der aus iParts Einzelbauteile erzeugt?
Mit folgendem Code kann ich zwar aus den iParts Einzelbauteile erzeugen, aber diese
sind abgeleitete Einzelbauteile. Sie beinhalten keine Geometrien. Es steht im Brwoserbaum iPartname und darunter
abgeleiteter Körper. Das ist aber nicht das, was ich suche, sondern ich will ein eigenständiges Bauteil erhalten.
----------------------------------------------------------
Sub iparttest()
Dim oApp As Inventor.Application
Dim oDoc As PartDocument
Dim oCd As ComponentDefinition
Set oApp = ThisApplication
Set oDoc = oApp.ActiveDocument
Set oCd = oDoc.ComponentDefinition
Dim oFac As iPartFactory
Dim oIPartMember As iPartMember
Set oFac = oDoc.ComponentDefinition.iPartFactory
Set oIPartMember = oFac.CreateMember(25)
'Set oIPartMember = oFac.CreateCustomMember("test.ipt", 25)
End
End Sub
----------------------------------------------------------
Der normale "handliche" Arbeitsablauf sieht wie folgt aus:
iPart öffnen
iPart-Tabelle öffnen und eine Zeile aktivieren
iPart Kopie speichern unter (SaveAs - neues Bauteil)
neues Bauteil öffnen
iPart-Tabelle löschen
fertig, ich habe ein schönes Bauteil ;-).
Danke + Grüsse
Olaf
[Diese Nachricht wurde von 0laf am 19. Sep. 2005 editiert.]
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP