| | |
 | Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
| | |
 | Von Digital Twins bis Hochleistungs-Computing: PNY präsentiert seine Zukunftstechnologien für die Industrie von morgen, eine Pressemitteilung
|
|
Autor
|
Thema: Bemassung rausfiltern (1449 mal gelesen)
|
koala2000
Mitglied
   Beiträge: 22
Registriert: 08.02.2010 ACAD-VBA Anfänger
Excel-VBA
WoodWop
VariaPlus
|
erstellt am: 24. Aug. 2010 20:58  <-- editieren / zitieren -->   Unities abgeben:          
Hallo Leute. Ich komme mit der Filterfunktion vom SSet nicht so ganz zurecht. Ich wähle Objekte mit der SelectOn Screen Methode aus, dabei sollen aber jede Art von Bemassung nicht mit ausgewählt werden. Ich habe schon mal den folgenden Code, komme aber damit nicht weiter... Wer kann mir helfen?
Code:
Dim FilterType(0) As Integer
Dim FilterData(0) As Variant
FilterType(0) = 8
FilterData(0) = "*Dimension"Set SSet = ssetGen("Auswahl")
SSet.SelectOnScreen FilterType, FilterData
Woher weiss ich welchen Filtertype ich brauche? Gruss, Koala ------------------
Geht nicht, gibt es nicht... Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Ex-Mitglied
|
erstellt am: 24. Aug. 2010 21:20 <-- editieren / zitieren -->
Hi, dieses erstellt einen SelectionSet-Filter, der alles ausser Bemassungen zulässt:
Code:
FilterType(0) = -4
FilterData(0) = "<NOT"
FilterType(1) = 0
FilterData(1) = "*Dimension*"
FilterType(2) = -4
FilterData(2) = "NOT>"
>> Woher weiss ich welchen Filtertype ich brauche?
Kenntnisse der DXF-Struktur sind notwendig (kannst Du auch in der Hilfe durchkauen), ich helfe mir immer damit, dass ich ein Musterelement erstelle, dann in der Befehlszeile dieses eingebe und das Musterelement wähle:
(entget (car (entsel))) Damit wird Dir die Info des Elements angezeigt und die Wertepaare wie z.B. (8 . "0") zeigt mit 8 den Typ (=Layer) und dann den Wert dazu. Bei Blöcken, 3D-Solids und anderen komplexeren Elementen wird's einigermaßen tiefer, aber auch nicht mehr mit SelectionSet zugreifbar (damit für den Anfang irrelevant). HTH, - alfred - ------------------
www.hollaus.at [Diese Nachricht wurde von a.n. am 24. Aug. 2010 editiert.] |
Carsten1210
Mitglied
staatl. geprüfter Holztechniker
Beiträge: 1362
Registriert: 24.07.2002
|
erstellt am: 24. Aug. 2010 21:22 <-- editieren / zitieren --> Unities abgeben: Nur für koala2000 
|
| | Anzeige: | Infos zum Werbeplatz >> | CADPower CAD APP für Allgemeine Werkzeuge CADPower is a pure-productivity tool for the .dwg CAD user.
It provides you with over 400+ Lisp routines and tools that you always wanted but found missing. It is designed to super-charge and boost productivity for just any AutoCAD/BricsCAD/ZWCAD/ARES Commander user.
|
|
koala2000
Mitglied
Beiträge: 22
Registriert: 08.02.2010 ACAD-VBA Anfänger
Excel-VBA
WoodWop
VariaPlus
|
erstellt am: 24. Aug. 2010 21:47 <-- editieren / zitieren --> Unities abgeben:
Vielen Dank für die schnelle Hilfe. @Alfred. So funktioniert der Filter super. Das mit dem Befehl in der Befehlszeile ist ´n super Tipp. Ich werde mich dann demnächst aber auch mal über die Hilfedatei hermachen... Gruss Koala ------------------
Geht nicht, gibt es nicht... Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Foren auf CAD.de
| 
