|
Autocad VBA : Pfad der ACAD.EXE aus Registry auslesen
Brischke am 22.06.2004 um 17:02 Uhr (0)
Hallo Wolfi, ich denke du kannst ja mehrere Verweise auf die verschiedenen *.TLB s erstellen und somit eben im Code das gewünschte Applikationsobjekt erzeugen und starten. Ich habe hier kein VB zur Verfügung, sollte (wenn ich mich recht erinnere) aber so gehen. Bei Fragen ... Grüße Holger ------------------ Holger Brischke (defun - Lisp over night! AutoLISP-Programmierung für AutoCAD Da weiß man, wann man s hat!
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Pfad der ACAD.EXE aus Registry auslesen
mapcar am 23.06.2004 um 14:41 Uhr (0)
Wolfi, dein Problem verstehe ich jetzt nicht ganz - was findest du nicht? Ich hab s jetzt nur in Lisp, aber es dürfte ja kein Problem sein, das in VBA umzusetzen: Code: (defun location-of-acad16-exe() (vl-load-com) (vl-registry-read (strcat HKEY_LOCAL_MACHINESOFTWAREAutodeskAutoCADR16.1 (vl-registry-read HKEY_CURRENT_USERSoftwareAutodeskAutoCADR16.1 CurVer ) ) Location ) ) (location-of-acad16-exe) = C:ProgrammeAutodeskAutoCAD 2005 Gruß, Axel ------------------ ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : VBA mit dwt öffnen
Proxy am 07.07.2004 um 15:35 Uhr (0)
Aus der Hilfe: Private Sub ACADApp_ BeginOpen (FileName As String) This example intercepts an Application BeginOpen event. This event is triggered when a drawing is opened by AutoCAD. To trigger this example event: 1) Make sure to run the example that initializes the public variable (named ACADApp) linked to this event. 2) Use AutoCAD to open an existing drawing Use the FileName variable to determine which drawing file is being ope ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Aufruf von VBA-Prozeduren via Lisp
RoSiNiNo am 07.07.2004 um 16:41 Uhr (0)
Hallo Kollegen, ich hab da mal eine Frage zu LISP. Bisher habe ich die Befehle so definiert: Code: (defun c:blocknum () (vl-vbarun acad.dvb!koordinaten.BlockNumeriert )) (defun c:AttCountX () (vla-runmacro(vlax-get-acad-object) acad.dvb!Modify.AttribCountExtend )) (defun c:BlockTxP () (vl-vbarun acad.dvb!block.BlockTextPrefix )) (defun c:BlockTxS () (vl-vbarun acad.dvb!block.BlockTextSuffix )) Jetzt habe ich in einem anderen Beitrag eine gute Variante gelesen, z.B. folgendes. Code: ;;; ********* ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Aufruf von VBA-Prozeduren via Lisp
CADmium am 07.07.2004 um 16:54 Uhr (0)
ungestestet , so etwa : (Setq VBA-LISTE (list ( BlockTxP acad.dvb!block.BlockTextPrefix ) ( BlockTxS acad.dvb!block.BlockTextSuffix ) ) ) (foreach LISTENEINTRAG VBA-LISTE (eval (list defun (read (strcat C: (car LISTENEINTRAG))) () (list vla-RunMacro *AcadObj* (cadr LISTENEINTRAG)) (princ) ) ) ) ------------------ - Thomas -
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Aufruf von VBA-Prozeduren via Lisp
RoSiNiNo am 08.07.2004 um 07:06 Uhr (0)
Danke Thomas, ich werde es einmal testen. Da hätte ich dann doch noch eine Frage, kann man eigentlich zu jedem Listeneintrag auch noch Kommentare schreiben? z.B. (Setq VBA-LISTE (list ( BlockTxP acad.dvb!block.BlockTextPrefix ) ;Schreibt Prefix vor Attributtext ( BlockTxS acad.dvb!block.BlockTextSuffix ) ;Schreibt Suffix nach Attributtext ) ) ------------------ Roland
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Aufruf von VBA-Prozeduren via Lisp
CADmium am 08.07.2004 um 07:38 Uhr (0)
Aber sicher! .. P.S: Warum testest du es nicht einfach ? ------------------ - Thomas -
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Aufruf von VBA-Prozeduren via Lisp
RoSiNiNo am 08.07.2004 um 07:40 Uhr (0)
Schäm :-( ------------------ Roland
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Aufruf von VBA-Prozeduren via Lisp
RoSiNiNo am 08.07.2004 um 13:12 Uhr (0)
Ich hab jetzt ein kleines Problem mit diesem Code: ;;; ********************* ;;; setq global variables ;;; ********************* ;;; get the application object (setq *acadObj* (vlax-get-acad-object)) ;; array of command name strings (setq CommandList (list ("HK3D" "acad.dvb!aTest.HK_OBQZ") ;3d Höhenkote ("RIDL" "acad.dvb!aTest.RechnenIstDochLeicht") ;Rechnen ) ) ;; make a defun for each command name (foreach CommandName CommandList (eval (list defun (read (strcat "C:" (car Comma ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : VBA mit dwt öffnen
Proxy am 08.07.2004 um 15:49 Uhr (0)
wenn du es in AutoLoad _appload reinziehst IMHO schon .... ------------------ Lisp?!?! Why the Hell did you pick the most arcane, obscure, and hopelessly-rooted-in-the-computer-science-department language in the world for an AutoCAD programming language? Read the whole story: The Autodesk File ca. 890 Seiten | 7500 KB PDF
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Einen Befehl auf Button legen
Heiko76 am 19.07.2004 um 12:58 Uhr (0)
Hi Marco, so kenn ich das auch. Ich dachte man könnte nur einen VBA-Befehl einfach so per klick starten. So wie mit Lisp. Schade, dann muß ich das doch so machen. Trotzdem danke. ------------------ cu Heiko
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : vlax-curve-getpointatdist
mapcar am 29.07.2004 um 13:11 Uhr (0)
Hi Jan, vlax-curve... gibt es in VBA nicht. Ein schwerer Nachteil gegenüber Lisp. Gruß, Axel Strube-Zettler ------------------ Meine AutoLisp-Seiten Meine private Homepage Mein Angriff auf dein Zwerchfell Mein Lexikon der Fotografie Mein gereimtes Gesülze
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : VBA und volkörperbearb
mapcar am 29.07.2004 um 13:16 Uhr (0)
Hi, _imprint ist eine Befehlsoption von _solidedit (der auf Deutsch VOLKÖRPERBEARB heisst). Für den gesamten Komplex ACIS-Volumenkörper gibt es keine ActiveX-Funktionen. Das ist nicht programmierbar, es sei denn über Command-Mechanismen, und das gilt sowohl in VBA als auch in Lisp. Gruß, Axel-Strube-Zettler ------------------ Meine AutoLisp-Seiten Meine private Homepage Mein Angriff auf dein Zwerchfell Mein Lexikon der Fotografie Mein gereimtes Gesülze
|
| In das Form Autocad VBA wechseln |
