|
AutoLisp : Auswahlfilter
Hänk am 18.01.2006 um 23:11 Uhr (0)
Hallo zusammenIch habe hier ein im Netz gefundenes Lisp-Progrämmchen, das mir hilft alle Objekte auf vonlayer zu setzen. Gefunden habe ich es glaube ich sogar hier drin wenn ich nicht irre. Wie könnte man sowas erweitern, wenn nicht ALLES auf vonlayer gesetzt werden sollte, sondern ALLES ausser POLYLINIEN?Hat mir jemand einen Denkanstoss dazu wie man die Auswahl richtig definiert?Code:(defun c:cb( / BLOCK ) (vl-load-com) (vlax-for LAYOUT (vla-get-layouts(vla-get-activedocument(vlax-get-acad-object))) ...
|
| In das Form AutoLisp wechseln |
|
Lisp : Blockeinfügepunkt herausfiltern
kathi-witt am 24.01.2006 um 15:50 Uhr (0)
Hallo Leute,bin bei meiner Diplomarbeit und mal wieder ratlos...Habe in meiner Zeichnung Blöcke mit Attributen eingefügt und möchte nun zwei Symbole (Blöcke) anhand eines bestimmten Attributes miteinander durch eine Linie verbinden. Bei dem Attribut handelt es sich um die Punktnummer des jeweiligen Messpunktes. Ich möchte also dass das Programm die Punkte der Punktnummern X und Y durch eine Linie miteinander verbindet. Es soll also in den vorhandenen Attributen nach der entsprechenden Punktnummer gesucht w ...
|
| In das Form Lisp wechseln |
|
Lisp : Blockeinfügepunkt herausfiltern
kathi-witt am 24.01.2006 um 18:16 Uhr (0)
Hallo Jörn,1. das mit dem (cdr(assoc 10(entget(car(entsel "
Blockreferenz wählen:"))))))hab ich soweit verstanden meine Frage war, ob der Zugriff auf die Referenz anhand des Attributwertes auch einfacher (kürzer) geht als der Code auf den Thomas verwiesen hat???Hier der Code von Thomas:"Wie auch immer, ich würde Menü und entsprechende Buttons so erweitern, dass nach _amtitlehalt der Befehl UPDATE-Title-Block aufgerufen wird, der in folgendem Lisp definiert wird.(defun DATE_GETSTR( / DATUM) (setq DATUM (rto ...
|
| In das Form Lisp wechseln |
|
Lisp : Blockeinfügepunkt herausfiltern
CADmium am 24.01.2006 um 18:20 Uhr (0)
Zitat:Original erstellt von kathi-witt:Sorry, aber als "Fast-Anfänger" blick ich da nich so ganz durch...Für den Durchblick sorgt vielleicht das ausgezeichnete Lisp-Tutorial von Mapcar. Ansonsten hab ich natürlich Verständnis für deine sagen wir mal "anfängertypischen Defizite". Es wäre natürlich auch kein Problem, den kompletten - für deine Zwecke angepassten - Code hier reinzustellen, aber wäre dir damit geholfen ???------------------ - Thomas -"Bei 99% aller Probleme ist die umfassende Beschreibung d ...
|
| In das Form Lisp wechseln |
|
Lisp : Blockeinfügepunkt herausfiltern
kathi-witt am 24.01.2006 um 18:37 Uhr (0)
Hallo Thomas, Zitat:Original erstellt von CADmium: Für den Durchblick sorgt vielleicht das ausgezeichnete Lisp-Tutorial von Mapcar. Ansonsten hab ich natürlich Verständnis für deine sagen wir mal "anfängertypischen Defizite". Es wäre natürlich auch kein Problem, den kompletten - für deine Zwecke angepassten - Code hier reinzustellen, aber wäre dir damit geholfen ???sicher wäre es einfacher für mich mit einem auf meine Zwecke angepassten Code klar zu kommen, als mich in einen umfangreichen Code reinzufinden ...
|
| In das Form Lisp wechseln |
|
AutoLisp : Optionen Problem
tunnelbauer am 25.01.2006 um 19:59 Uhr (0)
Wissen wir schon... http://ww3.cad.de/foren/ubb/Forum37/HTML/002515.shtml (Was hat das mit LISP zu tun ?)------------------GrüsseThomas
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Optionen Problem
Omegacentauri am 25.01.2006 um 20:03 Uhr (0)
Was hat das mit Lisp zu tun?Vielleicht sind hier ja einige, die mehr vom Kern des Programms wissen....Dann könnt das Problem vielleicht schneller aufgelöst werden.-------------------=es gibt nichts, was nicht geht=-
|
| In das Form AutoLisp wechseln |
|
Lisp : Map Civil 3D DGM Objekt via ActiveX erstellen
CAD-Huebner am 26.01.2006 um 15:01 Uhr (0)
Ich versuch ein Civil/Map 3D DGM zu erstellen.Leider gibts dafür nur spärliche VBA Tipps und gar keine Lisp Tipps.Mein Programm sieht so aus:Code:(DEFUN C:Test() ; Neue DGM Fläche in MAP/ Civil 3D anlegen ; aber wie definiere ich eien Variable vom Typ TinCreationData ? (setq acadObj (vlax-get-acad-object) ; connect to Civil oder Map3D aeccApp (vla-getinterfaceobject acadObj "AeccXUiLand.AeccApplication") aeccDoc (vlax-get-property aeccApp "activedocument") aeccSurfs (vlax-get-property aeccD ...
|
| In das Form Lisp wechseln |
|
AutoLisp : per Lisp bestimmte Zeichnungselemente löschen
ElAmigo am 27.01.2006 um 09:39 Uhr (0)
Irgendwann wurde in einem der Foren schon darüber gepostet, leider ergab meine Suche keine Treffer. mein Problem: Ich erhalte von Architekten Zeichnungen, bei denen sämtliche Schrafuren einzelne Linien sind. (wurden mit ArchiCAD gezeichnet bzw. die Schraffuren wurden aufgelöst) Da ich die Schrafuren aber nicht benötige, ist das löschen der Schrafur sehr zeitaufwendig. Hat jemand ein kleines Progi welches mir durch anklicken der Schraffur diese dann aus der Zeichnung löscht? Schrafur (Linie) wählen - Layer, ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : per Lisp bestimmte Zeichnungselemente löschen
CADmium am 27.01.2006 um 09:43 Uhr (0)
guck mal auf www.cad-od.de IMHO gabs da so ein Tool (Nr. 57 Hdel)------------------ - Thomas -"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."
|
| In das Form AutoLisp wechseln |
|
AutoLisp : per Lisp bestimmte Zeichnungselemente löschen
ElAmigo am 27.01.2006 um 09:50 Uhr (0)
Danke für die schnelle Antwort. GrußAlexander (ELAmigo)
|
| In das Form AutoLisp wechseln |
|
Lisp : Map Civil 3D DGM Objekt via ActiveX erstellen
CAD-Huebner am 29.01.2006 um 22:07 Uhr (0)
Tja, noch keiner eine Idee, wie ich ein neues Objekt eines vorgegebenen Typs in Lisp erzeuge?Ich habe mal die obige Lisp-Routine in einen funktionieren AutoCAD-VBA Code umgesetzt.Gerne, würde ich das in Lisp ausführen, aber mir fehlt das Lisp-äquivalent für die markierte Zeile im folgenden Code:Code:Option ExplicitPublic Sub TestCreateTinSurface() Verweise als richtig gesetzt angenommen und Civil Applikation verfügbar Dim oApp As AcadApplication Set oApp = ThisDrawing.Application Dim CivilApp As AeccA ...
|
| In das Form Lisp wechseln |
|
AutoLisp : Errorhander und DCL
marc.scherer am 30.01.2006 um 11:31 Uhr (0)
Zitat:Original erstellt von Kenny1:Ich habe die Vermutung, das dies mit DCL eh sehr schwierig ist.Hmm,nö.Wenn das mit dem Errorhandler und DCL nicht klappt würde ich sagen das es am Design Deiner Funktionen liegt.Wenn Du im Errorhandler beim Start das Undo Flag setzen läßt und Deine Funktion verursacht einen Fehler (im Sinne eines *error*, nicht was Dir vielleicht sinnlos erscheint, für Lisp aber KEINEN Fehler darstellt) sollte alles bis zu dem Zeitpunkt VOR dem Start Deiner Funktion zurückgesetzt werden, ...
|
| In das Form AutoLisp wechseln |
