|
Lisp : FileScriptingObject - Attrubute setzen ???
Wolfgang S am 03.09.2007 um 13:55 Uhr (0)
Grüß Euch alle!Habe folgende Frage:Ich möchte einen Ordner per Lisp/ActiveX/FileSystemObject "ReadOnly" bzw. "Normal" setzen.Da nur ich in dem Ordner schreiben will bzw. den Ordner sowieso als ganzes lösche.Nur komme ich vom VLA-Object des Ordners nicht mehr weiter, Attribute gibt es mir zwar aus, aber ändern kann ich nix.Code:(setq zielordner "C:Temp")(vl-catch-all-error-p(setq zielordnervla (vl-catch-all-apply vlax-invoke-method (list FSO GetFolder zielordner) )))Mit (vlax-dump-object zielordnervla T) ...
|
| In das Form Lisp wechseln |
|
Lisp : Fehlermeldung bei Globalen Varaiblen
cadking am 10.01.2017 um 10:25 Uhr (1)
Hallo cadffm, hallo Marco,vielen Dank, dass ihr euch mit meinem Problem beschäftigt.Warum ist der Code Nonsens? Ich speichere damit Variablen, die ich später wieder zurücksetzen möchte.zu Marco:ich habe die Funktion aus einer anderen Lisp herauskopiert um zu prüfen ob die Fehlermeldung aus den globalen Variablen herrührt. In dieser Funktion gib es doch gar keine error-routine. Und ich starte die Funktion:(defun getoldvar (blkscale blkscaleo attreqmode cmdoldecho oldsnap / )(setq blkscale (getvar "INSUNITS" ...
|
| In das Form Lisp wechseln |
|
AutoLisp : einige lsp´s funzen nicht.
Brischke am 12.05.2004 um 08:48 Uhr (0)
Hallo Ines, es wird nichts nützen, wenn du in allen dir bekannten Foren immer die gleiche Anfrage postest. Lies dir doch die Antworten durch, und bleibe dann bei einem Thread, wenn danach immer noch Probleme auftauchen. Zur Erinnerung, deine Themen: http://ww3.cad.de/foren/ubb/Forum54/HTML/007251.shtml http://ww3.cad.de/foren/ubb/Forum145/HTML/000564.shtml http://www.autocad-magazin.de/forum/read.php?f=3&i=12062&t=12062#reply_12062 http://www.autocad-magazin.de/forum/read.php?f=3&i=12046&t=12046# ...
|
| In das Form AutoLisp wechseln |
 |
Lisp : Sonderzeichen aus edit_box ermitteln
Bernd10 am 30.10.2013 um 10:56 Uhr (1)
Hallo,ich bin jetzt einen Schritt weiter. Aus firmeninternen Gründen besteht unser Text aus Einzelbuchstaben, die zu einem Block zusammengefügt und als Objekt Insert in der Zeichnung verwendet wird.Ich habe deshalb im ersten Schritt die Unicode-Zeichen so in meinem Lisp-Code berücksichtigt:(setq cbust (substr ctxt izler 1)) ; Buchstabe(if (and (= cbust "") (= (substr ctxt (+ izler 1) 1) "U") (= (substr ctxt (+ izler 2) 1) "+")) ; Unicode berücksichtigen (progn (setq ilenunicode 7) (setq cbust (substr ctx ...
|
| In das Form Lisp wechseln |
|
AutoLisp : If-Funktion zum Auswahl prüfen
archtools am 14.01.2006 um 16:34 Uhr (0)
Zitat:Original erstellt von Hänk:Hi zusammenIch habe mit Lisp einen Auswahlsatz mittels ssget erstellt den ich dann verwende um dessen Eigenschaften zu verändern (chprop). Das funktioniert soweit, nun möchte ich noch den Fehler abfangen wenn die Auswahl ohne gefundene Objekte abbricht. Mein Ziel ist es den Auswahlsatz zu prüfen, beinhaltet er keine Objekte soll eine Meldung erscheinen und ansonsten soll der chprop Befehl weitergeführt werden um Eigenschaften zu ändern.Wie mache ich sowas? habe die if-Funk ...
|
| In das Form AutoLisp wechseln |
|
Lisp : Befehl Zurück (_undo)
Bernd10 am 15.10.2008 um 13:26 Uhr (0)
Hallo Heiko, Zitat:Original erstellt von Dorfy:Kannst ja mal munter Haltepunkte verteilen und UNDOCTL überwachen...ich habe durch die Kontrolle von UNDOCTL festgestellt, dass es an meinen geschachtelten Befehlen liegt, d.h. ich rufe in Befehl1 auf den Befehl2 auf (siehe unten). Dadurch verändert sich UNDOCTL von 57 auf 49 und dann werden die Lisp-Ausdrücke in die Liste des Zurück-Befehls eingetragen.( defun c:Befehl1 ( / ) ; Den Beginn der Gruppe für den AutoCAD-Befehl "zurück" setzen (vla-startundomark ( ...
|
| In das Form Lisp wechseln |
|
AutoLisp : Plotstiltabelle wechseln
mkl-cad am 20.08.2004 um 07:54 Uhr (0)
Hallo Lisp-Fans In dem Layermanager kann man ja auch den Plotstil angeben. Wir verwenden dazu eine Plotstiltabelle z.B a.stb . In den Optionen unter Benannten Plotstile ist die auch als Vorgabe eingetragen. Nun habe ich Pläne in denen ich die gleichen Plotstile verwende aber damals hieß die Plotstildatei anders z.B b.stb . Wenn ich nun mit command einen neuen Layer erstelle und den Plotstil z.B. Farbe_1 angebe, gibt es eine Fehlermeldung da ACAD den Plotstil nicht mehr in der Datei b.stb findet, da ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Prüfen ob Zahl
marc.scherer am 21.12.2005 um 18:33 Uhr (0)
Hallo Heinz,könnte es sein, dass Du die nützlichen Debug-Funktionen der VLisp-IDE gar nicht benutzt?Solltest Du aber. Hier kannst Du nämlich ne ganze Menge über die Funktionsweise des Lisp-Interpreters lernen indem Du bestimmte Ausdrück überwachen läßt und Deine Proggies Schrittweise arbeiten läßt. Dann ist es auch überhaupt kein Problem für Dich herauszufinden was genau Deinen Fehler verursacht:(read ".1")Was genau soll denn Deine Funktion machen?Soll da am Ende n Integer oder Real rauskommen?Guck Dir mal ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : verunsichert über (ssget _p)
fuchsi am 08.09.2005 um 13:02 Uhr (0)
Zitat:(defun fnkSset (Slist / i Sset) (setq i 0 Sset (ssget)) (while ( i (length Slist)) (setq Sset (ssadd (nth i Slist) Sset)) (setq i (1+ i)) ) Sset );defunich versteh jetzt zwar nicht, warum du da ein ssget drin hast (laut deiner beschreibung soll lediglich einem liste mit enames zu einem Auswahlsatz werden), aber egal.Warum willst du diesen Auswahlsatz mit (ssget "_p") ansprechen ? Wir arbeiten in Lisp, da gibt es doch bekanntlich Variablen. Wenn du diesen erstellten Auswahlsatz brauchst, da ...
|
| In das Form AutoLisp wechseln |
|
Lisp : DeepSeek als Lisp-Code-Generator
archtools am 01.02.2025 um 10:11 Uhr (1)
Zitat:Original erstellt von archtools:Zunächst habe ich mich vergewissert, dass DeepSeek weiß, was ein Lindenmayer-System ist, habe nach der grundsätzlichen Formulierung einer Eiche als L-System gefragt, und dann um die Umsetzung als AutoLisp Code gebeten. Es kam ein vernünftig aussehendes Programm zustande.Die exakt gleiche Frage habe ich ChatGPT gestellt. Das gelieferte Programm hatte ganz deutlich schlechtere Qualität als das von DeepSeek. Es fehlten alle lokalen Variablendeklarationen, es wurden Lisp-F ...
|
| In das Form Lisp wechseln |
|
Lisp : Kann man ein einzelnes Objekt regenerieren?
autocart am 07.11.2006 um 12:19 Uhr (0)
Guten Tag!Mit redraw kann man ja einzelne Elemente neuzeichnen.Kann man irgentwie eigentlich auch einzelne Elemente (mehrere ausgewählte oder wirklich nur eines) regenerieren? Wäre super.Aktueller Fall: Ich ändere die Eigenschaften von einem Objekt oder verschiebe es oder so. Dadurch wird die Darstellung der Anzeigereihenfolge verändert (Objekt wird in den Vordergrund geschoben), obwohl in der Datenbank die richtige Reihenfolge gespeichert bleibt. Mit redraw wird die Anzeigereihenfolge nicht aktualisiert. ...
|
| In das Form Lisp wechseln |
|
Lisp : dynamische Anzeige am Fadenkreuz
cadplayer am 14.03.2012 um 14:07 Uhr (0)
Hi!Ich möchte gern Höhen von einem Bezugstext aus setzen. Mich würde interessieren, ob es in Lisp eine Möglichkeit gibt: bevor der neue Text gesetzt wird, anzuzeigen welchen berechneten Wert der Text ergibt.Mir also gleich am Fadenkreuz angezeigt wird, welche neue Höhe kommt nach Position des Fadenkreuzes.Code:(defun c:znh () (setq obj (entget (car (entsel "
Wähle Textobjekt ! "))) p1 (cdr (assoc 10 obj)) ha (atof (cdr (assoc 1 obj))) pro (getreal "
Prozent ! ") ) (while (setq p2 (getpoint "
Zielpunkt ...
|
| In das Form Lisp wechseln |
|
Lisp : Blöcke durchnummerieren
joern bosse am 10.06.2007 um 08:49 Uhr (0)
Hallo Hein,na das hast Du aber eine ziemlich lange Liste mit Forderungen, soetwas bekomme ich von meinen Kunden auch öfters, aber die beauftragen mich ja dann auch, die Programmierung zu machen.Anbei ein Code, mit dem Du genau das 5te Attribut von ausgewählten Blöcken hochzählen kannst. Weil Du verschiedene Blockname hast, solltes Du bei der Objektauswahl den Befehl "FILTER" verwenden und die verschiedenen Blöcke in mehreren Arbeitsgängen bearbeiten.Code:(defun c:att5_nr ( / AWS M N NEXT_OBJ NR) (princ "
B ...
|
| In das Form Lisp wechseln |
