|
Autocad VBA : Datei bearbeiten ohne öffnen ???
fuchsi am 20.11.2003 um 13:09 Uhr (0)
hallo das objectdbx funktioniert auch mit 2000i du musst nur die datei axdb15.dll im acad-inst verzeichnis registrieren. (falls sie sich nicht registrieren lässt, installiere den neuesten VoloView , da werden die dll´s im ordner gemeinsame dateienautodesk shared aktualisiert) das ganze funktioniert auch in VBA Set dbxDoc2 = ThisDrawing.Application.GetInterfaceObject( ObjectDBX.AxDbDocument.15 ) Call dbxDoc2.Open( d: est.dwg ) mit der variable dbxDoc2 kannst du dann alles machen, was du mit ThisDrawing auc ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Datei bearbeiten ohne öffnen ???
fuchsi am 20.11.2003 um 13:20 Uhr (0)
hab mich beim deklarieren vertan Set dbxDoc2 = ThisDrawing.Application.GetInterfaceObject( ObjectDBX.AxDbDocument ) ohne die .15 beim angehängten jpg siehst du die eigenschaten eines AxDBDokumentes zum thema open dwg von rosinino open-dwg ist eine vereinigung von firmen,personen mit den zweck das dwg-file format zu durchleuchten, und jedem zur verfügung zu stellen. unter anderem gibts da eine pror-umgebung downzuloaden mit der man OHNE acad dwgs erstellen/ändern kann (funtioniert in VB mittels API -DLL) h ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Datei bearbeiten ohne öffnen ???
BloodyMess am 20.11.2003 um 13:34 Uhr (0)
Klasse sache es funktioniert, ich bin echt begeistert. ja über diese alliance hatte ich irgendwo was gelesen, habs aber ignoriert, da es wie ein vba-befehl aussah. paßt ja nun, also vielen dank. DANKE DANKE DANKE Gruß TP
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Buchtipps
Proxy am 20.11.2003 um 17:26 Uhr (0)
meine kleine Empfehlung: AutoCAD programmieren mit VBA, m. CD-ROM von Karsten Dummer, Michael Huth Gebundene Ausgabe - 910 Seiten - Addison-Wesley, München Erscheinungsdatum: Oktober 2003 ISBN: 3827321050 Amazon.de-Verkaufsrang 21.319 ------------------ (entmake (entget (entlast)))
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : neue Eigenschaft erstellen
BloodyMess am 24.11.2003 um 09:26 Uhr (0)
Hallo zusammen, kann ich mir unter AutoCAD eine neue Eigenschaft erstellen? Es soll ungefähr so ablaufen, das ein paar Elemente markiert werden und dann eine neue Eigenschaft bekommen sollen oder irgendwo bei dem Element soll ein Buchstabe oder eine Zahl abgelegt werden, die man ohne große Umstände aus- bzw. einlesen kann. Vielleicht hat jemand eine Idee, unter AC04 soll sowas wohl schon eingebaut sein. vielen Dank für Eure Hilfe lg TP
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Datei bearbeiten ohne öffnen ???
BloodyMess am 24.11.2003 um 09:37 Uhr (0)
Hallo fuchsi, bin immer noch begeistert, in welch rasender Geschwindigkeit ich die Eigenschaften aus den gesamten Verzeichnissen auslesen kann. Aber irgendwie bin ich nicht in der Lage eine Eigenschaft zu verändern, sprich etwas in die Datei zu schreiben, liegt es an der Art, wie sie geöffnet wird, oder vergeß ich irgendwas? Code: Dim Object As AcadEntity Dim objDbx As AxDbDocument Set objDbx = ThisDrawing.Application.GetInterfaceObject( ObjectDBX.AxDbDocument ) ... objDbx.Open (fle) For Each Obje ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Datei bearbeiten ohne öffnen ???
fuchsi am 24.11.2003 um 10:00 Uhr (0)
also bei mir macht er es Set objDbx = ThisDrawing.Application.GetInterfaceObject( ObjectDBX.AxDbDocument ) objDbx.Open ( d: est.dwg ) For Each Object In objDbx.ModelSpace Debug.Print Object.Color Object.Color = acByBlock das macht er nicht Next objDbx.SaveAs d: est.dwg wenn ich dann die zeichnung öffne, sind alle elemente farbe vonblock vielleicht hast du das sichern der zeichnung vergessen ?? ------------------ *********************************************** AutoCad 2000i, 2002, 2004 deut ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Datei bearbeiten ohne öffnen ???
BloodyMess am 24.11.2003 um 10:11 Uhr (0)
Ohje ich Depp hab vergessen zu speichern. *grummel* ... nochmals Danke ... lg TP
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : neue Eigenschaft erstellen
fuchsi am 24.11.2003 um 10:40 Uhr (0)
geh mal auf folgende seite http://www.activedwg.com/Download_Links.htm und such nach AsdkOpmX mit diesem arx kannst du beliebeige eigenschaften an die autocad-elemente hinzufügen, die AUCH im eigenschaftsfenster angezeigt,verändert werden können. ------------------ *********************************************** AutoCad 2000i, 2002, 2004 deutsch und englisch Windows 2000, NT, XP
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Gibt es einen guten VBA für Acad Kurs im Netz
mapcar am 26.11.2003 um 00:32 Uhr (0)
Tja, erstmal Danke für das richtig nett , molo... Aber mal zu dem Buch von Addison-Wesley: Ich habe es seit ein paar Tagen hier liegen, aber schon jetzt ist klar, dass da nicht ein Wort drin steht, das man nicht auch den Hilfen von VBA und AutoCAD entnehmen kann. Endlose Tabellen, aber Konzepte werden da nicht vermittelt. Kaum ein Wort z.B. über die Reaktoren und die damit zusammenhängende Problematik usw. Wie man in VB Dialoge programmiert, darüber gibt es eigentlich genug Bücher. Da ist der Ansatz durc ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : CommandButton Laufzeit
fuchsi am 26.11.2003 um 11:56 Uhr (0)
in vba ist das etwas komplizierter als in VB6 Private WithEvents Mycmd As CommandButton Private Sub UserForm_Initialize() Set Mycmd = Controls.Add( Forms.CommandButton.1 , TEST1 , True) , CommandButton2, Visible) Mycmd.Left = 18 Mycmd.top = 100 Mycmd.Width = 175 Mycmd.Height = 20 Mycmd.Caption = This is fun. & Mycmd.Name End Sub Private Sub Mycmd_Click() Debug.Print aa End Sub ------------------ *********************************************** AutoCad 2000i, 2002, 2004 deut ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : CommandButton Laufzeit
fuchsi am 26.11.2003 um 12:35 Uhr (0)
das ganze jetzt mit mehreren buttons leider kann man die deklaration WithEvents nicht mit einem datenfeld kombinieren darum musst du einen umweg über klassenmodule machen als erstes machst du eine userform1 mit fogendem code Private a1(5) As Klasse1 Private Sub UserForm_Initialize() Set a1(0) = New Klasse1 a1(0).showButton (100) a1(0).Wert = Button 1 Set a1(1) = New Klasse1 a1(1).showButton (130) a1(1).Wert = Button 2 Set a1(2) = New Klasse1 a1(2).showButton ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Gibt es einen guten VBA für Acad Kurs im Netz
molo am 27.11.2003 um 16:35 Uhr (0)
Ich habe mir jetzt erstmal das Buch AutoCAD - Objekte aus folgendem Beitrag bestellt. http://www.cad.de/foren/ubb/Forum145/HTML/000308.shtml Zusätzlich habe ich noch ein VBA in Excel Buch von einem Freund ausgeliehen. Das sollte mir erstmal weiterhelfen. @Axel Ich habe mich ja auch schon ein wenig mit Lisp aus Deinem Kurs beschäftigt. Allerdings machen mich diese ganzen Klammern immer ganz wuselig. Da erschient mir VBA für die Kleinigkeiten die ich brauche und mir zutraue übersichtlicher zu sein. Bis ...
|
| In das Form Autocad VBA wechseln |
