---

Hallöchen,
kann mir jemand helfen. Ich suche codesequenzen bzw. die Objekte und Methoden mit
denen ich in IDW's zoomen kann. Ich habe folgendes vor:
Ich möchte innerhalb einer idw auf eine ganz bestimmtes Symbol zoomen, d.h. das Symbol soll nach Aufruf der Funktion in der Mitte des Bildschirmes liegen und mit einem bestimmten Zoomfaktor angezeigt werden. Ich dachte ich könnte mit dem CAMERA Objekt etwas anfangen aber es gelingt mir nicht.
Wer kann mir hier helfen.
DANKE.

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

---

Hallo,

mit er Camera liegst Du grundsätzlich schon richtig. Beim Arbeiten mit der Camera muss nach dem setzen der Camera immer ine Camera.Apply ausgeführt werden. Siehe Beispiel in der API-Hilfe unter 'Camera Object'.

Noch bessere Hilfe bekommt man hier, wenn ein Code-Beispiel reingestellt wird...

------------------
Grüsse, Paul

Inventor-Programmierung, Inventor-Tools und Inventor API-Schulung

Meine Tochter auf Youtube

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

---

Okay, demnächst mit Code-Seq.
Ich hab's übrigens mittlerweile geschafft, nach nächtelangem suchen...

Falls gemand bedarf hat anbei der sehr einfache Code (wenn man weis wie...)
Hinweis: "oSketchedSymbol" ist das Inventor.SketchedSymbol

  Dim oCamera As Camera
    Dim Pt As Point
    Dim TG As TransientGeometry
   
    Set oCamera = ThisApplication.ActiveView.Camera
    Set TG = ThisApplication.TransientGeometry
    Set Pt = TG.CreatePoint(oSketchedSymbol.Position.X, oSketchedSymbol.Position.Y, 0#)
    oCamera.Target = Pt
    oCamera.Eye = TG.CreatePoint(oSketchedSymbol.Position.X, oSketchedSymbol.Position.Y, 1#)
    oCamera.Apply

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