 |
Lisp : Import Layer aus Fremd-dwg über Lisp
cadplayer am 25.06.2012 um 15:33 Uhr (0)
hier noch ein Bildchen vom Suchpfad in Optionen für das Laden deiner dwt-vorlage ------------------Gruss Dirk
|
| In das Form Lisp wechseln |
|
Lisp : Import Layer aus Fremd-dwg über Lisp
cadplayer am 25.06.2012 um 15:38 Uhr (0)
Sorry gleich gepostet, leg doch deine blöcke bspw. unter c:meine Blöcke und dann trägst du den Suchpfad zusätzlich in deine Optionen ein.Wie man allerding aus einer bestehenden dwg. Layer und Blöcke rausziehen kann, weiss ich nicht bzw. müsste ich ein wenig überlegen.------------------Gruss Dirk
|
| In das Form Lisp wechseln |
|
Lisp : Import Layer aus Fremd-dwg über Lisp
CADmium am 25.06.2012 um 15:54 Uhr (0)
das geht via activeX und DBX-SERVER und die Methode vla-copyobjects .... sicherlich wird du damit im www fündig .... z.B. http://ww3.cad.de/foren/ubb/Forum54/HTML/022852.shtml#000005------------------ - 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 : Import Layer aus Fremd-dwg über Lisp
wronzky am 25.06.2012 um 16:40 Uhr (0)
Axel hatte das mal HIER für Views dargestellt. Mußt Du nur entsprechend anpassen.Grüsse, Henning------------------Henning JesseVoxelManufakturComputer-Dienstleistungen für Architekten und Ingenieure http://www.voxelman.de
|
| In das Form Lisp wechseln |
|
Lisp : Import Layer aus Fremd-dwg über Lisp
CADblue am 25.06.2012 um 17:17 Uhr (0)
jo danke so weit euch beidenhab bisschen geforstet und das hier gefunden,Code:(defun c:hollayer (/ oAcad oCurDoc strFile oOpenDoc oOpenDocLayers lstObj oLayer array) (setq oAcad (vlax-get-acad-object)) (setq oCurDoc (vla-get-ActiveDocument oAcad)) (setq strFile (getfiled "Zeichnung wählen:" (getvar "DWGPREFIX") "dwg" 0)) (setq oOpenDoc (vla-Open (vla-get-documents oAcad) strFile)) (setq oOpenDocLayers (vla-get-layers oOpenDoc)) (setq lstObj nil) (vlax-for oLayer oOpenDocLayers (setq lstObj (cons oLayer ls ...
|
| In das Form Lisp wechseln |
|
Lisp : Neue .DWG erstellen
fewoer am 26.06.2012 um 11:04 Uhr (0)
Hallöchen,ich rätsele gerade rum, wieso mein LISP-Code hier nicht funktioniert. Wenn ich die Kommandos in die Befehlszeile eingebe, dann funktioniert es - aber eben nicht als LISP-Routine.Ich möchte einfach nur eine neue Zeichnung aus einem standdardmäßig eingestellten Template erstellen.(defun c:neuedwg(/) (command "_filedia" "0") (command "_.new" "") (command "_filedia" "1"))Weiß vielleicht von euch jemand, woran das liegen könnte?Danke schonmal für eure Hilfe, lieben Gruß!
|
| In das Form Lisp wechseln |
|
Lisp : Neue .DWG erstellen
fewoer am 26.06.2012 um 11:52 Uhr (0)
Ah, super danke! Jetzt hab ich das verstanden, dann muss ich mir wohl etwas anderes überlegen - dann funktioniert mein Vorhaben wohl nicht mit LISP
|
| In das Form Lisp wechseln |
|
Lisp : Neue .DWG erstellen
cadffm am 26.06.2012 um 11:12 Uhr (0)
Zwei Antworten gibt es dazu:Du bist NICHT im SingleDocumentModus(SDI=1) und deine Datei befindet sich im gespeicherten Zustand,denn dann würde ein "Lisp Script" funktionieren.oder die Variante mit der du mehr anfangen kannst:Im MultiDocumentModus(SDI=0) leben deine Lispfunktionen und Variablen nur im Namensraum der aktuellen Datei und bei der Anweisung (command "_.new" verlässt du diesen ja.Dein Funktion steht nicht zur Verfügung in der neuen Datei und wird dort dann auch nicht fortgeführt..--------------- ...
|
| In das Form Lisp wechseln |
|
Lisp : Neue .DWG erstellen
fewoer am 26.06.2012 um 13:50 Uhr (0)
Eigentlich ist es nicht viel - es geht nur darum einen Knopf zu erstellen, der vom Benutzer markierte Objekte eines 3D-Modells in eine leere DWG kopiert, anschließend aufbricht und sie dann unter Aufforderung eines Dateinamens abspeichert. Aber dazu müsste ich doch 2 Zeichnungen offen haben und zwischen denen Objekte hin- und herkopieren - und das geht ja dann irgendwie mit LISP allein nicht mehr?
|
| In das Form Lisp wechseln |
|
Lisp : INITGET und GETKWORD klappen nicht
wronzky am 26.06.2012 um 22:58 Uhr (0)
...erklären kann ichs nicht, aber das Ganze am Prompt auszuführen macht ja auch keinen Sinn. Innerhalb eines Lisp-Codes läufts:Code:(progn (initget "Abc Def _Ghi Jkl") (getkword "Enter an option (Abc/Def): "))HTH, Henning------------------Henning JesseVoxelManufakturComputer-Dienstleistungen für Architekten und Ingenieure http://www.voxelman.de
|
| In das Form Lisp wechseln |
|
Lisp : Drehe Block und verschiebe Attribut
spider_dd am 27.06.2012 um 16:55 Uhr (0)
Zitat:Original erstellt von cadplayer:Es kam aber zu einem guten Nebeneffekt, dass ich den Block am Bildschirm drehen kann und er solange gedreht wird bis ich einen Punkt anklicke. Vorher warst Du aber mit einem Fehler aus dem Lisp-Prog rausgeflogen. Zumindest bei mir kommt eine entsprechende Fehlermelung.Code:Befehl: RBSelect block! _ucsAktueller BKS-Name: *WELT*Ursprung des neuen BKS angeben oder [FLäche/bENannt/Objekt/VOrher/ANsicht/Welt/X/Y/Z/ZAchse] Welt: _objectObjekt für BKS-Ausrichtung wählen:Befeh ...
|
| In das Form Lisp wechseln |
|
Lisp : wozu eigentlich Lisp Dateien
Meldin am 03.07.2012 um 11:23 Uhr (0)
Hallo,wie mein Vorredner würde ich dir erst einmal raten eine Datei in die Startgruppe zu legen in der du alles ablegst was du zusammen schreibst. Daher brauchst du dann auch nur die Datei einmal einbinden und sie wird halt immer geladen sein.Und ich würde auch lieber eine Änderung im Code in einem recht übersichtlich angelegten Editor wo sich auch farblich alles abhebt ändern als in einer ewig langen Zeile. ------------------Gruß Wolfgang Alias: Rabbit007 und Wolli1 die aus unerklärlichen Gründen aus de ...
|
| In das Form Lisp wechseln |
|
Lisp : Objekt Spline / Umfang und Länge
Bernd10 am 28.06.2012 um 12:02 Uhr (0)
Hallo Henning,danke für Deine Antwort.Zitat:Original erstellt von wronzky:der Befehl Fläche / _Area speichert die ermittelten Werte von Länge und Fläche in Systemvariablen ab, die Du anschließend auslesen kannst:Code: (command "_area" "_o" pause) (prompt (strcat "
Fläche: " (vl-prin1-to-string (getvar "area")) "
Länge: " (vl-prin1-to-string (getvar "perimeter"))))Durch Deine Informationen kann ich die gewünschten Werte ermitteln.Ich verwende bereits zur Ermittlung der Fläche die Funktion vla-get-area. Ic ...
|
| In das Form Lisp wechseln |
