| | |
 | 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 PRO Elite™ High Endurance microSD-Flash-Speicherkarten für Videoüberwachung und kontinuierliche Aufzeichnung, eine Pressemitteilung
|
|
Autor
|
Thema: Punktliste sortieren! (789 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: 4201
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 |
Foren auf CAD.de
| 
