|
AutoCAD VBA : Gruppenbeschreibung auslesen
CAD-Huebner am 31.01.2013 um 12:39 Uhr (0)
Hier auch noch eine Variante ohne Active XCode:;; Erstellt eine Liste mit allen Gruppennamen und deren Beschreibung;; Udo Hübner(defun C:ListGroupnamesAndDescription () (foreach entry (dictsearch (namedobjdict) "ACAD_GROUP") (cond ((= 3 (car Entry)) ; Gruppenname (prompt (Strcat "
Gruppenname: " (cdr Entry)))) ((= 350 (car Entry)) ; Gruppenbeschreibung (prompt (Strcat " Gruppenbeschreibung: " (cdr (assoc 300 (entget (cdr Entry))))))) (T nil) ) ) (prin1)); gleich ausführen(C:ListGroupnamesAndDescri ...
|
| In das Form AutoCAD VBA wechseln |
|
Autocad VBA : alle Blöcke (und deren Werte) einer Zeichnung in Datei auslesen
mapcar am 23.11.2004 um 21:25 Uhr (0)
Tobias, bitte versuch mal, nur das zu zitieren, worauf du dich beziehst. Ich habe deinen letzten Beitrag dahingehend geändert (wie schon ein paarmal). Wiederholungen gibt es schon genug, und wenn Codepassagen dann auch immer noch in Zitaten wiederholt werden, wird das alles sehr schwer lesbar. ------------------ (defun - Lisp over night - AutoLisp-Programmierung für AutoCad - Da weiß man, wann man s hat Meine AutoLisp-Seiten Mein Angriff auf dein Zwerchfell Mein Lexikon der Fotografie Mei ...
|
| 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 : region
mapcar am 18.11.2004 um 17:20 Uhr (0)
Hi Joe, jetzt wo ich es sehe - deutlich besser als mein Ansatz;-) Und kam auch noch füher, das hab ich vorhin gar nicht gemerkt, weil ich auch noch ziemlich lang an meinem Stuß rumgemacht habe;-) Also cnc, vergiss ganz schnell, was ich hier gepostet habe: Blödsinn nämlich, und halte dich an den Vorschlag von Joe. Ist ja schon irgendwie peinlich;-) Gruß, Axel Strube-Zettler ------------------ (defun - Lisp over night - AutoLisp-Programmierung für AutoCad - Da weiß man, wann man s hat Meine AutoLisp ...
|
| In das Form Autocad VBA wechseln |
 testObjectIdByErased.zip |
AutoCAD VBA : reaktor: erase, added, modified
Brischke am 17.02.2012 um 10:48 Uhr (0)
Zitat:Original erstellt von reltro:... Jedoch wär es mit sicherHeit für die Nachwelt hilfreich. ... anbei die DLL. Laden mit Netload, dann kann man in Lisp auf die neue Funktion _GetHandleByErasedObjectId zugreifen.(_GetHandleByErasedObjectId ObjectId )----------Zu deinen anderen Fragen kann ich nichts sagen. Dazu habe ich zu wenig Ahnung, was VBA angeht. Wie der Doppelklick zum Öffnen des Blockeditors implementiert ist .. auch damitz habe ich mich noch nicht beschäftigen müssen.Grüße!Holger-------------- ...
|
| In das Form AutoCAD VBA wechseln |
|
Autocad VBA : Blockdefinition Layer ändern
camehl am 10.04.2006 um 07:16 Uhr (0)
Hallo Forum,kennt jemand eine Möglichkeit auf die Layer-Eigenschaft einer Blockdefintion in der Blocktabelle mit VBA zuzugreifen?In der VBA-Objektbeschreibung fehlt diese Eigenschaft. In der Beschreibung der DXF-Gruppencodes wird diese Beschreibung aber aufgeführt und über Lisp kann mann auch darauf zugreifen:Befehl: (entget(tblobjname "BLOCK" "*x8"))((-1 . Objektname: 7eff9478 ) (0 . "BLOCK") (330 . Objektname: 7eff9470 ) (5 . "2297") (100 . "AcDbEntity") (67 . 0) (8 . "test") (100 . "AcDbBlockBegin") (70 ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Elemente an befehlszeile übergeben
RalphRX8 am 22.03.2007 um 21:03 Uhr (0)
Danke Stelli1,aber ich bekomme das nicht hin.Ich denke es müsste heißen:Set sset = ThisDrawing.SelectionSets.Add("SS")anstattSet sset = ThisDrawing.SelectionSets("MS")Oder??Und dann kann ich doch auch mit VBA Elemente dem SelectionSet hinzufügen, oder?Das passende Lisp finde ich leider nicht.Also ich habe auf jeden Fall die Zeile geändert und die Elemente mit der VBA-Add Methode dem Selectionset hinzugefügt.Wenn ich dann "_move !ss " mache, sagt er ungültige Auswahl.Kannst Du mir vielleicht nochmal auf die ...
|
| In das Form Autocad VBA wechseln |
|
AutoCAD VBA : Eigenschaften eines mit ActiveX erstellten Volumens
Gregi am 28.04.2008 um 10:08 Uhr (0)
von welchen Nachteilen sprichst Du? Habe noch nicht mir dem SendCommand gearbeitet. Nach dem ersten lesen in der Hilfe würde ich vermuten, das wenn wir mal wieder eine neuere AutoCad Version bekommen, das manche Befehle etwas anders funktionieren und dann der Code überarbeitet werden müßte.Bei Lisp habe ich auch schon geschaut. Habe ich bisher halt auch noch nicht mit gearbeitet aber in der Hilfe hatte ich jetzt auch nicht den Eindruck, das es für die 3D Objekte wesentlich besser gerüstet ist?------------- ...
|
| In das Form AutoCAD VBA wechseln |
|
Autocad VBA : Zeichnungsrahmen einfügen
CADmium am 18.04.2006 um 11:35 Uhr (0)
..über den ACAD-Mechanical-Befehl AMTITLE wird das so, wie du es dir vorstellst, nichts werden. Rahmen und Schriftfeld sind beides Blöcke, welche über entsprechende XDATAS aufeinander verweisen und für den Befehl POWEREDIT gekennzeichnet sind .. du müßtest dir also in VBA eine Routine schreiben, das vom Rahmen und Schriftfeldblock entsprechende Referenzen erzeugt, die Xdatas generiert, und die Attribute des Schriftfeldes ausfüllt. Machbar ist das ( habs in Lisp auch schon mal realisiert), aber ne ganze Men ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Text länge
mapcar am 30.11.2004 um 22:41 Uhr (0)
Bei TTfs könnte vielleicht ein Umweg über GDI das gewünschte Ergebnis bringen. Ist mir aber viel zu fern, um hier ein ad-hoc-Beispiel zu bringen. Jedenfalls gibt es da irgendwelche FontGetMetrics-Funktionen, die sehr wahrscheinlich auch in AutoCAD Gültigkeit haben. Allerdings müsste man dann auch die Acad-Bildschirmauflösung usw. in der Umrechnung berücksichtigen. Ob sich das lohnt? Gruß, Axel Strube-Zettler ------------------ (defun - Lisp over night - AutoLisp-Programmierung für AutoCad - Da weiß ma ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Gütigkeitsprüfung
Proxy am 10.12.2004 um 12:07 Uhr (0)
Zitat: IsNumeric Function Example This example uses the IsNumeric function to determine if a variable can be evaluated as a number. Dim MyVar, MyCheck MyVar = 53 Assign value. MyCheck = IsNumeric(MyVar) Returns True. MyVar = 459.95 Assign value. MyCheck = IsNumeric(MyVar) Returns True. MyVar = 45 Help Assign value. MyCheck = IsNumeric(MyVar) Returns False. ------------------ Lisp?!?! Why the Hell did you pick the most arcane, obscure, and hopelessly-roo ...
|
| In das Form Autocad VBA wechseln |
|
AutoCAD VBA : Listview - Vom ausgew. Listview-element zum dazugehörigen Block
steinemann09 am 16.03.2009 um 15:41 Uhr (0)
Halllo Wilfried,danke für Deinen Asatz, damit würde es problemlos funktionieren,aber ich darf dem Flächenstempel - Block leider kein weiters Attribut zuordnen(Vorgabe des AG). Ich hoffe, ich nerve Dich nicht zusehr.Ich will ja Dein Motto, "warum Lispeln, wenns auch anders geht" nicht in Frage stellen, aber ich gebe Dir trozdem einen kleinen Besipielcode, wie ich in Lisp aus dem Blockattribut zu der über das Schriftfeld verknüpften Polylinie gelange.__________________________________________________________ ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Problem mit getentity (VBA) und vla-runmacro
simsl am 14.06.2012 um 11:52 Uhr (0)
Hallo,habe ein für mich (anscheinend) unlösbares Problem, bei dem ich leider aufgeben und euch um Hilfe bitten muss.Folgendes:Ich habe ein kleines VBA-Programm geschrieben, bei dem ich die Nummerierung meiner Vermessungspunkte (Blockreferenz mit Attributen) etwas automatisieren möchte, d.h. die Punktnummer wird mit jeder Anwahl eines neuen Blockes um 1 erhöht und das betreffende Blockattribut dann mit der neuen Nummer überschrieben. Bei Aktivierung des Programmes erscheint die Userform, wo verschiedene Ein ...
|
| In das Form AutoCAD VBA wechseln |