---

Hallo!

Ich suche ein Beispiel, in dem ein VB ActiveX-DLL im AutoCAD über Lisp angespochen wird. Es sollte irgendwie möglich sein, ein VB-Dialogfenster statt der DCL-Fenster zu verwenden. Wer hat eine Idee und ein Beispiel?

Vielen Dank!

------------------
Grüße aus Linz

Willi Klemens
MCDS Datensystem GmbH

www.mcds.net

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

---

Hallo Willi

mal eine blöde Frage.
Warum nicht gleich in VBA programmieren?

Grüße
Heinz

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

---

@Heinz:
Gewisse Steuerelement können leider nicht in VBA eingebunden werden. Daher möchte ich den Weg über VB gehen.

------------------
Grüße aus Linz

Willi Klemens
MCDS Datensystem GmbH

www.mcds.net

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

---

Hallo Willi

hast Du ganz spezielle Steuerelemente?
Mir ist bis jetzt noch Keines untergekommen, welches ich nicht einbinden konnte.

Grüße
Heinz

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

---

Hallo Heinz!

Mir geht es jetzt nicht um bestimmte Steuerelemente. Ich möchte nur wissen, wie ich ein ActivX-Dll in VB6 erstelle, das ich in AutoCAD dann über LISP anspreche. Mir ist schon klar, daß ich in VB(A) fast jedes Problem auch lösen kann. Ich habe nur hunderte LISP-Programme mit Dialogfenstern in DCL, die ich eventuell durch ein Fenster in VB ersetzen will. Dazu suche ich irgend ein Programmierbeispiel.

------------------
Grüße aus Linz

Willi Klemens
MCDS Datensystem GmbH

www.mcds.net

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

---

Prinzipiel kannst du eine ACtiveX-Komponete mit Lisp aufrufen.
Dazu musst du per VLAX-Befehle ein Objekt erzeugen und dann kannst du die Eigenschaften und Methoden der Komponente aufrufen.
Weiteres würde hier zu weit führen, da das Thema wirklich sehr komplex ist.
Schau mal bei http://www.acadx.com nach.

Jürgen

---

Hallo,

die Programmaufgabe die du hast, ist zweistufig. Du mußt in VB ein sogenanntes "ActiveX-DLL" Projekt anlegen, in dem Du z.B. die benötigten Formulare und weitere Module anlegst. Danach ist in VBA oder VisualLisp der Zugriff in AutoCAD auf die ActiveX-Komponente zu programmieren.

Zu VB:
Hier mußt Du ein Klassenmodul schreiben, daß die Verbindung zur "Aussenwelt" herstellt. Der Name des Projekts entspricht hierbei dem DLL-Dateinamen und damit dem ActiveX-Namen, der Name des Klassenmoduls entspricht dem Objekt innerhalb der DLL. Die im Klassenmodul definierten öffentlichen SUB oder FUNCTION (public SUB/FUNCTION) können dann als Funktion aufgerufen werden.

Zu VBA/VisualLisp:
Hierzu ein kleines Beispiel, das ein Objekt aus der Datei "XODLL.dll" mit der Klassenmodul "XOCLASS" erstellt und dann die im Klassenmodul vorhandene öffentliche Routine "XOFUNCTION" mit der Parameterübergabe 'objThsDrawing' übergibt:

(defun c:XDO (/ objXDODll objThisDrawing xdodump)
  (vl-load-com)
  (setq objXDODLL (vlax-create-object "XODLL.XOCLASS"))
  (setq objThisdrawing (vla-get-activedocument (vlax-get-Acad-Object)))
  (setq xdodump (vlax-invoke-method objXDODLL "xofunction" objThisdrawing))
  (vlax-release-object objXDODLL)
  (vlax-release-object objThisdrawing)

)

Sobald das Objekt XODLL.XOCLASS nicht mehr existiert, wird die Codeausführung an VisualLisp zurück übergeben und die in VisualLisp erzeugten Objekte objXODLL und objThisDrawing werden gelöscht. Eine Einbindung der DLL in VBA sieht ähnlich aus.

Dein Wunsch, manche Formulare in VB zu programmieren, kann ich nachvollziehen. Denn zum einen steckt dort eventuell Code, denn man nicht so ohne weiteres veröffentlchen will oder man will durch die Installationsroutine von VB sicher gehen, daß auch wirklich alle benötigten weiteren Komponenten auf einem System installiert sind. Dieses ist bei VBA beiden nicht gegeben.

Ciao
Volker

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

---

ist zwar VBA aber der Sample Code zur dll schlummert unter Sample\ActiveX\ExternalCall im Autocad Verzeichnis.

Harry

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

---

hallo herr klemens !

besuchen sie mich doch mal in meiner firma, sowas habe ich schon öfters auprobiert, ist gar nicht so schwer

bzw. haben sie schon mal object DCL ausprobiert, finde ich genial

Anton Fuchs, Bene Büromöbel

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