Hot News:

Unser Angebot:

  Foren auf CAD.de (alle Foren)
  AutoCAD VBA
  Bemassung rausfiltern

Antwort erstellen  Neues Thema erstellen
CAD.de Login | Logout | Profil | Profil bearbeiten | Registrieren | Voreinstellungen | Hilfe | Suchen

Anzeige:

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen nächster neuer Beitrag | nächster älterer Beitrag
  
Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte
Autor Thema:  Bemassung rausfiltern (1370 mal gelesen)
koala2000
Mitglied



Sehen Sie sich das Profil von koala2000 an!   Senden Sie eine Private Message an koala2000  Schreiben Sie einen Gästebucheintrag für koala2000

Beiträge: 22
Registriert: 08.02.2010

ACAD-VBA Anfänger
Excel-VBA
WoodWop
VariaPlus

erstellt am: 24. Aug. 2010 20:58    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

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 oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat

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


Sehen Sie sich das Profil von Carsten1210 an!   Senden Sie eine Private Message an Carsten1210  Schreiben Sie einen Gästebucheintrag für Carsten1210

Beiträge: 1357
Registriert: 24.07.2002

erstellt am: 24. Aug. 2010 21:22    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für koala2000 10 Unities + Antwort hilfreich

Hi Koala,

Die Codes für den Filter findest du in der DXF-Referenz in der Hilfe.

Gruß, Carsten

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

koala2000
Mitglied



Sehen Sie sich das Profil von koala2000 an!   Senden Sie eine Private Message an koala2000  Schreiben Sie einen Gästebucheintrag für koala2000

Beiträge: 22
Registriert: 08.02.2010

ACAD-VBA Anfänger
Excel-VBA
WoodWop
VariaPlus

erstellt am: 24. Aug. 2010 21:47    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

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

Anzeige.:

Anzeige: (Infos zum Werbeplatz >>)

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen

nächster neuerer Beitrag | nächster älterer Beitrag
Antwort erstellen


Diesen Beitrag mit Lesezeichen versehen ... | Nach anderen Beiträgen suchen | CAD.de-Newsletter

Administrative Optionen: Beitrag schliessen | Archivieren/Bewegen | Beitrag melden!

Fragen und Anregungen: Kritik-Forum | Neues aus der Community: Community-Forum

(c)2023 CAD.de | Impressum | Datenschutz