|
Lisp : Zeichnung als Block einfügen
Nano am 05.11.2013 um 17:35 Uhr (1)
Sorylisp war nicht richtig..Nano
|
| In das Form Lisp wechseln |
|
Lisp : Zeichnung als Block einfügen
Nano am 05.11.2013 um 17:46 Uhr (1)
JA JA JA Wieselhabe noch eine Variable vergessen, darf doch nicht sein.MFG nano
|
| In das Form Lisp wechseln |
|
Lisp : Zeichnung als Block einfügen
Nano am 05.11.2013 um 11:07 Uhr (1)
HalloHabe hier ein Lisp der mir ein Kanalbogen zeichnet,möchte gerne diese als Block einfügen.Wäre froh für eine Lösung, Danke.Starten mit: L005B1Nano
|
| In das Form Lisp wechseln |
|
Lisp : Zeichnung als Block einfügen
Nano am 06.11.2013 um 09:11 Uhr (1)
Danke WieselGENIAL!!!! kurz und bündig.Danke noch für all diese Jahren bis DU immer HILFSBEREIT.Ich schau noch in dein Forum.Nano
|
| In das Form Lisp wechseln |
|
Lisp : Layer-Leichen eliminieren
Nano am 12.12.2006 um 11:20 Uhr (0)
HalloMit Hilfe von Jörn konnte ich eine Bau-Zeichnung konvertieren,die mit verschachtelte Blöcke versehen waren.Nach der Konvertierung sind jedoch noch Layers auf der Zeichnung,die keine Elementen beinhalten.Habe es versucht mit Bereinigung der Zeichnung. GEHT NICHT!Nur mit Layerkonverter konnte ich die Layer-Leichen auf Layer "0" setzten.Kann mir Jemand helfen, wie ich mit ein Lisp-Programm die Leichen eliminieren kann??????Als Beilage die Zeichnung (zip-Datei).Gruss Nano
|
| In das Form Lisp wechseln |
|
Lisp : Dynamischer Block
Nano am 08.05.2009 um 19:20 Uhr (0)
HalloIst es möglich in einer Zeichnung (Zeichnung in der Beilge) die ein dynamicher Block (Namen: L-K-ZUL) mehrmals vorhanden ist,der ausgewählten Dyn. Block die Layer zu ändern?Beilage: Dyn.txt Dyn.dwgGruss Nano
|
| In das Form Lisp wechseln |
|
Lisp : Dialogfenster Open (command open)
Nano am 22.06.2007 um 12:27 Uhr (0)
Hallo bei (command "open") muss mann immer ein Pfad eingeben mit datei.dwgoder kann man vom Dialogfenster die Zeichnung wählen?Das Dialogfenster geht im richtigen Ordner auf.Nach der Wahl der Zeichnung (mit Doppelklick)bekomme ich die Meldung: Unbekannter Befehl "X:archiv63-01 F-G E04 2007-05-30.DWG".Die Zeichnung ist vorhanden.(SETQ dateiname (strcat "X:archiv"))(SETQ dateiname (getfiled "Zeichnungs-Archiv" dateiname "DWG; DXF" 4))(setvar "filedia" 0)(command "._OPEN" dateiname)(setvar "filedia" 1)Grus ...
|
| In das Form Lisp wechseln |
|
Lisp : Dynamischer Block
Nano am 09.05.2009 um 09:17 Uhr (0)
Ist es möglich in einer Zeichnung (Zeichnung in der Beilge) die ein dynamicher Block (Namen: L-K-ZUL) mehrmals vorhanden ist,der ausgewählten Dyn. Block die Layer zu ändern?Gruss NanoLisp v. Forum: änder alle Blöcke.(DEFUN C:AL (/ Jblock blk blkdaten)(setq Jblock (tblnext "BLOCK" t))(while Jblock (setq blk (tblobjname "BLOCK" (cdr (assoc 2 Jblock))))(while (setq blk (entnext blk))(if (= (cdr (assoc 8 (entget blk))) "L_ZUL") (entmod (AL1 (entget blk)))))(setq Jblock (tblnext "BLOCK")))(command "_.regen"))(D ...
|
| In das Form Lisp wechseln |
|
Lisp : Dialogfenster Open (command open)
Nano am 22.06.2007 um 13:09 Uhr (0)
HalloMöchte aus Dialogfeld die Zeichnung öffnen mit Doppelklick.Mit diesem Befehl muss man vorraus wissen welche dwg-Datei.(command "vbastmt" (strcat"AcadApplication.Documents.Open" (chr 34)"C: est.dwg" (chr 34) ))Die Beiträge habe ich auch schon gesehen.Wie schon gesagt: Dialogfeld geht auf, die Zeichnungen sind aufgelistet aber mit Doppelklick geht die Datei (dwg) nicht auf.GrussNano
|
| In das Form Lisp wechseln |
|
Lisp : Attributen werden nicht angezeigt?
Nano am 23.02.2007 um 07:47 Uhr (0)
HalloHabe eine Zeichnung mit Attributen.Diese Attributen werden nicht angezeigt.Habe folgende Befehle durchgeführt.1. (setvar "attmode" 1)2 (setvar "aflags" 16)3. attzeig auf normaltrotzdem werden die Attributen nicht angezeigt.In der Hilfe habe nichts gefunden.Hat Jemand ein Tip.Gruss Nano
|
| In das Form Lisp wechseln |
|
Lisp : autocad-farbfenster aufrufen
Nano am 08.12.2007 um 13:47 Uhr (0)
Hallo Thomas Farbfenster aufrufen, dass der Benützer die Farbe auswählen kannum den xRef-Zeichnung zu zuweissen.Habe schon Lisp mit DCL gemacht, dass mir die Liste der xRef-Zeichnungen anzeigt und der Benützer kann dieser wählen.Thomas habe dies eingegeben, das Farbfenster erscheint nicht.Was habe ich falsch gemacht???(acad_truecolordlg color [allowbylayer] [currentlayercolor])Gruss Nano
|
| In das Form Lisp wechseln |
|
Lisp : Block kann nicht aufgelöst werden
Nano am 19.02.2007 um 09:01 Uhr (0)
Hallo Habe hier eine Zeichnung mit einem Block.Dieser Block kann man nicht auflösen(ursprung),weiss aber nicht warum.Hat Jemand ein TIP??? (defun test() (SETQ ss2 (ssget "_X" ((0 . "INSERT")))) (IF (/= ss2 NIL) (PROGN (setq sslen (sslength ss2) j 0) (while ( j sslen) (setq temp (ssname ss2 j)) (setq j (1+ j)) (vl-cmdf "_.explode" temp) ) ) ) (SETQ ss2 (ssget "_X" ((0 . "INSERT")))) (IF (/= ss2 NIL)(test)))Gruss Nano
|
| In das Form Lisp wechseln |
|
Lisp : Alle Wipeout löschen AUCH in Blöcke
Nano am 01.02.2011 um 13:20 Uhr (0)
Hallohabe hier ein lisp die mir alle Wipeout löschen kann,habe jedoch in der Zeichnung ein Block der mehrere Wipeouts hatdie möchte ich auch löschen. habe im Forum nichts gefunden.Bitte um HilfeDanke Nano(defun C EL-W()(SETQ aimagep (SSGET "_X" ((0 . "WIPEOUT"))))(IF (/= aimagep nil)(COMMAND "_erase" aimagep "")))oder(defun C EL-W (/ SGET) (setq sget (ssget "x")) (sssetfirst sget sget) (setq SGET (ssget "x" (list (cons 0 "WIPEOUT")))) (if SGET (command "_.erase" SGET "") ))
|
| In das Form Lisp wechseln |
