---

Wir hatten in letzter Zeit häufiger Probleme mit rausgegebenen Zeichnungen und wollten nun ein "Plotdatum" auf den Zeichnungen einfügen. Klar ist es möglich einfach ein Datum hinzusetzen und es bei jedem Plot zu ändern. Das ist aber langweilig. Wir wollten es dann automatisieren. Als erstes versuchten wir es mit "OLE einfügen". Das Objekt war ein Word Dokument mit automatisch aktualisiertem Datum. Prinzipiell funktioniert das auch, aber der Text ist häufig verschoben, gedreht, usw.
Gibt es andere Möglichkeiten ein aktuelles Datum einzufügen???

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

---

Hi Holger

Was für 'ne Acad Platform habt Ihr?
Hier 'n kleines Proggi
(defun c:dt ()
(setq
zeichnungsname (getvar "dwgname")
date_str (rtos (getvar "cdate") 2 4)
year (substr date_str 1 4)
month (substr date_str 5 2)
day (substr date_str 7 2)
date (strcat day "." month "." year)
hour (substr date_str 10 2)
minu (substr date_str 12 2)
zeit (strcat hour ":" minu)
);ende setq

(setq md_size (getvar "textsize"))
(setq md_einfueg (getvar "extmin"))
(command "_text" "stil" "standard" md_einfueg md_size "0" (strcat date " / " zeit))
);ende defun

------------------
[color="orange"]Gruß MartinD[/color]

[u][color="yellow"]Suche meine [/color][COLOR="#FF8582"]H[/color][COLOR="#FB8C86"]o[/color][COLOR="#F98B88"]m[/color][COLOR="#F5918B"]p[/color][COLOR="#F2918E"]ä[/color][COLOR="#EF9692"]d[/color][COLOR="#EA9997"]s[/color][COLOR="#EA9F97"]c[/color][COLOR="#E0A3A0"]H[/color][/u]

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

---

Hi Martin,
wir arbeiten zur Zeit mit ACAD 2000.
Das hört sich ja ganz gut an, aber jetzt
mußt Du mir noch einen kleinen Tip geben wo ich so ein kleines Proggi erstellen kann.
Habe ich nämlich noch niemals nie gemacht.
Und zum ACAD Fuchs muß ich mich erst noch
mausern. Erstelle ich so etwas in ACAD oder extern
unterm Editor?

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

---

Hi Holger
Jetzt die Kurze Version:
Die Zeilen von (Defun ...... bis );defun kopieren, Notepad (Texteditor von Windoofs) öffnen und die Kopierten Zeilen einfügen.
Die Datei in einem Supportverzeichnis von Acad als "dt.lsp" speichern (z.b. in "...\Acad2000\Support"). Dann in Acad
in der Befehlszeile "Appload" eingeben und das Prog. laden. Wenn es bie jedem Start von Acad mitgeladen werden soll, dann in die Startgruppe mit aufnehmen (Dialogfeld bei appload).
Dialogfeld schließen.
Jetzt wird das Prg aktiviert, wenn mann in der Befehlszeile "DT" eingibt.
Kleiner Tip: Acad-Onlinehilfe "Handbuch für Benutzeranpassungen".

CADwiesel

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

---

Ich habe die Befehlszeile mal in eine neues Visual Lisp Datei kopiert. Als date abgespeichert und konnte es dann auch laden...
Ich bekomme Datum, Uhrzeit, etc dann
in mein Textfenster.
Aber wie füge ich so etwas als Text in eine Zeichnung
ein. Ich möchte das aktuelle Datum ja als
Text in meinem Papierbereich haben.

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

---

Hallo

Das Datum wird in der linken unteren Ecke (extmin) eingefügt.
Wenn eine beliebige Stelle ausgesucht werden soll, würde ich das Prg folgendermaßen umschreiben:
Die Zeile: (setq md_einfueg (getvar "extmin"))
ersetzen durch:
(setq md_einfueg (getpoint "Einfügepunkt zeigen:"))

------------------
Gruß
CADwiesel

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

---

Schönen Dank CADwiesel!
Werde mich mal eingehender mit Programmierung
unter AutoLISP beschäftigen ;-)

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

---

Hallo Holger,
meines Wissens gibt es bei http://support02.autodesk.com/Downloads.asp
ein Programm "Plotstamp", das Dein Problem eleganter löst, da es nicht manuell ausgeführt werden muß, sondern solche Informationen auf jeden Plot "hauen". Such auf der Seite am besten nach AcPltStamp.zip
mfg
Stephan

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

---

Super Tip Stephan !
Danke
Bernhard

[Diese Nachricht wurde von bernhard.ruf am 09. November 2000 editiert.]

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

---

Zitat:

---

Original erstellt von StephanJP:
Hallo Holger,
meines Wissens gibt es bei http://support02.autodesk.com/Downloads.asp
ein Programm "Plotstamp", das Dein Problem eleganter löst, da es nicht manuell ausgeführt werden muß, sondern solche Informationen auf jeden Plot "hauen". Such auf der Seite am besten nach AcPltStamp.zip
mfg
Stephan

---

Ich hätte das Programm auch gerne, finde es aber nicht. Wie lauten die genauen Abfragekriterien?
Peter

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

---

Hallo Herr Strobel,

beim angegebenen Link
im freien Eingabefeld oben links
bei
"Enter words separated by spaces:"
AcPltStamp
eingeben und GO klicken.
Im folgenden Fenster nochmal auf den Link der dort erscheint.
Dann Downloaden.

Viel Erfolg
Bernhard Ruf

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

---

Ich glaube ich stelle mich mal wieder zu dumm an, aber es funktioniert noch nicht.
Programm gezogen, ausgepackt, usw. Soweit alles bestens.
Wenn ich jetzt aber drucke erhalte ich
immer dieselbe Vorschau (Zeit und Datum), bis auf die Position.
Größe und Textstile habe ich verschiedene probiert.
Gibt es irgendwelche Einstellungen die ich vergessen habe? Drucker, Voreinstellungen?
Gruß Holger

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

---

Hallo Holger,
ich verstehe nicht ganz.., plotstamp gibt eigentlich nur auf dem Plot aus, d.h. man muß etwas probieren, bis man die "richtigen" Einstellungen für sich gefunden hat. Konfigurieren kannst Du es mit dem Befehl "plotstamp" aus ACAD heraus , da geht ein Fenster auf, in dem Du alles konfigurieren kannst.
mfg
Stephan

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

---

Tja rumprobieren. Werde es mal ein bißchen probieren.
Die eine Hälft hab ich jetzt schon einmal auf dem Plot. :-)
Ach halt, gibt das Programm die Angaben am Rand des
Layouts aus. Das würde es erklären, da ich es mit
Ausschnitten probiert habe.

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

---

Hallo Holger,
ich nehme an, Du hast es selber schon gefunden?
In der Einstellungsbox knnst Du auswählen, ob Du am Rand
des Layout-Bereiches oder am Plotbereichsrand ausgeben
möchtest. Wie gesagt: probieren:-|
mfg
Stephan

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