|
Lisp : Polylinien und Kreisbögen in einem Lisp
aufi am 06.03.2009 um 09:10 Uhr (0)
Hallo Dorfy,Ich weiss schon das ich die Zeile austauschen kann, aber danach funktioniert das ganze Lisp nicht mehr.Weil ich ja die ersten beiden Punkt benötige um die Richtung des Versatzes zuerstellen bzw. für das Einfügen der Blöcke mit messen.mfg Aufi
|
| In das Form Lisp wechseln |
|
Lisp : Polylinien und Kreisbögen in einem Lisp
Dorfy am 06.03.2009 um 09:18 Uhr (0)
Hi,???(command "_pline" (setq pta (setq pt1 (getpoint))) (setq ptb (setq pt1 (getpoint pt1))))(while...)mfg heikoEdit: Brauchst du nur die ersten beiden Stützpunkte oder auch weitere?[Diese Nachricht wurde von Dorfy am 06. Mrz. 2009 editiert.]
|
| In das Form Lisp wechseln |
|
Lisp : Polylinien und Kreisbögen in einem Lisp
aufi am 06.03.2009 um 09:38 Uhr (0)
Hallo CADmium,Anbei schicke ich Euch mal eine Zeichnung mit Erklärung.Ich hoffe Ihr versteht was ich meine.Die LISP steht ja eh schon ganz oben.Lg Aufi
|
| In das Form Lisp wechseln |
|
Lisp : Polylinien und Kreisbögen in einem Lisp
aufi am 06.03.2009 um 09:42 Uhr (0)
Hi DorfyÜbrigens mein Name ist Aufi.Und ich brauche für meine Lisp nur die ersten Beiden Stützpunkte.mfg aufi
|
| In das Form Lisp wechseln |
|
Lisp : Polylinien und Kreisbögen in einem Lisp
Dorfy am 06.03.2009 um 09:56 Uhr (0)
Hi AUFI... schon ausprobiert?mfg heiko[Diese Nachricht wurde von Dorfy am 06. Mrz. 2009 editiert.]
|
| In das Form Lisp wechseln |
|
Lisp : Polylinien und Kreisbögen in einem Lisp
aufi am 06.03.2009 um 10:00 Uhr (0)
Hi Dorfyja, Leider funktionierts nicht.mfg aufi
|
| In das Form Lisp wechseln |
|
Lisp : Polylinien und Kreisbögen in einem Lisp
Dorfy am 06.03.2009 um 10:10 Uhr (0)
Hi AUFI,die "" am Ende entfernt?(command "_pline" (setq pta (setq pt1 (getpoint)));zweimal setq? (setq ptb (setq pt1 (getpoint pt1))))(while (/=(getvar "CMDACTIVE")0)(command pause))(setq pl (entlast))mfg heiko
|
| In das Form Lisp wechseln |
|
Lisp : Polylinien und Kreisbögen in einem Lisp
aufi am 06.03.2009 um 10:39 Uhr (0)
Hi DorfyDanke jetzt klappts, habe die "" am schluß übersehen.Habe noch einen Text eigefügt das die Leute wissen das man jetzt K und Ldrücken kann damit man Kreisbögen und Linien Zeichnet.mfg aufi
|
| In das Form Lisp wechseln |
|
Lisp : Fehlerhandling in Autolisp
CAD-Huebner am 06.03.2009 um 11:56 Uhr (0)
Dann gibt es noch die alte *ERROR* Funktion. Ggf. wird diese durch ein Lisp-Makro umdefiniert und nicht wirder korrekt restauriert. Dann einfach Über(DEFUN *ERROR* nil)auf die Standardarderrorroutine zurücksetzen.------------------Mit freundlichem GrußUdo Hübnerwww.CAD-Huebner.de
|
| In das Form Lisp wechseln |
|
Lisp : Fehlerhandling in Autolisp
CADmium am 06.03.2009 um 12:18 Uhr (0)
Zitat:Original erstellt von CAD-Huebner:Dann gibt es noch die alte *ERROR* Funktion. Ggf. wird diese durch ein Lisp-Makro umdefiniert und nicht wirder korrekt restauriert. Dann einfach Über(DEFUN *ERROR* nil)auf die Standardarderrorroutine zurücksetzen.besser ist (setq *ERROR* nil) ------------------ - Thomas -"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."
|
| In das Form Lisp wechseln |
|
Lisp : Grösste Zahl in einer Liste
archtools am 09.03.2009 um 21:08 Uhr (0)
Zitat:Original erstellt von Steff179:hmmm ich beanspruche dieses forum ja gerade ein wenig intesnsiv ich hoffe nicht zu intensiv...(nentsel) "gewährt Zugriff auf die Definitionsdaten, die in einem komplexen Objekt enthalten sind."(ssname) leider nicht wie ich das sehe...das heisst ich lege mir ein set an mit (ssget) und würde dann aber gerne wie mit (nentsel) auf die einzelnen elemente zugreifen...kann mir da einer einen tipp geben?Ein Auswahlsatz ist kein "komplexes Zeichnungsobjekt". Mit NENTSEL kannst ...
|
| In das Form Lisp wechseln |
|
Lisp : _XLINE
Theodor Schoenwald am 06.03.2009 um 11:02 Uhr (0)
Hallo,wenn ich bei ACAD2000 in der Befehlszeile:(command "_xline" "_Offset")eingebe, werde ich nach dem Abstand gefragt, es funktioniert alles wie es sein soll.Wenn ich nun die gleiche Zeile in einer Lisp-Datei verwende, werde ich "nicht" nach dem Abstand gefragt und der Befehl wird ohne inrgend einer Abfrage abgeschlossen. Es passiert also nichts.Mache ich bei so einem einfachen Befehl falsch?GrußTheodor
|
| In das Form Lisp wechseln |
|
Lisp : Summarry-Info Prüfen
Theo37 am 09.03.2009 um 11:14 Uhr (0)
Hallo an Alle,ich hab mal wieder ein kleines Problem in Lisp.(defun c:John (oben unten) (setq doc (vla-get-ActiveDocument (vlax-get-Acad-Object))) (setq db (vla-get-Database doc)) (setq si (vla-get-SummaryInfo db)) (vla-AddCustomInfo si "NEB-Bezeichnung oben" oben) (vla-AddCustomInfo si "NEB-Bezeichnung unten" unten) (vlax-release-object si) (vlax-release-object db) (vlax-release-object doc))Die oben stehnden Programmzeilen funktionieren einwandfrei. Nur wenn es "NEB-Bezeichnung oben" und "NEB-Bezeichnung ...
|
| In das Form Lisp wechseln |
