---

Hi Forum,
in Access2003 habe ich ein treeview definiert. OLEStartDrag usw ist eingerichtet. wenn ich nun einen datensatz aus access nach autocad ziehe, sehe ich vor dem loslassen, das da etwas am cursor hängt. na dem loslassen tut sich dann aber nix.

wie komme ich per vba an das drop-ereignis heran um auf bestimmte umstände zu reagieren?

ziel des ganzen ist es, aus einer zb. einrichtungsliste ein datensatz ins autocad zu ziehen. anhand der datensatznummer soll dann das am cursor hängende object zu einem entsprechenden block werden.
hat da einer nen ansatzpunkt für mich? im speziellen mal zu beginn das besagte drop-ereignis.
danke schonmal
bernd

------------------
Bernd

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

---

Hallo,

Zitat:

---

Original erstellt von BerndE:
Hi Forum,
in Access2003 habe ich ein treeview definiert. OLEStartDrag usw ist eingerichtet.

---

Was hast du den eingerichtet. Normalerweise "hängt" dann ein Treeview Node "am Fadenkreuz". Eingefügt wird wie über die Zwischenablage. Da musst du sehen das das richtige dataobject übergeben wird.

Zitat:

---

wie komme ich per vba an das drop-ereignis heran um auf bestimmte umstände zu reagieren?

---

Wo ziehst du den Eintrag denn hin. Im Modelbereich würde der Event BeginnCommand (PasteClip) und EndCommand anspringen wenn AutoCAD was mit dem DataObject anfangen kann.

Stelli

------------------
Warum lisp'eln wenn's auch anders geht.
www.ib-stelberg.de

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

---

Hi stelli,
danke für die antwort. mit dem stichwort Event BeginnCommand (PasteClip) werde ich über das wochenende mal rumexperimentoieren. danke dior erstmal
bernd

------------------
Bernd

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

---

Hallo Stelli,
also mit pasteclip scheine ich wohl nicht weiterzukommen. der nachfolgende code this drawing

Code:

---

Private Sub AcadDocument_BeginCommand(ByVal Commandname As String)
    MsgBox Commandname
End Sub

---

zeigt mir bei einfügen über zwischenablage zwar wie erwartet die meldung "PASTECLIP". bei ziehen und fallenlassen aus access (drag&drop tut sich aber leider gar nix :-(
hättest du vielleicht noch ne idee? oder habe ich was falsch verstanden?
bernd

------------------
Bernd

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

---

Hallo Bernd,

Zitat:

---

Original erstellt von Stelli1:
Was hast du den eingerichtet. Normalerweise "hängt" dann ein Treeview Node "am Fadenkreuz". Eingefügt wird wie über die Zwischenablage. Da musst du sehen das das richtige dataobject übergeben wird.

---

Wenn du für Autocad unbekannte Objekte in der Zwischenablage hast bleibt der Menüpunkt "Einfügen" auch grau weil AutoCAD nichts mit dem Datentyp, hier Treeview Node, anfangen kann. Du musst wohl versuchen einen Block an das Drag&Drop Dataobject anzuhängen.
Ansonsten wäre noch die Möglichkeit aus Access in ein VB Formular zu ziehen. Da kannst du auch ein Treeview Node auswerten.

Stelli

------------------
Warum lisp'eln wenn's auch anders geht.
www.ib-stelberg.de

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