| |
| Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
| |
| PNY präsentiert die neue NVIDIA RTX A400 und die A1000 Grafikkarte, eine Pressemitteilung
|
Autor
|
Thema: Text-Filter (268 mal gelesen)
|
Theodor Schoenwald Ehrenmitglied
Beiträge: 1672 Registriert: 16.04.2002
|
erstellt am: 10. Nov. 2002 17:34 <-- editieren / zitieren --> Unities abgeben:
Hallo, wie kann ich in Lisp aus einer Zeichenkette bei der die Anzahl vorgestellten und nachgestellten Leerzeichen nicht immer gleich ist, ausfildern, Beispiel (die Leerzeichen stelle ich mit Unterstriche dar): ______rechts__ oder __rechts_____ oder _rechts______ Ich benötige z.B. nur das Wort "rechts" und möchte auch nur dieses abfragen. Ich bin gespannt wie eine Lösung aussehen kann. Gruß Theodor Schönwald Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
VMichl Mitglied
Beiträge: 221 Registriert: 04.01.2001 AutoCAD, LT, Inventor, Revit, Map, LISP... Firma: ARKANCE (CAD Studio)
|
erstellt am: 10. Nov. 2002 19:41 <-- editieren / zitieren --> Unities abgeben: Nur für Theodor Schoenwald
Wie z.B. (ssget "X" '((1 . "*rechts*"))) ? Oder auch mit QSELECT (Contents, Wildcards). Aber vielleicht geht es nur um reine Stringmanipulation (trim) - hier kann (ai_strtrim <meintext> ) helfen... Vladimir Michl, Xanadu, www.cadstudio.cz
[Diese Nachricht wurde von VMichl am 10. November 2002 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Theodor Schoenwald Ehrenmitglied
Beiträge: 1672 Registriert: 16.04.2002
|
erstellt am: 10. Nov. 2002 22:30 <-- editieren / zitieren --> Unities abgeben:
Danke Vladimir, für die Antwort, aber mein Problem ist doch komplizierter. Denn es kann sein, dass in dem String mit Leerzeichen auch ein anderes Wort steht. Mein Problem ist einfach die Leerzeichen wegzubekommen. Der String kommt aus einer Textdatei, die ich nicht beeinflussen kann. Vieleicht hast du auch dafür eine Lösung. Gruß Theodor Schönwald Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Theodor Schoenwald Ehrenmitglied
Beiträge: 1672 Registriert: 16.04.2002
|
erstellt am: 11. Nov. 2002 00:07 <-- editieren / zitieren --> Unities abgeben:
Hallo, Problem Leerzeichen und String gelöst. Event. gibt es bessere Lösungen, aber so funktioniert es: (defun LEERZ (A / A B C D E) (setq B (strlen A) C 1 D "" ) (while (<= C B) (setq E (substr A C 1)) (if (/= 32 (ascii E)) (setq D (strcat D E)) ) (setq C (1+ C) ) ) D ) Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
LutzJ Mitglied
Beiträge: 17 Registriert: 30.04.2002
|
erstellt am: 11. Nov. 2002 08:15 <-- editieren / zitieren --> Unities abgeben: Nur für Theodor Schoenwald
|
Theodor Schoenwald Ehrenmitglied
Beiträge: 1672 Registriert: 16.04.2002
|
erstellt am: 11. Nov. 2002 19:06 <-- editieren / zitieren --> Unities abgeben:
Hallo Lutz, dein Vorschlag habe ich getestet. Das war es. Danke! Von einem anderen Forum habe ich die gleiche Antwort erhalten. Ich muss mich nun doch mit den VL-Befehlen befassen. Gruß Theodor Schönwald
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |