---

am_eb_speichern.lsp.txt

Hallo zusammen,

ich habe seit kurzen das Problem das ich einem Kunden alle Blätter einzeln in DXF abspeichern muss. Da wir keine Datenbank benutzen habe ich an ein wenig Lisp gewagt und mir ein Makro geschrieben das diese Arbeit für mich erledigen soll. Für meine Zwecke funktioniert es (glaube ich zumindest) aber ich bin mir sicher das es der ein oder andere Wolfgang verbessern kann    .
zum Makro:

- der Speicherort kann angegeben werden
- der Blattname ist frei wählbar
- Teilauswahl der zu speichernden Blätter kann angegeben werden
- Postfix kann angeben werden
- Anzahl der Stellen für die Nummerierung (dadurch ist zb. abcBlatt0004fix möglich)
- abspeichern von DXF,DWG,IGES und MI
- einstellen der Parameter von den oben genannten Formaten

Was meiner Meinung nach stark Verbesserungswürdig ist die Schleife für die Blattauswahl (es wird immer die ganze Zeichnung durchlaufen).
Bei der Parametereinstellung bin ich mir nicht sicher das es so funktioniert wie es soll.
Aber seht selbst

------------------
Dieter

[Diese Nachricht wurde von dki am 28. Aug. 2011 editiert.]

[Diese Nachricht wurde von dki am 28. Aug. 2011 editiert.]

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

So, nun ist es amtlich, die Übergabe der Parameter funktioniert wohl nicht. Ich bin gerade dabei das Makro um PDF-Speichern zu erweitern da mein Kunde nun auch noch PDF-Files einzeln haben möchte und hier funktioniert die Übergabe so nicht.
Das heißt ich brauche mal Hilfe, wie ich denn die Übergabe machen kann.

------------------
Dieter

[Diese Nachricht wurde von dki am 29. Aug. 2011 editiert.]

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Zitat:

---

Original erstellt von dki:
So, nun ist es amtlich, die Übergabe der Parameter funktioniert wohl nicht.

---

Ich bin mal frech..:  Schlecht getestet Dieter!

Als ich den code gelesen habe, dachte ich auf Anhieb: das KANN nicht funktionieren.

Du rufst sinngemaess auf:

Code:

---

(AM_SAVE_SHEET_DWG ":SHEET 5 :MERGE_ALL_ELEMENTS :ON" :FILENAME "c:/temp/whatver34")

---

Guck dir an WAS ist string, was nicht. 

Vertraue auf keinen fall der Ausgabe von (display)

TIP: Trace mal AM_SAVE_SHEET_DWG und guck dir den output im Console Fenster an. Jenes verfaelscht die Anzeige von String nicht!

Zudem: Dein Handling von Boolschen variablen ist mehr als "merkwuerdig"

-----------------------

Dringender Rat:  3 Schritte zurueck gehen, mindestens.  Es sauber machen und dann erst PDF einbauen. Du hast (mit verlaub) viel code geschrieben, der nicht funktioniert.

Eigentlich wollte ich mich ja zurueckhalten... 

------------------
● Seamonkey Firefox ● Java Forum Stuttgart JUGS ● OSD Hilfeseite (de) / help page (en) ● NotePad++ ●

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

schon in Ordnung, ich schrieb dir ja schon das ich von Lisp so gut wie keine Ahnung habe. Ich muss mir erst mal zusammensuchen wie das mit dem Trace richtig funktioniert.
Aber nun Stück für Stück, ich werde jetzt mal auf die Suche gehen.

------------------
Dieter

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo,
wollte mal fragen, ob es schon neue Erkenntnisse hierzu gibt?

Das Makro sieht echt nützlich aus. 

Selbst ohne die problematische Seitenauswahl wärs nen gutes Werkzeug.

Gruß
Benjamin

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP