---

So, jetzt hab ich auch gleich die nächste Frage.
Ich habe eine dll Programmiert, in der ich jetzt auf ein Document Open und ein Document Close Event reagieren muss.

Der Code:

Imports Autodesk.AutoCAD.Runtime
Imports Autodesk.AutoCAD.Interop
Imports System
Imports System.Runtime.InteropServices

<Assembly: ExtensionApplication(GetType(CCEJobserver.StartConvert))>
<Assembly: CommandClass(GetType(CCEJobserver.ACADCommands))>

Namespace CCEJobserver
    Public Class StartConvert
        Implements Autodesk.AutoCAD.Runtime.IExtensionApplication
        Public Sub Initialize() Implements Autodesk.AutoCAD.Runtime.IExtensionApplication.Initialize
            Dim docman As frmAcadDocManager = New frmAcadDocManager
            docman.Show()
        End Sub
        Public Sub Terminate() Implements Autodesk.AutoCAD.Runtime.IExtensionApplication.Terminate
        End Sub
    End Class
    Public Class AcadCommands
          <Autodesk.AutoCAD.Runtime.CommandMethod("DocMan")> _
      Public Sub DocMan()
            Dim docman As frmAcadDocManager = New frmAcadDocManager
            docman.Show()
        End Sub
      End Class

beim initialisieren der dll, oder durch Eingabe des Befehls "DocMan"  wird dann eine Form angezeigt.
Und in der Form ändern sich einige Felder, wenn man ein Dokument öffnet, oder schließt.

Bis jetzt ist es mir aber nicht gelungen auf die Events zu kommen, bzw kann ich nicht sagen wo ich es dann deklarieren muss, in der Acadcommandklasse, oder in der Form?
mfg

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

---

Hi,

Eine Variante ist, die DocumentCollection zu überwachen, da gibt es z.B. einen EventHandler für das Aktivsetzen eines Dokuments (nach Öffnen eines Dwgs und nach Aktivieren, wenn Du zwischen Zeichnungen wechselst).

Die Reaktion auf Events kann mit 2 Optionen erfolgen:

a) Du deklarierst eine Variable für ein Objekt mit 'WithEvents':

Code:

---

Public WithEvents myAcadDocMan as ApplicationServices.DocumentCollection

---

...
...im Code wird dann die Variable von Dir gesetzt, dazu hast Du dann die Möglichkeit, Sub's zu definieren mit der 'Handles'-Klausel hinten drann.

Code:

---

Private Sub AcadDocMan_DocumentBecameCurrent(ByVal sender As Object, ByVal e As Autodesk.AutoCAD.ApplicationServices.DocumentCollectionEventArgs) Handles myAcadDocMan.DocumentBecameCurrent
   ...hier landest Du dann immer, wenn ein Document aktiviert wurde
End Sub

---

b) Du möchtest selbst in das Handling eingreifen und im Lauf bestimmen, ob auf Events reagiert wird

Code:

---

AddHandler myAcadDocMan.DocumentBecameCurrent, AddressOf mySub
RemoveHandler myAcadDocMan.DocumentBecameCurrent, AddressOf mySub

---

damit kannst Du im Lauf bestimmen, ob (mit AddHandler) bei Auftreten des Ereignisses Deine Sub 'mySub' gestaret wird, ab dem Zeitpunkt, wo Du das nicht mehr willst ==> 'RemoveHandler'

Schau Dir in der Hilfe bzw. in Tutorials 'WithEvents' 'AddHandler' 'RemoveHandler' an

- alfred -

[Diese Nachricht wurde von a.n. am 12. Nov. 2008 editiert.]

---

danke für den Tipp, nur die Beispiele mit den Events, oder das mit der Toolpalette sind in C# und da ist die Syntax wieder ganz anders.

edit:
Ich habe mir die Beispiele nochmal angesehen, und im Google finde ich auch nicht wirklich weiter.
Ich habe jetzt eine Toolpalette eingebunden, in der sich der Inhalt ändert, jenachdem was in autocad passiert, sprich ein Dokument geöffnet oder geschlossen wird.

nur wird bei mir die Toolpalette nicht aktualisiert, wenn ein Dokument geöffnet oder geschlossen wird.

Hier der relevante Code:

