|
Lisp : String in Variable umformen
cadffm am 12.10.2016 um 10:16 Uhr (1)
String-Handling Functions Reference (AutoLISP)Entweder die Zeichen ersetzen (nur wenn sichergestellt ist das dies " die einzigen im String sind)oder nur den String ab dem 2.Zeichen bis zum vorletzten(= 2. von hinten) ausgeben lassen.------------------CAD on demand GmbH - Beratung und Programmierung rund um AutoCAD
|
| In das Form Lisp wechseln |
|
Lisp : String in Variable umformen
cadffm am 12.10.2016 um 11:05 Uhr (1)
Was in deinem Textwert steht hast du alleine in der Hand.Ich erzeuge einen Textstring mit Anführungszeichen am Anfang und Ende:(setq mystr ""Wow"")Das ist also dein IST-Stand ? (alert mystr)(alert (substr mystr 2 (-(strlen mystr)2)))(alert (vl-string-subst "" """ (vl-string-subst "" """ mystr)))(alert (vl-string-left-trim """ (vl-string-right-trim """ mystr)))------------------CAD on demand GmbH - Beratung und Programmierung rund um AutoCAD
|
| In das Form Lisp wechseln |
|
Lisp : String in Variable umformen
zimmernagel am 12.10.2016 um 14:00 Uhr (1)
Hallo cadffm!Ich habe bedingt dadurch, dass ich noch vorher eine cond-Verzweigung mit mtyp habe, die Variabe aus einer Textdatei gelesen, die schon vorher auch schon bearbeitet wurde und dann als String abgespeichert wurde. Daher ist der Textwert leider etwas "vorgefertigt". Ich habe schon versucht die cond-Abfrage zu verändern, dass ich nur noch z.b. R337 da stehen habe, aber da verzweifel ich auch schon...Auszug: (setq MTYP (nth 2 mlzeile1)) ; Normkatalog der Standard-Matten (cond ((= MTYP "R188") ...
|
| In das Form Lisp wechseln |
|
Lisp : Sichtbar/Unsichtbar feststellen
Andreas Kraus am 28.10.2016 um 09:32 Uhr (1)
Hallo zusammen,in der angehängten Datei ist ein Block mit Attributen.Dieser ist nicht mehr sichtbar wenn ich ANNOALLVISIBLE auf 0 stelle.Das soll im Plan aus dem der Block stammt am Ende auch so sein, weil Texte übereinanderliegen und nicht mehr lesbar sind.Sind seeehhr viele solcher Blöcke.Aus vielen anderen Gründen werden in diesem Plan die Beschriftungseigenschaften ALLER Objekte entfernt.Damit verliert dieser Block natürlich die Eigenschaft "unsichtbar" zu sein, und die Texte liegen wieder übereinander ...
|
| In das Form Lisp wechseln |
|
Lisp : Sichtbar/Unsichtbar feststellen
cadffm am 28.10.2016 um 10:03 Uhr (1)
Na entweder unterstützt das Objekt den aktuellen Maßstab, oder nicht.Also Maßstab des aktuellen Ansichtsfensters vergleichen mit den unterstützten Maßstäben des Objektes.PS: Ich warte schon seit dem 25. Augus, spätestens seit dem 6.Oktober auf diese Fragen ------------------CAD on demand GmbH - Beratung und Programmierung rund um AutoCAD
|
| In das Form Lisp wechseln |
|
Lisp : Sichtbar/Unsichtbar feststellen
cadffm am 28.10.2016 um 11:13 Uhr (1)
neben gefrorenen Layern und den genannten Punkten gibt es die Beschriftungsfunktionalität.Wenn nicht alle gleichzeitig dargestellt werden (AnnoAll..) kommt es also darauf an ob das Objekt den aktuellen Maßstab unterstützt oder nicht.Hat das Objekt nur den Maßstab 1:1 und es ist 1:50 aktuell, wird es also nicht angezeigt.Die Info hängt aber nicht am Objekt, sondern im genannten Dictionary.------------------CAD on demand GmbH - Beratung und Programmierung rund um AutoCAD
|
| In das Form Lisp wechseln |
|
Lisp : Sichtbar/Unsichtbar feststellen
cadffm am 28.10.2016 um 10:36 Uhr (1)
Es geht um die zugewiesenen Maßstäbe der Referenzen, die haben nichts mit der Blockdef zutun.-Und um herauszufinden welchen Maßstäben das Objekt zugeordnet ist,wird das Dictionary "ACDB_ANNOTATIONSCALES" durchsucht.Heute keine Silbertabletlösungen, die gibt es aber genug im Netz und wären nur Wiederholung,"ACDB_ANNOTATIONSCALES" lautet das Stichwort/Suchbegriff.------------------CAD on demand GmbH - Beratung und Programmierung rund um AutoCAD
|
| In das Form Lisp wechseln |
|
Lisp : Ärger mit Werkzeugkasten Stile
cadffm am 03.11.2016 um 12:31 Uhr (1)
Vielleicht fehlt da ein Update der Datenbank?, ich benutzte zum anlegen von Textstilen aber eigentlichimmer nur den Befehl STIL, den gibt es schon, der funktioniert, warum neu erfinden.Oder willst du auch Textstil in Dateien erstellen die "nicht aktiv" sind?Über den Befehl STIL (also Command..) sollte der Stil immer direkt angezeigt werden, ich kenne es nur so.Oder nutzt du Command/Stil und dabei klappt es nicht?Wir erstellst du denn genau den Stil und in welcher Acadversion wird er dir nicht direkt in der ...
|
| In das Form Lisp wechseln |
|
Lisp : _Copy & Koordinaten - LISP
cadffm am 03.11.2016 um 14:10 Uhr (1)
kopieren? die Oberkante oder die neu erzeugte Linie?Layer von Objekten ändern: Das geht grundsätzlich mit ÄNDERNFür _chprop/eiganpass müßte man ja zuvor ein anderes Objekt wählen?Layer für die vorhandenen Oberkanten-ObjekteDer Auswahlsatz der Elemente für die Oberkante hast du bereits in der Variable "gelaende",diese kannst du mit dem Befehl ÄNDERN anpassen (zuvor dafür Sorgen das der Layer auch wirklich existiert)Layer für die neuen Objekte:Die neu erzeugten Objekte kannst du nicht "so einfach" fassen, ab ...
|
| In das Form Lisp wechseln |
|
Lisp : Objektkoordinaten mit Lisp abfragen
Brischke am 03.11.2016 um 19:51 Uhr (1)
Das XList habe ich mir jetzt nicht angesehen - das vorweg.Trivial ist die Aufgabe nicht. Die Z-Koordinate kann eine ganz andere sein, als das Objekt selber ausweist.Nimmst du einen Block, zeichnest eine Linie beginnend auf Z=0 und endend auf Z=100. Fügst dann eine Blockreferenz auf Z=2000 ein, dann ist die Z-Koordinate der gepickten Linie nach wie vor Start 0 und Ende = 100. Wenn die Blockreferenz auch noch in Z-Richtung skaliert ist, ist auch das Ende Linie nicht einfach durch Addition der Z-Koordinate de ...
|
| In das Form Lisp wechseln |
|
Lisp : Objektkoordinaten mit Lisp abfragen
Brischke am 03.11.2016 um 20:21 Uhr (1)
Willst du das irgendwo einbauen oder genügen die Koordinaten im Textfenster?(princ (caddr(getpoint"
Punkt wählen:")))Grüße!Holger------------------Holger BrischkeCAD on demand GmbHIndividuelle Lösungen von Heute auf Morgen.defun-tools Das Download-Portal für AutoCAD-Zusatzprogramme!
|
| In das Form Lisp wechseln |
|
Lisp : Radius über drei Punkte berechnen
jupa am 08.11.2016 um 08:59 Uhr (1)
Zitat:Original erstellt von Bernd10:Meine spezielle Aufgabe hierzu ist eigentlich, aus einer Linie einen Kreisbogen mit einem Radius zu machen, dass der Kreisbogen optisch fast mit der Linie identisch ist.Das geht auch anders. - Linie in Polylinie konvertieren (pedit).- Linie selektieren, mittleren Griff mit der Maus anfahren- aus dem erscheinenden Kontextmenü wählen "in Bogen konnvertieren"- mittleren Griff ein klitzekleines Stück wegziehen (es sollte kein störender OFANG (mit, näc, ...) aktiv sein).- wen ...
|
| In das Form Lisp wechseln |
 |
Lisp : AutoCAD Objektfang (Ofang) Ein oder Aus (toggle) wie F3 aber als LISP
neo4matrix am 15.11.2016 um 16:29 Uhr (15)
Hallo GemeindeIch tüftle schon seit längerem an einem Listp, welches GENAU das gleiche macht, wie die F3 Taste unter AutoCAD. Nämlich den Objektfang umschalten. Hier schon mal mein List Code:(defun C:OFangToggle ( / aosmo) (setq aosmo (getvar "OSMODE")) (if ( aosmo 16383) ((setvar "OSMODE" (- aosmo 16384))(princ "
Ofang ein")) ((setvar "OSMODE" (+ aosmo 16384))(princ "
Ofang aus")) ) (prin1))Er funktioniert so weit ganz gut, Nur leider kommt beim Aufrufen des Befehls OFangToggle stets eine Fehlermeldung!Je ...
|
| In das Form Lisp wechseln |
