Im Beitrag/Titel Nur im Titel Nur nach Datum sortieren Docs / Anhänge mit Lösung
Suchmaschinenstatistik
Livesuche
Einstellungen
Info

Auch mit chatGPT* können Lösungen aus dem CAD.de-Forum recherchiert werden:

* chatGPT ist eine eingetragene Marke von openAI

Ergebnisse 1 - 1, 1 Gesamtergebnisse mit Suchbegriffen enginering base sec.
Lisp : Umwandlung von (getvar DWGNAME)
Angeltoni am 05.10.2006 um 09:21 Uhr (0)
habe jetzt rumgespielt und den Code erstellt:Code:(defun C:name () (SETQ P0 (GETPOINT "Einfügepunkt: ")) (SETQ TH (GETREAL "Texthöhe: ")) (SETQ TW (GETREAL "Textwinkel: ")) (SETQ dwgname (vl-filename-base (getvar "DWGNAME"))) (setq dwgname (vl-string-right-trim ".dwg" dwgname)) (setq dwgname (strcat (substr dwgname 3 (- (vl-string-position (ascii "-") dwgname) 2) ) (substr dwgname (+ 1 (vl-string-position (ascii "-") dwgname nil T)) ) ) ) (command "dtexted" "1") (setq TX (strcat dwgname) ...
In das Form Lisp wechseln

Anzeige:

Anzeige: (Infos zum Werbeplatz)

Alle Produkt-, Schrift-, Firmennamen und Logos sind Warenzeichen oder eingetr. Warenzeichen der jeweiligen Firmen.
©2026 CAD.de , Lenggries. Tel: ++49 (8042) 973 8208 | Datenschutz