Hot News:

Unser Angebot:

  Foren auf CAD.de (alle Foren)
  Inventor VBA
  Bauteil verschieben

Antwort erstellen  Neues Thema erstellen
CAD.de Login | Logout | Profil | Profil bearbeiten | Registrieren | Voreinstellungen | Hilfe | Suchen

Anzeige:

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen nächster neuer Beitrag | nächster älterer Beitrag
  
Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte
Autor Thema:  Bauteil verschieben (885 mal gelesen)
Crash_Master
Mitglied
Fachinformatiker


Sehen Sie sich das Profil von Crash_Master an!   Senden Sie eine Private Message an Crash_Master  Schreiben Sie einen Gästebucheintrag für Crash_Master

Beiträge: 32
Registriert: 06.10.2003

erstellt am: 21. Okt. 2003 10:37    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Hi,

hab nach einigem Suchen und Rumprobieren glaub ich rausgefunden das die Transformation Methode irgendwas mit dem verschieben eines Bauteils zu tun hat.

Hat vielleicht irgendwer einen Codeschnipsel der ein Bauteil das auf 0,0 erstellt wurde, bspw. auf 1,2 verschiebt??

Danke schon mal...

Ciao Crash

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

SEHER
Mitglied
Systemanalytiker


Sehen Sie sich das Profil von SEHER an!   Senden Sie eine Private Message an SEHER  Schreiben Sie einen Gästebucheintrag für SEHER

Beiträge: 1203
Registriert: 13.03.2001

Inventor 2 bis 2022
häufig wechselnder Rechnerverkehr

erstellt am: 24. Okt. 2003 09:48    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Crash_Master 10 Unities + Antwort hilfreich

Hi Crash,
ist dein Name Programm, dann bist Du beim Inventor richtig!!!!

Also aus Sample (Inventor6 Programming Help), dort sind auch noch ne ganze Menge anderer Bsp:

Public Sub MoveOccurrence()

    ' Set a reference to the assembly component definition.
    Dim oAsmCompDef As AssemblyComponentDefinition
    Set oAsmCompDef = ThisApplication.ActiveDocument.ComponentDefinition
   
    ' Get an occurrence from the select set.
    On Error Resume Next
    Dim oOccurrence As ComponentOccurrence
    Set oOccurrence = ThisApplication.ActiveDocument.SelectSet.Item(1)
    If Err Then
        MsgBox "An occurrence must be selected."
        Exit Sub
    End If
    On Error GoTo 0
   
    ' Get the current transformation matrix from the occurrence.
    Dim oTransform As Matrix
    Set oTransform = oOccurrence.Transformation
   
    ' Move the occurrence honoring any existing constraints.
    oTransform.SetTranslation ThisApplication.TransientGeometry.CreateVector(2, 2, 3)
    oOccurrence.Transformation = oTransform

    ' Move the occurrence ignoring any constraints.
    ' Anything that causes the assembly to recompute will cause the
    ' occurrence to reposition itself to honor the constraints.
    oTransform.SetTranslation ThisApplication.TransientGeometry.CreateVector(3, 4, 5)
    Call oOccurrence.SetTransformWithoutConstraints(oTransform)
End Sub

Also viel Spaß

SEHER

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

Crash_Master
Mitglied
Fachinformatiker


Sehen Sie sich das Profil von Crash_Master an!   Senden Sie eine Private Message an Crash_Master  Schreiben Sie einen Gästebucheintrag für Crash_Master

Beiträge: 32
Registriert: 06.10.2003

erstellt am: 24. Okt. 2003 09:51    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Danke für das Beispiel. Das hab ich auch schon gefunden. Habs jetzt schon anders gelöst. Hoffe mal das ich da nicht in eine Sackgasse laufe, aber mal sehen...

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

Anzeige.:

Anzeige: (Infos zum Werbeplatz >>)

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen

nächster neuerer Beitrag | nächster älterer Beitrag
Antwort erstellen


Diesen Beitrag mit Lesezeichen versehen ... | Nach anderen Beiträgen suchen | CAD.de-Newsletter

Administrative Optionen: Beitrag schliessen | Archivieren/Bewegen | Beitrag melden!

Fragen und Anregungen: Kritik-Forum | Neues aus der Community: Community-Forum

(c)2023 CAD.de | Impressum | Datenschutz