| |
| Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
Autor
|
Thema: Zeichnungseigenschaften importieren / exportieren (4760 / mal gelesen)
|
Tobier Mitglied
Beiträge: 23 Registriert: 17.07.2007 AutoCAD 2015 Civil 2017
|
erstellt am: 31. Jul. 2017 08:20 <-- editieren / zitieren --> Unities abgeben:
Hallo zusammen, ich habe leider in der Suche nichts gefunden, ich hoffe die Frage wurde noch nicht gestellt: Unter Datei -> Zeichnungseigenschaften lassen sich ja benutzerdefinierte Werte eintragen, die dann z.B. in verschiedenen Layouts angezeigt werden. Das funktioniert recht gut und wird von mir/uns auch so praktiziert. Ist es möglich, diese Werte z.B. in eine xml - Datei zu exportieren oder z.B. als xml - Datei zu importieren? Es geht darum, dass bestimmte, projektspezifische Daten bei uns in einer Datenbank verwaltet werden, die dann auch im Layout im Schriftfeld erscheinen. Es wäre toll, wenn wir diese Werte irgendwie "auf Knopfdruck" aus der Datenbank exportieren und in die DWG importieren könnten. Geht das? Wir benutzen AutoCAD 2015 und Civil 2017. Danke und viele Grüße Tobias [Diese Nachricht wurde von Tobier am 31. Jul. 2017 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Brischke Ehrenmitglied V.I.P. h.c. CAD on demand GmbH
Beiträge: 4171 Registriert: 17.05.2001 AutoCAD 20XX, defun-tools
|
erstellt am: 31. Jul. 2017 08:41 <-- editieren / zitieren --> Unities abgeben: Nur für Tobier
Hallo Tobias, das funktioniert mit Bordmitteln nicht. Mit einer kleinen Programmierung wäre das jedoch möglich. Wenn man schon programmiert, ist der Umweg über eine XML-Datei nicht notwendig. Dann kann man die Daten auch gleich in die Datenbank schreiben oder von dort lesen und spart sich die ganze Synchronisation der Info's zwischen der Zeichnung <-> XML <-> Datenbank. Grüße! Holger
------------------ Holger Brischke CAD on demand GmbH Individuelle Lösungen von Heute auf Morgen.
defun-tools Das Download-Portal für AutoCAD-Zusatzprogramme!
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Tobier Mitglied
Beiträge: 23 Registriert: 17.07.2007 AutoCAD 2015 Civil 2017
|
erstellt am: 31. Jul. 2017 09:32 <-- editieren / zitieren --> Unities abgeben:
|
cadwomen Ehrenmitglied V.I.P. h.c. Mädchen für fast alles
Beiträge: 2966 Registriert: 26.08.2002 ACAD R11 - 2022 (Plant3D) AVIS ACAD LT 2013- 2021 ZWCAD 2015 Versuch "nun ja" [s]History P3D 2012/(13) SP und Hotfix([/s]<P> Windows 10 / 64 Bit Xeon CPU 3.5GHz 16GB Ram NVIDIA Quadro P2000 3x Dell TV100 88P Monitore
|
erstellt am: 31. Jul. 2017 11:58 <-- editieren / zitieren --> Unities abgeben: Nur für Tobier
|
CADuceus Mitglied LWL-Netzplaner GIS
Beiträge: 358 Registriert: 20.01.2005 LWL Netzplanung AutoCAD Map 3D 2020 Win10 64bit / Chrome Intel® Core™ i7-4770K 3.50GHz / 32GB NVidia Quadro P400 HP DesignJet T795
|
erstellt am: 06. Okt. 2017 17:37 <-- editieren / zitieren --> Unities abgeben: Nur für Tobier
Hab den Thread erst jetzt gesehen. Mein Lisp-Gebastel hier kopiert bzw. liest die benutzerdefinierten Zeichnungseigenschaften "Haupttitel", "Untertitel" und "Plannummer". Diese Namen muss man also so ändern oder ergänzen, dass sie den eigenen Eigenschaften entsprechen. ; dinfo ; Lisp zum Kopieren und Einfügen von benutzerdefinierten Zeichnungseigenschaften ; "dinfo_exp" -> schreibt die Zeichnungseigenschaften in eine Textdatei ; "dinfo_imp" -> kopiert die Zeichnungseigenschaften aus der Textdatei in die Zeichnung
(defun dinfo (/ dProbs) (setq INFOFILE "c:\\Temp\\dwginfo.txt"); <- Speicherort (vl-load-com) (setq acadObject (vlax-get-acad-object)) (setq acadDocument (vla-get-ActiveDocument acadObject)) (setq dProps (vlax-get-Property acadDocument 'SummaryInfo)) (vla-getCustomByKey dProps "Haupttitel" 'HAUPTTITTEL) (vla-getCustomByKey dProps "Untertitel" 'UNTERTITEL) (vla-getCustomByKey dProps "Plannummer" 'PLANNUMMER) (defun currinfo (/) (princ "\n") (princ (strcat "Haupttitel = " HAUPTTITTEL "\n")) (princ (strcat "Untertitel = " UNTERTITEL "\n")) (princ (strcat "Plannummer = " PLANNUMMER "\n")) ) ;; Befehl zum Exportieren der Datei-Infos in eine Textdatei (defun c:dinfo_exp (/ FW) (dinfo) (setq FW (open INFOFILE "w")) (prin1 (LIST (cons "Haupttitel" HAUPTTITTEL) (cons "Untertitel" UNTERTITEL) (cons "Plannummer" PLANNUMMER) ) FW ) (close FW) (currinfo) ) ;; Befehl zum Importieren der Datei-Infos (defun c:dinfo_imp (/ FR) (dinfo) (setq FR (open INFOFILE "r")) (setq IMPORT (read (read-line FR))) (close FR) (vla-setCustomByKey dProps "Haupttitel" (cdr (assoc '"Haupttitel" IMPORT)) ) (vla-setCustomByKey dProps "Untertitel" (cdr (assoc '"Untertitel" IMPORT)) ) (vla-setCustomByKey dProps "Plannummer" (cdr (assoc '"Plannummer" IMPORT)) ) (dinfo) (currinfo) ) ------------------ Du kannst in anderen nur entzünden, was in Dir selber brennt! Wollte noch ein File anhängen, aber habe die Kiste schon heruntergefahren. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Basket4u Mitglied
Beiträge: 20 Registriert: 25.01.2018 AutoCad MEP 2020
|
erstellt am: 25. Jan. 2018 12:34 <-- editieren / zitieren --> Unities abgeben: Nur für Tobier
Hallo, ich habe die LISP ausprobiert und bekomme die Meldung "Falsch formartierte Liste in Eingabe" nach erfolgreichen Laden. Habe den gesamten Code so kopiert und erstmal nichts verändert zum Testen. DWG-Eigenschaften habe ich gleich der Lisp angelegt sprich Haupttittel, Untertitel und Plannummer Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
cadffm Moderator 良い精神
Beiträge: 21533 Registriert: 03.06.2002 System: F1 und Google
|
erstellt am: 25. Jan. 2018 12:46 <-- editieren / zitieren --> Unities abgeben: Nur für Tobier
|
Basket4u Mitglied
Beiträge: 20 Registriert: 25.01.2018 AutoCad MEP 2020
|
erstellt am: 25. Jan. 2018 15:00 <-- editieren / zitieren --> Unities abgeben: Nur für Tobier
|
Wolfgang Kirsch Mitglied Büroberater
Beiträge: 41 Registriert: 29.04.2002
|
erstellt am: 26. Jan. 2018 09:06 <-- editieren / zitieren --> Unities abgeben: Nur für Tobier
@ CADuceus: Das Progi funzt prima, danke dafür. @ Basket4u: im Programmcode wird auf die "benutzerspezifischen "Eigenschaften" der Zeichnung verwiesen. Die sind natürlich zunächst leer und müssen erst gefüllt werden, vorher ist da schlicht nix was ausgelesen werden kann. Und deswegen wird der Schlüssel auch nicht gefunden. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
cadffm Moderator 良い精神
Beiträge: 21533 Registriert: 03.06.2002 System: F1 und Google
|
erstellt am: 26. Jan. 2018 11:42 <-- editieren / zitieren --> Unities abgeben: Nur für Tobier
|
Basket4u Mitglied
Beiträge: 20 Registriert: 25.01.2018 AutoCad MEP 2020
|
erstellt am: 29. Jan. 2018 11:24 <-- editieren / zitieren --> Unities abgeben: Nur für Tobier
Ich habe jetzt gemerkt woran es liegt. Ich dachte ich könnte eigenschaften exportieren und und in einer neuen dwg importieren also eigenschaft erzeugen und wert einsetzen bzw es ging mir mehr ums erzeugen dies scheint aber wohl nicht zu gehen. Sorry für die Verwirrung. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CADmium Moderator Maschinenbaukonstrukteur
Beiträge: 13508 Registriert: 30.11.2003 Hinweis: Meine Mitarbeit auf CAD.DE ist fakultativ, unentgeltlich und beruht nur auf einem ausgeprägtem Helfersyndrom.
|
erstellt am: 29. Jan. 2018 12:55 <-- editieren / zitieren --> Unities abgeben: Nur für Tobier
|
CADuceus Mitglied LWL-Netzplaner GIS
Beiträge: 358 Registriert: 20.01.2005 LWL Netzplanung AutoCAD Map 3D 2020 Win10 64bit / Chrome Intel® Core™ i7-4770K 3.50GHz / 32GB NVidia Quadro P400 HP DesignJet T795
|
erstellt am: 30. Jan. 2018 11:41 <-- editieren / zitieren --> Unities abgeben: Nur für Tobier
Hallo zusammen @cadffm: Danke für verloren gegangene Klammer. Und ja, es ist so: Das Lisp erzeugt keine neuen Namen in den Eigenschaften und es liest auch keine Namen (und deren Werte) aus, die nicht im Lisp genannt sind. Die Namen müssen zuerst selbst in den Dateieigenschaften definiert werden UND dann sind die gleichen Namen im Lisp zu verwenden. Will man den Wert eines Namens dann in eine neue DWG kopieren, muss der Name auch dort bereits vorhanden sein, sonst bricht das Lisp ab. Dass nur bestimmte (und nicht alle) Eigenschaften kopiert werden habe ich bewusst so gemacht, weil viele Eigenschaften wirklich nur diese Datei betreffen und in anderen Dateien nichts verloren haben. Freut mich wenns brauchbar ist. ------------------ Du kannst in anderen nur entzünden, was in Dir selber brennt! Wollte noch ein File anhängen, aber habe die Kiste schon heruntergefahren. [Diese Nachricht wurde von CADuceus am 30. Jan. 2018 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CADadler Mitglied Zeichner
Beiträge: 9 Registriert: 12.05.2018 ACAD 2013<P>Win 7 64bit Win 10 64bit
|
erstellt am: 17. Mai. 2018 12:12 <-- editieren / zitieren --> Unities abgeben: Nur für Tobier
Guten Tag Zusammen, als erstes möchte ich mich für alles bedanken was in dieser Community alles diskutiert wurde, ich habe sehr viel gelernt. CADuceus vielen dank für dein LISP funktioniert super. hierzu eine frage: meine DWG´s sind immer Auftrags bezogen in nem Ordner gespeichert. wie müsste ich diese zeile "(setq INFOFILE "c:\\Temp\\dwginfo.txt"); <- Speicherort" umschreiben damit immer die .txt geladen wird die in dem entsprechenden Ordnerpfad gespeichert ist? habe noch nicht genügend wissen mit LISP zu Programmieren bin aber sehr bemüht es zu lernen geht z.b. DWGpräfix oder ähnliches? vielen Dank im Vorraus für deine Antwort mfg Stefan Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
cadffm Moderator 良い精神
Beiträge: 21533 Registriert: 03.06.2002 System: F1 und Google
|
erstellt am: 17. Mai. 2018 12:50 <-- editieren / zitieren --> Unities abgeben: Nur für Tobier
Wenn die TXT in den selben Ordner soll wie die aktuelle DWG, dann ist es einfach. (setq INFOFILE (strcat (getvar 'DWGPREFIX) "dwginfo.txt")) Sollte es ein andere Ordner sein, so müßtest du die logik ermitteln wie das Programm zu dieser Ordnerinformation kommen kann. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CADadler Mitglied Zeichner
Beiträge: 9 Registriert: 12.05.2018 ACAD 2013<P>Win 7 64bit Win 10 64bit
|
erstellt am: 17. Mai. 2018 13:53 <-- editieren / zitieren --> Unities abgeben: Nur für Tobier
|
CADadler Mitglied Zeichner
Beiträge: 9 Registriert: 12.05.2018 ACAD 2013<P>Win 7 64bit Win 10 64bit
|
erstellt am: 17. Mai. 2018 15:27 <-- editieren / zitieren --> Unities abgeben: Nur für Tobier
|
CADadler Mitglied Zeichner
Beiträge: 9 Registriert: 12.05.2018 ACAD 2013<P>Win 7 64bit Win 10 64bit
|
erstellt am: 17. Mai. 2018 15:28 <-- editieren / zitieren --> Unities abgeben: Nur für Tobier
|
CADadler Mitglied Zeichner
Beiträge: 9 Registriert: 12.05.2018 ACAD 2013<P>Win 7 64bit Win 10 64bit
|
erstellt am: 17. Mai. 2018 15:29 <-- editieren / zitieren --> Unities abgeben: Nur für Tobier
|
Epi-Zentrum Mitglied Konstrukteur
Beiträge: 211 Registriert: 25.01.2016 Windows 10, Dell Precision 7720 64-Bit; Intel Core i7 - 7920HQ 3,1GHz;Nvidia Quadro p4000; PLANT 3D 2017; Advanced Steel 2017
|
erstellt am: 19. Jun. 2019 10:12 <-- editieren / zitieren --> Unities abgeben: Nur für Tobier
Hallo Cadmium, die Lisp-Datei ist cool. Bin gerade dabei einen neuen Kopf in unserer Firma zu erstellen. Kann man dieses auch auf Zeichnung für Plant3D anwenden?
------------------ ----------------------------------------------- Gruß Steffan ----------------------------------------------- Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Epi-Zentrum Mitglied Konstrukteur
Beiträge: 211 Registriert: 25.01.2016 Windows 10, Dell Precision 7720 64-Bit; Intel Core i7 - 7920HQ 3,1GHz;Nvidia Quadro p4000; PLANT 3D 2017; Advanced Steel 2017
|
erstellt am: 19. Jun. 2019 10:13 <-- editieren / zitieren --> Unities abgeben: Nur für Tobier
Hallo Cadmium, die Lisp-Datei ist cool. Bin gerade dabei einen neuen Kopf in unserer Firma zu erstellen. Kann man dieses auch auf Zeichnung für Plant3D anwenden? ------------------ ----------------------------------------------- Gruß
Steffan ----------------------------------------------- Sorry für den Doppel Post. Mei Internet Explorer hat nicht wie sonst die Ansicht zu dem Beitrag gewechselt [Diese Nachricht wurde von Epi-Zentrum am 19. Jun. 2019 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CADmium Moderator Maschinenbaukonstrukteur
Beiträge: 13508 Registriert: 30.11.2003 Hinweis: Meine Mitarbeit auf CAD.DE ist fakultativ, unentgeltlich und beruht nur auf einem ausgeprägtem Helfersyndrom.
|
erstellt am: 19. Jun. 2019 11:30 <-- editieren / zitieren --> Unities abgeben: Nur für Tobier
|
cadwomen Ehrenmitglied V.I.P. h.c. Mädchen für fast alles
Beiträge: 2966 Registriert: 26.08.2002 ACAD R11 - 2022 (Plant3D) AVIS ACAD LT 2013- 2021 ZWCAD 2015 Versuch "nun ja" [s]History P3D 2012/(13) SP und Hotfix([/s]<P> Windows 10 / 64 Bit Xeon CPU 3.5GHz 16GB Ram NVIDIA Quadro P2000 3x Dell TV100 88P Monitore
|
erstellt am: 19. Jun. 2019 15:12 <-- editieren / zitieren --> Unities abgeben: Nur für Tobier
Zitat: Original erstellt von Epi-Zentrum: Hallo Cadmium,die Lisp-Datei ist cool. Bin gerade dabei einen neuen Kopf in unserer Firma zu erstellen. Kann man dieses auch auf Zeichnung für Plant3D anwenden?
Hy noch hat Plant auch die Benutzerdefinierten Felder sollte auch gehn , die Frage von mir wäre wozu ? du hast doch in dem Projekt bzw in deiner Projektvorlage sehr viel mehr an Möglichkeiten ? Kann auch sein das ich den Baum wieder mal nicht sehe. cu cw ------------------ Also ich finde Unities gut ... und andere sicher auch ------------------------------------------------ cadwomen™ Plant ist nur die Spitze des Berges der da treibt ? Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Saya-Cat Mitglied Bauzeichnerin
Beiträge: 9 Registriert: 20.06.2019 ACAD 2020 CIVIL 3D 2020 ACAD Map 3D 2020
|
erstellt am: 20. Jun. 2019 11:50 <-- editieren / zitieren --> Unities abgeben: Nur für Tobier
Hallo Ich bin hier neu und habe mir die Lisp zu recht geschrieben, aber wenn ich diese nun anwenden will kommt die Fehlermeldung: Fehler: Zu viele tatsächliche Parameter. Schon mal vielen Dank im voraus.
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
cadffm Moderator 良い精神
Beiträge: 21533 Registriert: 03.06.2002 System: F1 und Google
|
erstellt am: 20. Jun. 2019 12:15 <-- editieren / zitieren --> Unities abgeben: Nur für Tobier
>"Ich bin hier neu"Hi & willkommen, >"habe mir die Lisp zu recht geschrieben" Was/welche "die Lisp"? Meinst du den Code aus dieser Antwort oben(Klick!)? Dann hast du wohl beim Versuch meinem Hinweis zu folgen (siehe HIER!) die Klammer an anderer/falscher Stelle ergänzt.
>"wenn ich diese nun anwenden will kommt die Fehlermeldung: Fehler: Zu viele tatsächliche Parameter." Dann hast du mehr Parameter an eine vla-Funktion übergeben wie die Funktion erwartet.. >"Ich bin hier neu und habe mir die Lisp zu recht geschrieben," Da du deinen Versuch nicht zeigst kann man den Fehler nicht zeigen. >"Schon mal vielen Dank im voraus." Du hast wohl vergessen eine Frage zu stellen auf deren Antwort du dich vermutlich im Voraus bedanken wolltst? Angabe der Systeminformation wie Betriebssystem und Grafikkarte sind gut, die Angabe von CAD-Software Produktversion oft nötig und natürlich auch die Frage um die es geht.
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Saya-Cat Mitglied Bauzeichnerin
Beiträge: 9 Registriert: 20.06.2019 ACAD 2020 CIVIL 3D 2020 ACAD Map 3D 2020
|
erstellt am: 20. Jun. 2019 12:29 <-- editieren / zitieren --> Unities abgeben: Nur für Tobier
|
cadffm Moderator 良い精神
Beiträge: 21533 Registriert: 03.06.2002 System: F1 und Google
|
erstellt am: 20. Jun. 2019 12:35 <-- editieren / zitieren --> Unities abgeben: Nur für Tobier
|
Saya-Cat Mitglied Bauzeichnerin
Beiträge: 9 Registriert: 20.06.2019 ACAD 2020 CIVIL 3D 2020 ACAD Map 3D 2020
|
erstellt am: 20. Jun. 2019 12:41 <-- editieren / zitieren --> Unities abgeben: Nur für Tobier
|
cadffm Moderator 良い精神
Beiträge: 21533 Registriert: 03.06.2002 System: F1 und Google
|
erstellt am: 20. Jun. 2019 12:59 <-- editieren / zitieren --> Unities abgeben: Nur für Tobier
Ok, hier ist das Übel: (vla-getCustomByKey dProps "Bauvorhaben 1-1" 'BAUVORHABEN 1-1) Ein Symbolname/Variablenname können keine Leerzeichenenthalten.. Du darfst diese gerne durch einen Unterstrich ersetzen, auch empfehle ich ganz pauschal auf UMLAUTE und sonstige Sonderzeichen zu verzichten bei der Programmierung, dann passieren auch nicht aus versehen Fehler mit diesen Sonderlingen. BAUVORHABEN 1-1 sind ZWEI Argumente/Parameter
BAUVORHABEN_1-1 ist EIN Argument/Paramter Wie die Felder benannt sind ist egal, aber der Symbolname nicht -> Öffne deine DWG im VLide. Acad, Befehl: VLIDE oder VLISP. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Saya-Cat Mitglied Bauzeichnerin
Beiträge: 9 Registriert: 20.06.2019 ACAD 2020 CIVIL 3D 2020 ACAD Map 3D 2020
|
erstellt am: 20. Jun. 2019 14:05 <-- editieren / zitieren --> Unities abgeben: Nur für Tobier
Habe nun die Datei so bearbeitet, aber wenn ich den Befehl eingebe, bekomme ich nur das zu lesen Fehler: Automatisierungsfehler Schlüssel nicht gefunden. Anbei lade ich noch mal die bearbeitet Datei hoch. Langsam verzweifle ich. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CADmium Moderator Maschinenbaukonstrukteur
Beiträge: 13508 Registriert: 30.11.2003 Hinweis: Meine Mitarbeit auf CAD.DE ist fakultativ, unentgeltlich und beruht nur auf einem ausgeprägtem Helfersyndrom.
|
erstellt am: 20. Jun. 2019 14:10 <-- editieren / zitieren --> Unities abgeben: Nur für Tobier
|
Saya-Cat Mitglied Bauzeichnerin
Beiträge: 9 Registriert: 20.06.2019 ACAD 2020 CIVIL 3D 2020 ACAD Map 3D 2020
|
erstellt am: 20. Jun. 2019 14:26 <-- editieren / zitieren --> Unities abgeben: Nur für Tobier
Muss ich jetzt in meiner Zeichnung auch die "Beschreibung" anpassen, also aus Bauvorhaben 1-1 in Bauvorhaben_1-1 umbenennen? Entschuldigt wenn ich so doof nachfrage, aber ich verstehe es einfach nicht. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
cadffm Moderator 良い精神
Beiträge: 21533 Registriert: 03.06.2002 System: F1 und Google
|
erstellt am: 20. Jun. 2019 14:41 <-- editieren / zitieren --> Unities abgeben: Nur für Tobier
Du hast zuvor "zuviel" geändert.. Alles das was vorher Magenta farben war (=STRINGS), sollte so bleiben wie es war, denn das ist der Name der Einträge in DwgProps. Magenta? Öffne die LSP in dem VLide/VLisp-Editor, dann siehst du es. In deiner DWG steht jetzt "Bauvorhaben 1-1" und dein Program versucht "Bauvorhaben_1-1" auszulesen, dann kracht es weil es a) "Bauvorhaben_1-1" nicht gibt und b) keine Fehlerroutine implementiert ist. (vla-getCustomByKey dProps "Bauvorhaben_1-1" 'BAUVORHABEN_1-1)
( vla-getCustomByKey ; lese benutzerdefinierten Schlüssel aus dProps ; aus dem Objekt was mit dprops verknüpft ist "Bauvorhaben 1-1" ; der auszulesende Schlüsselname (also was in DWGPROPS steht als Name) 'BAUVORHABEN_1-1 ; und packe den ausgelesenen Wert an das Symbol/Variable BAUVORHABEN_1-1 ) Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Saya-Cat Mitglied Bauzeichnerin
Beiträge: 9 Registriert: 20.06.2019 ACAD 2020 CIVIL 3D 2020 ACAD Map 3D 2020
|
erstellt am: 20. Jun. 2019 15:13 <-- editieren / zitieren --> Unities abgeben: Nur für Tobier
OK das habe ich nun verstanden und habe es nun geändert. Es hat auch was ausgelesen, allerdings hat die neue Zeichnung Probleme das wieder einzulesen. ; Fehler: Keine Umwandlung des lisp-Wertes in VARIANT mit folgendem Typ: BEARBEITET das wird mir nur angezeigt. Ich hänge mal die Datei an, die ausgelesen worden ist und danke schön das ihr mir so toll weiter hilft. Ohne euch würde ich es im Leben nicht hin bekommen. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
cadffm Moderator 良い精神
Beiträge: 21533 Registriert: 03.06.2002 System: F1 und Google
|
erstellt am: 20. Jun. 2019 15:51 <-- editieren / zitieren --> Unities abgeben: Nur für Tobier
Original:(defun c:dinfo_exp (/ FW) ... (cons "Haupttitel" HAUPTTITTEL) (cons "Untertitel" UNTERTITEL) (cons "Plannummer" PLANNUMMER) ... ) aus deiner c:dinfo_exp Routine: ... (cons "Bearbeitet" 'BEARBEITET) (cons "Gezeichnet" 'GEZEICHNET) (cons "Geprüft" 'GEPRÜFT) ... versuche es mal so: ... (cons "Bearbeitet" BEARBEITET) (cons "Gezeichnet" GEZEICHNET) (cons "Geprüft" GEPRÜFT) ... Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Saya-Cat Mitglied Bauzeichnerin
Beiträge: 9 Registriert: 20.06.2019 ACAD 2020 CIVIL 3D 2020 ACAD Map 3D 2020
|
erstellt am: 20. Jun. 2019 15:57 <-- editieren / zitieren --> Unities abgeben: Nur für Tobier
|
Epi-Zentrum Mitglied Konstrukteur
Beiträge: 211 Registriert: 25.01.2016 Windows 10, Dell Precision 7720 64-Bit; Intel Core i7 - 7920HQ 3,1GHz;Nvidia Quadro p4000; PLANT 3D 2017; Advanced Steel 2017
|
erstellt am: 24. Jun. 2019 12:45 <-- editieren / zitieren --> Unities abgeben: Nur für Tobier
Hallo CW, Ja die Eigenschaften über den Projektmanager kenne ich auch. Da wir hier im Hause aber auch plätze nur mit ACAD bzw. ACAD-Mechanical belegt haben, wollte ich eine Vorlage für alle bauen und durch eventuelles angleichen des Schritkopfes beide Systeme überein bringen. Hat aber nicht ganz funktioniert. Werden nun zwei Vorlagen haben. Einmal nur Plant und nur ACAD ------------------ ----------------------------------------------- Gruß Steffan ----------------------------------------------- Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
cadwomen Ehrenmitglied V.I.P. h.c. Mädchen für fast alles
Beiträge: 2966 Registriert: 26.08.2002 ACAD R11 - 2022 (Plant3D) AVIS ACAD LT 2013- 2021 ZWCAD 2015 Versuch "nun ja" [s]History P3D 2012/(13) SP und Hotfix([/s]<P> Windows 10 / 64 Bit Xeon CPU 3.5GHz 16GB Ram NVIDIA Quadro P2000 3x Dell TV100 88P Monitore
|
erstellt am: 24. Jun. 2019 13:42 <-- editieren / zitieren --> Unities abgeben: Nur für Tobier
Hy also ganz im Ansatz .. doch sowas geht IngSuite konnte das schon vor 20 Jahren aber .. kostet halt auch aber ich denke das geht nur müssen dazu die Projektdaten in einer db Liegen Sofistik hat das seinerzeit über eine MdB gemacht Plant hat so was on Bord wenn du also dir eine Projektverwaltung ( im kleinsten Fall Excel ) einrichtest brauchst du nur noch die Tools die dir die Daten dort abholen und in deine ACAD / Plant / Mech einlesen bzw aktuallisieren Lee Mac hat das was für "einfach" Update Titleblock Attributes bin grad nicht auf dem Laufenden wie das in Mech und ACAD mit Datenbankanbindung aussieht und die Gretchenfrage .. lohnt es sich was Programmieren zu lassen ? cu cw
------------------ Also ich finde Unities gut ... und andere sicher auch ------------------------------------------------ cadwomen™ Plant ist nur die Spitze des Berges der da treibt ? Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Markus2013 Mitglied Leitung Konstruktion
Beiträge: 187 Registriert: 05.07.2013 AutoCAD V21/19 BricsCAD V20/21 Inventor V19
|
erstellt am: 23. Nov. 2020 09:32 <-- editieren / zitieren --> Unities abgeben: Nur für Tobier
Hallo zusammen Erstmal vielen Dank für die sehr Hilfreiche LISP. Ich habe sie auf meine benutzerdefinierten Eigenschaften angepasst und bekomme nun folgende Fehlermeldung: error : Automation Error DISP_E_PARAMNOTOPTIONAL; [IAcadSummaryInfo] Required argument is not optional for [SETCUSTOMBYKEY] method. Könnte mir jemand helfen und mir erklären woran das liegt? Ich habe die Beispiel DWG sowie die LISP angehängt. Vielen Dank im Voraus Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |