| |
| 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: Listenabfrage (570 mal gelesen)
|
Björn Möller Mitglied
Beiträge: 96 Registriert: 22.03.2004 AutoCad Map 2012,Topobase 2,Rasterdesign
|
erstellt am: 19. Mai. 2011 16:06 <-- editieren / zitieren --> Unities abgeben:
Hallo Forum, ich habe leider einen Blockout. Ich habe folgende Liste erzeugt: (SETQ BJ:Trans (list(list "Ablei" "EW_AUFMASS" "ABLEITER") (list "Amp" "EW_AUFMASS" "AMPEL") (list "Ausl." "BE_AUSLAUF" "AUSLAUF"))) Nun möchte ich durch die Eingabe von "Ablei" auf den dazugehörigen 2 und dritten wert kommen.
Könnt Ihr mir helfen, ich war auch beim suchen irgendwie nicht erfolgreich. Gruß Björn Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Dorfy Mitglied Double-Dipl.-Ing. Bleistiftanspitzer
Beiträge: 900 Registriert: 21.07.2006 AutoCad2007, ProE, HiCad
|
erstellt am: 19. Mai. 2011 16:21 <-- editieren / zitieren --> Unities abgeben: Nur für Björn Möller
(mapcar '(lambda (x) (if (equal (car x) "Ablei")(setq BJ:Trans2 (cadr x)BJ:Trans3 (caddr x))) ) BJ:Trans ) Werte in BJ:Trans2 und BJ:Trans3... ------------------ Mfg Heiko Elefantenjagd in Afrika "... LISP-Programmierer bauen einen Irrgarten aus Klammern und hoffen, dass sich der Elefant darin verirrt..." [Diese Nachricht wurde von Dorfy am 19. Mai. 2011 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
wronzky Ehrenmitglied V.I.P. h.c. CAD-Dienstleistungen für Architekten
Beiträge: 2154 Registriert: 02.05.2005 CAD: AutoCAD 2.6 bis 2014 ADT 2005 - 2014 Arcibem System: Windows 2000, XP, NO VISTA Internet-Startseite: http://www.archi.de
|
erstellt am: 19. Mai. 2011 16:22 <-- editieren / zitieren --> Unities abgeben: Nur für Björn Möller
1. Element: (car (assoc (getstring "[Ablei] eingeben:") BJ:Trans)) 2. Element: (cadr (assoc (getstring "[Ablei] eingeben:") BJ:Trans)) 3. Element: (caddr (assoc (getstring "[Ablei] eingeben:") BJ:Trans)) Grüsse, Henning
------------------ Henning Jesse VoxelManufaktur Computer-Dienstleistungen für Architekten und Ingenieure http://www.voxelman.de Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Björn Möller Mitglied
Beiträge: 96 Registriert: 22.03.2004 AutoCad Map 2012,Topobase 2,Rasterdesign
|
erstellt am: 19. Mai. 2011 16:25 <-- editieren / zitieren --> Unities abgeben:
|