Imports Autodesk.AutoCAD.ApplicationServices
Imports System.Data.SqlClient
Imports AcadAp = Autodesk.AutoCAD.ApplicationServices.Application
Imports vb = Microsoft.VisualBasic
Imports Autodesk.AutoCAD.Interop
Public Class DocumentManager
    Public WithEvents myAcadDocMan As DocumentCollection
    Private Sub AcadDocMan_DocumentBecameCurrent(ByVal sender As Object, ByVal e As Autodesk.AutoCAD.ApplicationServices.DocumentCollectionEventArgs) Handles myAcadDocMan.DocumentBecameCurrent
        init()
    End Sub
Private Sub init()
       .......
End Sub
end Class

mfg

:edit habs endlich gefunden, kostete etwas zeit aber jetzt gehts.
[Diese Nachricht wurde von veydan am 13. Nov. 2008 editiert.]

[Diese Nachricht wurde von veydan am 13. Nov. 2008 editiert.]

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

---

Hi,

ich bin mir nicht sicher, ob das auch so funktioniert, da ich jetzt den Code nicht mehr sehe, mit dem dies initialisiert wurde. Als ich gestern (von unterwegs) da hineingeschaut hab, war die Initialisierung noch direkt an das UserControl gebunden (==> das bring schon mal Brösel) und, zu dem Code der jetzt drin steht, sind die Variable nicht mit Shared definiert (das kann richtig sein, widerspricht zumindest dem, was ich gestern sah).

Wenn Du möchtest, dann lass mir mal das komplette Projekt zukommen und ich schau drüber, sonst ärgerst Du dich durch und durch. Wenn, dann bitte auch kleine Beschreibung, was Dein Ziel ist.

Wenn nicht (könnte ich auch verstehen, weil ich meinen Code auch nicht weitergebe), dann sei Dir zumindest sicher, dass Du nicht 'lästig bist' (stand in einem Deiner Threads), denn ein Forum ist dazu da, Fragen zu stellen, wo man nicht weiterkommt.

- alfred -

---

Hallo!
Ich habs dann noch geschafft, dass ich eine zufriedenstellende Lösung heruasgekommen ist.

Das einzige was mich stört ist, dass das Activate Event 1x kommt beim Zeichnung öffnen, und das Deactivate x mal beim schließen.
Ist mir nicht ganz logisch.
Ich habe in den Events Messages ausgegeben und die Activate kam 1x oder 2x, die Deactivate kam andauernd(ohne der hängte sich Autocad auf)
In den Events geschieht folgendes, da meine Dokumentnamen nichtssagende Nummern als Namen haben, verbinde ich mich mit einer Datenbank und lese Werte aus, aus denen ich dan einen Namen zusammenbaue der in einer Listbox angezeigt wird.
Jetzt kann man einfach alle Dokumente ansteuern, wenn man in der Listbox auf ein Dokument klickt, denn man sieht da die Nummern nicht.
Ich hoffe es ist verständlich erklärt.

Jetzt habe ich es so gemacht, dass die Liste bei jedem Activate Event aktualisiert wird.
Sprich alle Docs durgehen und neue Namen auslesen und anzeigen.
Wenn man ein Dokument schließt kommt aktiviert das nächste das Event.
Schließt man aber das letzte Dokument wird das Activate Event nicht mehr abgefeuert und die Liste nicht mehr aktualisiert.

Aber während ich hier den Sachverhalt erklärte ist mir eine Lösung eingefallen, bei jedem Activate die Docanzahl abfragen, wenn sie 0 ist, alles Leeren.
Warum schwierig wenns so einfach auch geht.

Noch eine Frage nebenbei, es ist schwer Beispiele für die Autocad Programmierung zu finden, die samples von Autodesk sind die meisten in C# Programmiert...
hat jemand Referenzseiten, auf denen auch Beispiele, Erklärungen zu finden sind?

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

---

Hi,

leider kommt es des öfteren vor, dass Events (speziell die um DocumentCollection) mehrfach aufgerufen werden. In diesem Fall kannst Du Dir auch die EventArgs ansehen, z.B. 'e.Document' (wenn ich's richtig im Kopf hab), prüfen, ob dieses auf Nothing/Null steht oder eine gültige Referenzierung aufweist, wenn ja, dann eventuell vergleichen der e.Document.Database mit den Einträgen, die aus dem Editor als aktives Dokument kommen, ....
Sprich überall dort, wo Du draufkommst, dass Events mehrfach 'abgeschossen' werden, die EventArgs mitansehen.

'wenn's einfach auch geht': So leicht sehe ich das nicht, denn der Event xxxActivate wird nie zustandekommen, wenn die Dokumentanzahl 0 ist

- alfred -

---

du hast recht zu früh gefreut;-)
werd mir die andere möglichkeit mal ansehen danke.

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