Mit iLogic Behehl in eine eigene Kamera Ansicht wechseln

[m.nake]

Hallo zusammen,

ich würde gern per iLogic Befehl die Ansicht auf eine im Inventor Studio erstellte Kamera wechseln.

Hiermit kann ich sämtliche Ansichten auf dem ViewCube auswählen:

 Dim cam As Inventor.Camera 
 cam = ThisApplication.ActiveView.Camera 
 cam.ViewOrientationType = Inventor.ViewOrientationTypeEnum.kIsoTopRightViewOrientation     
 cam.Apply()
 cam.Fit() 
 cam.ApplyWithoutTransition() 

 Aber wie wäre es z.B. mit einer im Inventor Studio angelegten "Kamera1"?

Vielen Dank im Voraus

Martin

[fullevent]

Hallo @m.nake,

gute Frage. Das hätte ich Anfang des Jahres auch benötigt und mich damit beschäftigt. Leider alles recht erfolglos.

Bei mir ging es um kleinere Untersuchungen, Bilder machen usw.

Eine Komponente wurde von 4 Kameras erfasst.

Mein kleiner Workaround war es eine "Kamera1" zu erstellen und die Komponente 4 mal zu duplizieren und entsprechend auszurichten. Also genau anders rum aufzubauen.

Mit einer einfachen iLogic konnte ich dann steuer welche der 4 Duplikate gerade sichtbar geschaltet wird.

Im Endeffekt habe ich quasi die Orientierung der Komponente geändert und die Ansicht ist immer gleich geblieben.

War nicht die Lösung die ich wollte, aber in dem Fall zielführend ^^

Vielleicht hilft dir der Umweg auch weiter.

Ansonsten habe ich leider absolut nichts gefunden um die Ansicht innerhalb der Inventor Studio Umgebung via API auf eine Kamera auszurichten. Wenn ich mich nicht täusche war "Kamera1" nur ein BrowserNode-Objekt.. Da war keine Ausrichtung, Matrix oder so hinterlegt. Also nichts womit man hätte arbeiten können.

Gruß,

Aleks

[m.nake · Accepted solution]

Hallo Aleks,

diesen Umweg kann ich leider nicht gehen.

Eine Unterbaugruppe ist zwingend mit dem Ursprung verknüpft.

Ich habe eine Möglichkeit gefunden um wenigstens in eine selbst erstellte Ansicht immer wieder zurück 

zu kommen. 

Zuerst am ViewCube die frei gewählte "aktuelle Ansicht als Ausgangsansicht festlegen". 

Dies nennt sich nun HomeView und kann folgendermaßen mit iLogic immer wieder aufgerufen werden:

ThisApplication.CommandManager.ControlDefinitions.Item("AppViewCubeHomeCmd").Execute
'zoomt die Komponente volständig in den Sichtbereich, falls Größenänderungen vorgenommen wurden
ThisApplication.ActiveView.Fit

 Leider bräuchte ich mindestens zwei frei definierbare Ansichten...aber eine ist besser als keine 😉

Allen ein Schönes WE!

Martin

[fullevent · Accepted solution]

Hallo @m.nake,

das ist ja schon mal was.

In der API-Hilfe ist ein Beispiel-Code zum Bewegen der Kamera zu finden.

Lässt sich bestimmt auch als iLogic umschreiben. Ich kann mir gut vorstellen, dass man hier die Kamera auch entsprechend den Vorstellungen ausrichten kann. Allerdings wird man etwas mit den Zahlen spielen müssen.

Vielleicht hilft dir das weiter!?

Public Sub RotateCamera()
    ' Get the active camera.
    Dim cam As Camera
    Set cam = ThisApplication.ActiveView.Camera
    
    Dim tg As TransientGeometry
    Set tg = ThisApplication.TransientGeometry
    
    ' Define the number of steps in the animation.
    Dim steps As Integer
    steps = 360
    
    ' Define the distance between the eye and target.
    Dim eyeDistance As Double
    eyeDistance = 15
    
    ' Calculate pi.
    Dim pi As Double
    pi = Atn(1) * 4
    
    ' Iterate the specified number of steps.
    Dim i As Integer
    For i = 1 To steps
        ' Calculate the x and y coordinates of the eye.
        Dim x As Double
        Dim y As Double
        x = eyeDistance * Cos(i / steps * (2 * pi))
        y = eyeDistance * Sin(i / steps * (2 * pi))
        
        ' Set the eye with a hard coded z value.
        cam.Eye = tg.CreatePoint(x, y, 3)
        
        ' Define the up vector as positive z.
        cam.UpVector = tg.CreateUnitVector(1, 0, 0)
        
        ' Apply the current camera definition to the view.
        cam.ApplyWithoutTransition
    Next
End Sub

Grüße

[m.nake · Accepted solution]

Jap, das funktioniert!

Da muss man zwar noch viel rumprobieren um die gewünschte Ansicht zu erreichen, aber es führt zum Ziel!

Der Vollständigkeit halber noch die Möglichkeit die Ansicht "HomeView" per iLogic festzulegen:

Dim name As String = "AppViewCubeViewHomeFloatingCmd"
Dim oDef As ButtonDefinition = ThisApplication.CommandManager _
		.ControlDefinitions.Item(name)
oDef.Execute

Ich denke mit der Kombination der aufgeführten Schritte kann das Thema als eingeschränkt gelöst abgehakt werden.

[fullevent]

Hallo Martin,

magst du uns eine Musterbaugruppe inkl. deinen fertigen iLogic-Code posten wenn du dein Ziel erreicht hast?
Der Code bzw. die Umsetzung würde mit interessieren. Das wäre klasse.

Viele Grüße und noch einen guten Wochenstart.