|
AutoLisp : Text kopieren und ändern
cad-intensiv am 29.09.2005 um 21:55 Uhr (0)
Zitat:Original erstellt von Dober Heinz:Hallo Cad-inwenn ich mir meinen Text so einlese ist das überhaupt ein string den ich bearbeiten kann.(setq textw (car (entsel))) (setq abfrage (entget textw)) (setq letzteob (cdr (assoc 1 abfrage))) Du solltest mehr prüfen und solltest die Variablen so benennen, dass sie wenigstens irgend was mit dem Inhalt zu tun haben und nicht völlig falsche Namen haben.Beispiel:Code:(if (and (setq text-entityname (car (entsel "
Textelement wählen: "))) (setq text-entgetlist ...
| | In das Form AutoLisp wechseln |
|
AutoLisp : Text kopieren und ändern
cad-intensiv am 29.09.2005 um 12:13 Uhr (0)
Zitat:Original erstellt von Dober Heinz:Hallo LisplerBin AnfängerHabe einen Text 111/9 will ihn kopieren und die neun um eine erhöhen.Nach abfrage bekomme ich das zurück "111/9" wie muss ich das umwandeln um den Text bearbeiten zu können bzw. die 9 auf 10 umwandeln.Hallo Heinz,das sollte doch in dem gerade von Dir absolvierten LISP Seminar in Wien behandelt worden sein, oder hat Herr Berger das versäumt? Wenn Du mir sagst, wo Du dabei noch Probleme hast, dann kann vielleicht auch ich Dir hier weiter helfe ...
| | In das Form AutoLisp wechseln |
|
AutoLisp : Text kopieren und ändern
cad-intensiv am 29.09.2005 um 16:44 Uhr (0)
Zitat:Original erstellt von Dober Heinz:damit geht es schon besser aber manche sachen sind wir noch nicht so klar wie ich den Text "220/1.1" umwandle und letzte Zahl um eins erhöhe.Naja, es kommt halt prinzipiell drauf an, welche Texte da so auf einen zukommen können, und was die alles enthalten können. Die Frage ist schon mal die, ob in diesem Fall die letzte Zahl die letzte "1" ist, oder ob das die "1.1" ist. Meine oben gezeigte Funktion gibt letzteres zurück. Diese 1.1 auf 2.1 hochzuzählen ist simpel, ...
| | In das Form AutoLisp wechseln |
|
Anzeige:
Anzeige: (Infos zum Werbeplatz)
 |