Zellbibliothek automatisch laden.

Hallo zusammen,

ich versuche eine *.mvba zu programmieren um eine Zelle zu importieren die genau nach Norden ausgerichtet ist.

Das ausrichten nach Norden der Zelle klappt ganz gut. Das Problem liegt aber beim "holen" der Zelle. Ich schaffe es nicht die Zellbibliothek automatisch anzuhängen. Das Makro bleibt bei geöffnetem Zell-Bibliothekfenster stehen. Ich muss die passende Zellbibliothek dann anwählen und das fenster von "Hand" schliessen. Danach ist die Zelle am Fadenkreut und wird wie gewünscht nach Norden gedreht...

Wie kann ich das Makros dazu bringen das Zell-Bibliothek-Fenster automatisch zu schliessen?

 

Ein  anderer Weg wäre die Zeichnung so zu öffnen dass die passende Zellbibliothek schon angehängt ist. Nur wo mache ich das? In der *.ucf? In der dgnlib?...

 

 

Danke im voraus für eure Hilfe, habe ein bisschen Anfängermühe :-)

Dani

Parents
  • Hallo Herr Bosshard.

    Variante 1:

    Sie benötigen ein Klassenmodul zur Behandlung der modalen Dialoge (IModalDialogEvents). Wenn Sie das Anhängen einer Zellbliothek mit dem VBA Projektmanager aufzeichnen, wird ein solches Klassenmodul erstellt. Ein sogenannter EventHandler sorgt dann dafür, das das Dialogfeld am Ende geschlossen wird.

     

    Variante 2:

    Verwenden Sie zum Anhängen die Tastatureingabe RC=[Pfad zur Bibliothek]\Name.cel. Hier wird kein Dialog geöffnet.

    VBA Code: CadInputQueue.SendCommand "RC=[Pfad zur Bibliothek]\Name.cel"

     

    Variante 3:

    Konfiguration - Setzen Sie die Variable MS_CELLLIST so, dass sie u. a. auf Ihre Bibliothek zeigt. Jetzt reicht das Keyin AC=Cellname, um die Zelle aufzurufen und das Platzieren zu starten.

    VBA Code: CadInputQueue.SendCommand "AC=Cellname"

     

    Viel Erfolg.

    Ronald Zeike

     

    Ronald Zeike
    Bentley Systems Germany



  • Grüezi Herr Zeike,

    ich hab's mit Variante 2 hingekriegt. Herzlichen Dank! :-)

    Freundliche Grüsse aus der VBZ

    Daniel Bosshard

Reply Children
No Data