Datum ändern: Makro (Autodesk/Rund um AutoCAD)

Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte

PRO.FILE 10: So gelingt der Umstieg, eine Pressemitteilung

Meldungen abonnieren

Autor

Thema: Datum ändern: Makro (254 mal gelesen)

David Galvagno
Mitglied

Senden Sie eine Private Message an David Galvagno

Schreiben Sie einen Gästebucheintrag für David Galvagno

Beiträge: 148
Registriert: 10.12.2002

Windows 2000 Prof
Autocad 2000i
Prostahl3d-V16.1
HP Deskjet 1220C

erstellt am: 13. Feb. 2004 15:18

Editieren oder löschen Sie diesen Beitrag!

<-- editieren / zitieren -->

Unities abgeben:

hallo
ich benutze seit längerem das Makro für direktes ändern des DAtum zum aktuellen Datum für Text in Blöcken:

(setq date(itoa(fix(getvar"cdate"))) date (strcat(substr date 7)"."(substr date 5 2) "."(substr date 1 4))) (entupd(cdr(assoc 330(entmod(subst (cons 1 date) (assoc 1 (setq att(entget (car (nentsel))))) att))))) (setq att nil date nil))

das ausgegebene Datum ist z.B.: 13.2.2004

NUN: ich möchte aber gerne das Datum so: 13.02.04

kann mir hier jemand weiterhelfen ?
Ich danke für jeden Hinweis.

------------------
Grüsse bimbo

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

marvin101010
Mitglied
ingenieur der architektur ohne diplom, bauzeichner ohne lehre, cad-admin ohne wissen :-)

Senden Sie eine Private Message an marvin101010

Schreiben Sie einen Gästebucheintrag für marvin101010

Beiträge: 562
Registriert: 22.01.2003

Pentium 4
Windows XP
Autocad 2006
Autocad 2006LT + Extender
ADT 2007
ArchiCAD

erstellt am: 13. Feb. 2004 17:06

<-- editieren / zitieren -->

Unities abgeben:

Nur für David Galvagno

(setq date(itoa(fix(getvar"cdate"))) date (strcat(substr date 7)"."(substr date 5 2) "."(substr date 3 2))) (entupd(cdr(assoc 330(entmod(subst (cons 1 date) (assoc 1 (setq att(entget (car (nentsel))))) att))))) (setq att nil date nil))

allerdings glaube nich nicht, dass deine bisherige Rückgabe
13.2.2004 war...schreibfehler?

------------------
...so long and thanx for all the fish!

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

Anzeige:	Infos zum Werbeplatz >>
CP-Symbols Architectural Series CAD APP für Raum- und Möbeldesign, Tiefbau, TGA

David Galvagno
Mitglied

Beiträge: 148
Registriert: 10.12.2002

Windows 2000 Prof
Autocad 2000i
Prostahl3d-V16.1
HP Deskjet 1220C

erstellt am: 16. Feb. 2004 14:08

<-- editieren / zitieren -->

Unities abgeben:

hallo Marvin
herzlichen Dank für deine Perfekte Antwort. Funzioniert perfekt. Vielen Dank für die Hilfe.

------------------
Grüsse bimbo

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

Anzeige.:
X

Anzeige: (Infos zum Werbeplatz >>)

CP-Symbols Architectural Series CAD APP für Raum- und Möbeldesign, Tiefbau, TGA