| |
| Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
| |
| PNY WIRD VON NVIDIA ZUM HÄNDLER DES JAHRES GEWÄHLT, eine Pressemitteilung
|
Autor
|
Thema: Punktliste sortieren! (746 mal gelesen)
|
Hans-Leo Müller Mitglied Lehrer an Berufsbildenden Schulen
Beiträge: 30 Registriert: 24.09.2003
|
erstellt am: 14. Dez. 2003 14:58 <-- editieren / zitieren --> Unities abgeben:
Hallo Forum Ich möchte eine Punktliste so sortieren, dass gleiche Punkte ausgefiltert werden, also keine Punkte mehr doppelt in der Liste erscheinen. Läßt sich dieses mit vl-sort bewerkstelligen? Wer weiß einen Rat? Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Proxy Ehrenmitglied Stateless-DHCP v6-Paketfragmentierer
Beiträge: 1629 Registriert: 13.11.2003 Tastaturen, Mäuse, Pladden, ..., AutoCADs 200X, SWX 2kX
|
erstellt am: 14. Dez. 2003 19:00 <-- editieren / zitieren --> Unities abgeben: Nur für Hans-Leo Müller
kleiner "Denkanstoss" Zitat:
(defun STD-REMOVE-DUPLICATES (lst / ele new) (setq new nil) (foreach ele lst (if (not (member ele new)) (setq new (cons ele new)))) (reverse new))
------------------ (entmake (entget (entlast))) | Die Pro-Version auf Anfrage erhältlich. "Lisp?!?! Why the Hell did you pick the most arcane, obscure, and hopelessly-rooted-in-the-computer-science-department language in the world for an AutoCAD programming language?" Read the whole story: The Autodesk File Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Hans-Leo Müller Mitglied Lehrer an Berufsbildenden Schulen
Beiträge: 30 Registriert: 24.09.2003
|
erstellt am: 14. Dez. 2003 20:05 <-- editieren / zitieren --> Unities abgeben:
Hallo Proxy, erst einmal Danke für deine Hilfe. Die Sache mit der Listensortierung funktioniert jetzt einwandfrei. Ich hatte fast die gleiche Lösungsidee, nur habe ich statt 'member' die Funktion 'equal' verwendet, die nur zufällig zu einem richtigen Ergebnis führte! mfg Hans-Leo Müller
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Brischke Moderator CAD on demand GmbH
Beiträge: 4187 Registriert: 17.05.2001 AutoCAD 20XX, defun-tools (d-tools.eu)
|
erstellt am: 15. Dez. 2003 09:04 <-- editieren / zitieren --> Unities abgeben: Nur für Hans-Leo Müller
Hallo Hans Leo, ich denke, dass du beim Vergleich von Koordinaten nicht auf ein (equal ..) verzichten kannst. Denn weicht deine Koordinate in der 16. Stelle nach dem Komma ab, dann liefert die (member ..) auch nicht das Ergebnis, welches du möchtest. Deshalb ist (member ..) für deine Aufgabenstellung ungeeignet und der ursprüngliche von dir angedachte Weg mittels (equal ..) genauer zu untersuchen, weshalb es nicht das gewünschte Ergebnis gebracht hat. Bei Fragen ... Grüße Holger ------------------ Holger Brischke (defun - Lisp over night! AutoLISP-Programmierung für AutoCAD Da weiß man, wann man's hat! Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |