|
Lisp : Durchmesserzeichen
CAD-Huebner am 12.09.2006 um 16:18 Uhr (0)
Zitat:Original erstellt von Zec:hallo,es klappt bis zur auswahl besätigen und dann : ; Fehler: no function definition: VLAX-ENAME-VLA-OBJECTgrußzecDann muss einmalig in einem Lisp-Programm die Active X Schnittstelle von Lisp initialisiert werden mit dem BefehlCode:(vl-load-com)Am besten in der ersten Zeile des Lisp Quelltexte einfügen.------------------Mit freundlichem GrußUdo Hübner
|
| In das Form Lisp wechseln |
|
Lisp : Lisp command _explode ergänzen
BBecker am 12.09.2006 um 17:39 Uhr (0)
Hallo,die folgende Lisp-Routine wurde von Cadmium 2004 ins Forum gestellt:(setq auswahl (ssget "X" (list (cons 0 "INSERT")(cons 2 "tuer"))))(repeat(sslength AUSWAHL) (command "_explode" (setq OBJ(ssname AUSWAHL 0)) "") (ssdel OBJ AUSWAHL))Leider wird nach dem Ausführen der Befehl wiederholt. Kann man das irgendwie abstellen oder muß eine Systemvariable gesetzt werden, damit die Wiederholung nicht ausgeführt wird? Die Routine wäre dann perfekt für mich.Lieben Gruß Beate
|
| In das Form Lisp wechseln |
|
Lisp : Lisp command _explode ergänzen
Paulchen am 12.09.2006 um 17:48 Uhr (0)
Hallo Beate,WELCHER Befehl wird wiederholt? Falls das _explode sich wiederholt - kurz und ungetestet: Mach mal ausCode:(command "_explode" (setq OBJ(ssname AUSWAHL 0)) "")(command "_explode" (setq OBJ(ssname AUSWAHL 0)))ohne die "". Hoffe, das hilft?!Frederik
|
| In das Form Lisp wechseln |
|
Lisp : Lisp command _explode ergänzen
BBecker am 13.09.2006 um 09:56 Uhr (0)
Hallo Frederik,zu Deiner Frage welcher Befehl wird wiederholt: das Dialogfenster _appload wird geöffnet.Leider weiß ich nicht wie ich die beiden Zeilen anwenden soll, sorry.Danke und GrußBeate
|
| In das Form Lisp wechseln |
|
Lisp : Lisp command _explode ergänzen
Paulchen am 13.09.2006 um 10:18 Uhr (0)
Hallo Beate,die Sache mit _appload kann ich leider nicht nachvollziehen. Wenn ich bei mir diesenCode:(defun testauswahl (/ auswahl obj);lokale Variablen!(setq auswahl (ssget "X" (list (cons 0 "INSERT")(cons 2 "tesblock"))))(repeat(sslength AUSWAHL) (command "_explode" (setq OBJ(ssname AUSWAHL 0))) (ssdel OBJ AUSWAHL)))eingebe, so löst er alle Blöcke mit dem Namen "testblock" auf.Die "" in der 5. Zeile habe ich entfernt, da ACAD sonst den letzten Befehl erneut aufruft (entspricht [Enter] oder [Leertaste]). ...
|
| In das Form Lisp wechseln |
|
Lisp : Lisp command _explode ergänzen
BBecker am 13.09.2006 um 14:17 Uhr (0)
Super, danke, funktioniert bestens.Gruß Beate
|
| In das Form Lisp wechseln |
|
Lisp : Lisp command _explode ergänzen
marc.scherer am 13.09.2006 um 14:29 Uhr (0)
Hi,kurz und schmerzlos:Code:(if (setq AUSWAHL (ssget "X" (list (cons 0 "INSERT") (cons 2 "tuer")))) (progn (setq ALT-QAFLAGS (getvar "qaflags")) (setvar "qaflags" 1) (command "_explode" AUSWAHL "") (setvar "qaflags" ALT-QAFLAGS) ))Oder schick und sicher mit Rückmeldung und variabel:Aufruf in Deinem Fall dann mit:Code:(INSERTSEXPLODE "tuer")Variabel, weil man die Funktion auch mit allem füttern könnte was wcmatch so verarbeiten kann:Code:(INSERTSEXPLODE "tuer,fenster,schriftfeld")(INSERTSEXPLODE "*")Und ...
|
| In das Form Lisp wechseln |
|
Lisp : Lisp command _explode ergänzen
CADmium am 13.09.2006 um 14:37 Uhr (0)
OT: Da ich ja auch loben soll : Fein Marc! Gibt n Bienchen!------------------ - 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 : Funktion OSNAP in Intellicad (Bricscad)
s.wickel am 13.09.2006 um 15:57 Uhr (0)
esnap ist lediglich der entsprechende Name zu ACADs Osnap im Programm. Als Lisp-funktion gehts nicht. Osnap ist in Bricscad bekannt, denn es wird kein Fehler gemeldet. Aber als Rückgabe kommt immer nur NIL.Vielleicht weiß jemand einen Weg diesen Befehl zu umgehen?Stefan
|
| In das Form Lisp wechseln |
|
Lisp : Lisp command _explode ergänzen
CADwiesel am 14.09.2006 um 07:32 Uhr (0)
Ja, toll, woll!aber das mit 2000 hasde ja immer noch nicht geändert. 2000 braucht kein Argument weniger.------------------Gruß CADwieselBesucht uns im CHAT
|
| In das Form Lisp wechseln |
|
Lisp : Lisp command _explode ergänzen
marc.scherer am 14.09.2006 um 11:30 Uhr (0)
Hi CADwiesel,vielen Dank für den Tip. Dann habe ich wohl etwas falsch verstanden.Ich hab den Code jetzt geändert. Kannst Du mal verifizieren, dass der Code auch unter R2000/i läuft?------------------Ciao,Marc
|
| In das Form Lisp wechseln |
|
Lisp : Durchmesserzeichen
marc.scherer am 14.09.2006 um 12:24 Uhr (0)
Öh, gehe ich recht in der Annahme das die Datei in der die Funktionsetd4pre definiert ist den Namen %%C.lsp trägt?Warum heißt die Datei nicht so wie die Funktion? setd4pre.lspNa egal,versuch mal folgendes Makro (wenn die Lisp Datei denn %%C heißt):Code:^C^C(if(null C:SETD4PRE)(load "%%C"))(princ);setd4pre;In Deinem Code sind Leerzeichen enthalten, die werden genau wie ; als ENTER interpretiert. Da liegt IMHO der Fehler.------------------Ciao,Marc
|
| In das Form Lisp wechseln |
|
Lisp : Lisp command _explode ergänzen
BBecker am 14.09.2006 um 12:26 Uhr (0)
@Marc,vielen Dank für die beiden Versionen. Die kurze klappt perfekt. Die längere und sichere leider nicht. Die lange Routine wäre gut, wenn sich unser Kunde wieder etwas neues ausdenkt.Gruß Beate
|
| In das Form Lisp wechseln |
