| | |
 | Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
|
Autor
|
Thema: Handle suchen (176 mal gelesen)
|
Ex-Mitglied
|
erstellt am: 05. Mrz. 2008 10:37  <-- editieren / zitieren -->  
Hallo an alle, wir suchen eine Möglichkeit, mit der Eingabe einer bekannten Block-Handle den zugehörigen Block in der Zeichnung zu lokalisieren. Der bisherige Weg ist so, daß wir nach dem Export (der attributierten Blöcke) in Excel in ein sichtbares Attribut einen extrem langen, unsinnigen Text einfügen und dann über ATTIN das ganze zurückspeichern. Irgendwo fällt dann dieser Text auf. Die Abfrage der Block-Handle ist uns bereits bekannt (Dank Forum über: (cdr (assoc 5 (entget (car (entsel "\nBitte Block wählen :")))))). Nun suchen wir den umgekehrten Weg. Gibt es dafür schon fertige Sachen? Ein temporäres, großes Kreuz auf der betreffenden Stelle wäre völlig ausreichend.
Lutz
------------------
Menschen mit T21 sind von Natur aus freundlich.
Wir sollten von ihnen lernen ... |
cadffm
Moderator
良い精神
    
   Beiträge: 21533
Registriert: 03.06.2002 System: F1
und Google
|
erstellt am: 05. Mrz. 2008 10:40 <-- editieren / zitieren --> Unities abgeben:          
|
cadffm
Moderator
良い精神
Beiträge: 21533
Registriert: 03.06.2002 System: F1
und Google
|
erstellt am: 05. Mrz. 2008 10:43 <-- editieren / zitieren --> Unities abgeben:
|
joern bosse
Ehrenmitglied
Dipl.-Ing. Vermessung
Beiträge: 1734
Registriert: 11.10.2004
|
erstellt am: 05. Mrz. 2008 10:52 <-- editieren / zitieren --> Unities abgeben:
Hallo Lutz, versuche mal folgendes LISP: Code:
(defun c:test ( / handle)
(if(and(setq handle(getstring "\nBitte Handle eingeben:"))
(handent handle))
(if(cdr(assoc 10 (entget(handent handle))))
(command "_.line" (cdr(assoc 10 (entget(handent handle))))pause)
(alert "ungültiges Objekt"))
(alert "Handle ist nicht vorhanden.")
))
Den Linienbefehl habe ich zweckentfremdet, dadurch hängt das gesuchte Objekt aber am Mauscurser. => einfach abbrechen.
WKS ist Voraussetzung. ------------------
viele Grüße Jörn Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Ex-Mitglied
|
erstellt am: 05. Mrz. 2008 11:28 <-- editieren / zitieren -->
... wunderbar. Funktioniert beides! Danke! ... und teilt euch die U´s ...
Lutz
------------------
Menschen mit T21 sind von Natur aus freundlich.
Wir sollten von ihnen lernen ... |
marc.scherer
Ehrenmitglied V.I.P. h.c.
CAD-Administrator
Beiträge: 2490
Registriert: 02.11.2001 Windows 10 64bit
AutoCAD Architecture 2018/2019 (deu/eng)
AEC-Collection 2019 (Revit und Zeugs)
Wenn sich's nicht vermeiden läßt:
D-A-CH Erweiterung (mies implementierter Schrott)
|
erstellt am: 05. Mrz. 2008 11:29 <-- editieren / zitieren --> Unities abgeben:
Zitat:
Original erstellt von joern bosse:
Den Linienbefehl habe ich zweckentfremdet, dadurch hängt das gesuchte Objekt aber am Mauscurser. => einfach abbrechen.
WKS ist Voraussetzung.
Na Jörn, DAS kannst doch besser... WKS vorher setzen wenn Bedingung, Koordinaten des gefundenen Objekts auslesen, hinzoomen und Objekt ausleuchten oder gar gleich mit selektieren ist IMHO deutlich eleganter als ein "Linienzeiger". ------------------
Ciao,
Marc
 Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
joern bosse
Ehrenmitglied
Dipl.-Ing. Vermessung
Beiträge: 1734
Registriert: 11.10.2004
|
erstellt am: 05. Mrz. 2008 12:44 <-- editieren / zitieren --> Unities abgeben:
|
Foren auf CAD.de (alle Foren)
| 
