|
Autocad VBA : lisp-ausdruck auswerten
Brischke am 19.05.2004 um 12:42 Uhr (0)
Zitat: Original erstellt von fuchsi: @defun Autodesk Anwendertreffen am 15.06. in Steyr/Österreich! klingt interresant, wär nicht so weit zum Fahren für mich @fuchsi wäre eine gute Gelegenheit, sich einmal persönlich kennen zu lernen. Würde mich freuen. Holger ------------------ Holger Brischke (defun - Lisp over night! AutoLISP-Programmierung für AutoCAD Da weiß man, wann man s hat! Treffen Sie (defun auf dem Autodesk Anwendertreffen am 15.06. in Steyr/Österreich !
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Alle Layouts nach blöcken durchsuchen
Brischke am 19.05.2004 um 14:00 Uhr (0)
Hallo, erstell dir einen Auswahlsatz über alle Elemente der Zeichnung, die ein Block bestimmten Namens sind. Da werden alle Elemente, egal in welchem Layout, gefunden. Falls es für dich wichtig ist, das Layout zu wissen oder die Blöcke nach Layout sortiert auszugeben, dann kannst du das ja dann aus den Elementeigenschaften ermitteln und entsprechend sortieren. Grüße Holger ------------------ Holger Brischke (defun - Lisp over night! AutoLISP-Programmierung für AutoCAD Da weiß man, wann man s hat! T ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Alle Layouts nach blöcken durchsuchen
Brischke am 19.05.2004 um 14:33 Uhr (0)
Hallo Dan, Vielleicht hilft dir folgendes Code: Sub Test() Dim Bloecke Bloecke = SelAllInsertByName( TestBLK ) End Sub Public Function SelAllInsertByName(BLKName As String) Dim All_E Dim i As Integer Dim Filter(3, 1) As Variant Filter(0, 0) = -4 Filter(0, 1) = AND Filter(1, 0) = 0 DXF-Gruppencode Filter(1, 1) = Insert Blöcke Filter(2, 0) = 2 DXF-Gruppencode Filter(2, 1) = BLKName Name Filter(3, 0) = -4 Filter(3, 1) = AND All_E = Select_All_Filter( All , Filter) SelAllInsertByName = All_E End ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : SelectAtPoint
Brischke am 23.05.2004 um 12:46 Uhr (0)
Hallo, Mal ein anderer Gedankanansatz: liegt die Schraffurumgrenzung als z.B.Polyline vor, dann kannst du ja auch einen Auswahlsatz mit KreutzenPolygon erstellen. Das ist vielleicht eindeutiger? Grüße Holger ------------------ Holger Brischke (defun - Lisp over night! AutoLISP-Programmierung für AutoCAD Da weiß man, wann man s hat! Treffen Sie (defun auf dem Autodesk Anwendertreffen am 15.06. in Steyr/Österreich !
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Koordinaten auslesen
Brischke am 25.05.2004 um 11:25 Uhr (0)
Hallo Kelme, die Blockrefernzen verfügen über die Eigenschaft InsertionPoint Das ist der Einfügepunkt. Grüße Holger ------------------ Holger Brischke (defun - Lisp over night! AutoLISP-Programmierung für AutoCAD Da weiß man, wann man s hat! Treffen Sie (defun auf dem Autodesk Anwendertreffen am 15.06. in Steyr/Österreich !
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Linien Selektieren und verschieben für Anfänger
Brischke am 26.05.2004 um 01:05 Uhr (0)
Hallo, wie du die Linien selektierst, das kannst du dir dort ableiten: http://ww3.cad.de/foren/ubb/Forum259/HTML/000242.shtml Die so ermittelten Linienobjekte sind dann nur noch bzgl. der länge zu überprüfen. Linien verfügen über diese Länge-Eigenschaft, so dass du diese dann mit einer einfachen If-Bedingung rausfiltern kannst. Bei Fragen ... Grüße Holger ------------------ Holger Brischke (defun - Lisp over night! AutoLISP-Programmierung für AutoCAD Da weiß man, wann man s hat! Treffen Sie (de ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : AutoCad aus Access unsichtbar öffnen....und dann?
Brischke am 27.05.2004 um 15:42 Uhr (0)
Hallo Bernd, Schau mal dort: http://ww3.cad.de/foren/ubb/Forum259/HTML/000237.shtml Bei der Open-Methode gibt es doch die Einstellung für die Sicherheitsabfrage. Grüße Holger ------------------ Holger Brischke (defun - Lisp over night! AutoLISP-Programmierung für AutoCAD Da weiß man, wann man s hat! Treffen Sie (defun auf dem Autodesk Anwendertreffen am 15.06. in Steyr/Österreich !
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : AutoCad aus Access unsichtbar öffnen....und dann?
Brischke am 27.05.2004 um 16:43 Uhr (0)
Hallo Bernd, das ist Quatsch, dass du um Lisp nicht vorbei kommst. Hier wird ja mit Lisp auf das ActiveX-Objekt zugegriffen. Genau wie in VBA. Ich vermute, dass es an 2000er liegt. Ich habe das in 2004 geschrieben, und da hat sich eben doch manches geändert. Was ich jezt aber auch vermute, es ist die Sicherheitsabfrage wegen der Makro s. Wie werden die denn geladen? Ich habe irgendwo gelesen (nicht getestet) wenn die Makros mit (vl-irgendwas ) geladen werden, dass dann diese Abfrage nicht kommt. Probier es ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Einfügen einer Zeichnung in ein anderes Modellblatt
Brischke am 13.06.2004 um 10:32 Uhr (0)
Hallo Marcus, das Einfachste ist, du machst daraus einen Block und fügst den auf dem Ziel-Modellblatt (was ist das überhaupt?) wieder ein, explodierst diesen und bereinigst ihn. Grüße Holger ------------------ Holger Brischke (defun - Lisp over night! AutoLISP-Programmierung für AutoCAD Da weiß man, wann man s hat! Treffen Sie (defun auf dem Autodesk Anwendertreffen am 15.06. in Steyr/Österreich !
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : LWPolylinie Kurve Angleichen über VBA
mapcar am 17.06.2004 um 20:39 Uhr (0)
Schlechte Karten. Die Developer Help sagt zur alten Polylinie: This object is an earlier version of the LightweightPolyline object. This object exists for backward compatibility only. Use the new LightweightPolyline object to create polylines with an optimized format that saves memory and disk space. Das bedeutet, daß man sich auch nicht die Mühe gemacht hat, ActiveX-Methoden für Glättung usw. zur Verfügung zu stellen. Die ActiveX-Schnittstelle ist nun mal nicht vollständig! Es bleibt dir wohl nich ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : LWPolylinie Kurve Angleichen über VBA
startrek am 17.06.2004 um 22:25 Uhr (0)
Hi Axel, erstmal Danke für die Info, da kann man sich ja sonst totsuchen ;-) Mal ne kleine Frage: Ich hab mit Lisp absolute Verständnisprobleme, deswegen eine Bitte, kannst Du mir bitte mal dieses VBAische in Lisp übersetzen ?? In der Hoffnung, dass mich das vielleicht der Sprache etwas näher bringt, wenn ich mal einen visuellen VBA-Lisp Vergleich habe, hoff Du weisst wie ichs mein ;-) Es geht drum eine LWPolyline in was 3-dim zu verzaubern, eine VBA versus Lisp Code-Gegenüberstellung würde mich hier mal ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : LWPolylinie Kurve Angleichen über VBA
mapcar am 18.06.2004 um 11:15 Uhr (0)
Hi Nancy, eine Übersetzung ist das natürlich nicht. Es ist eine Lisp-Funktion, die genau das selbe macht wie deine VBA-Funktion: Code: (defun c:yellowsubmarine( / lwpl z) (setq z -50) (if(=(cdr(assoc 0(setq lwpl(entget(car(entsel Polylinie wählen: )))))) LWPOLYLINE ) (progn (command _3dpoly ) (foreach gc lwpl (if(=(car gc)10) (command(list(cadr gc)(caddr gc)(setq z(+ z 50)))) ) ) (command) ) ) ) Der Ablauf ist aber ein völlig anderer, ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : LWPolylinie Kurve Angleichen über VBA
TomiProg am 18.06.2004 um 12:18 Uhr (0)
Hallo Axel. Ich sehe schon, daß ich mit ACAD14 so an die Grenze komme, was die ARX-Reife betrifft. Danke für den Tip es mit Lisp zu versuchen. Hat nur einen Nachteil. Unter Lisp lassen sich nicht so schöne Dialogfelder erzeugen und verwalten wie unter VBA. Vielleicht bekomme ich es ja zusammen mit VBA und LISP hin. Es gibt da aber noch eine ACADUNSUPP.ARX. Kennt die jemand? Damit kann ich doch Befehle aufrufen wie mit COMMAND von LISP. Vielleicht kann mir jemand Tips zum Befehl PrintToCmLine geben.
|
| In das Form Autocad VBA wechseln |
