---

Hallo liebe SW-User.

Habe folgendes Problem:
Ich habe ein Bauteil an dem mit einem Makro ein anderes Teil angesetzt werden soll. Von diesem 2. Teil kann der User die Maße zuvor bestimmen.
Dann kommt eine Abfrage, in der gefragt wird ob man mit den Maßen so zufrieden ist.
Klickt man auf Nein sollen die letzten 10 Features(Daraus besteht das 2. Teil) wieder entfernt werden.
Habe mir gedacht das geht mit folgender For Schleife:

Code:

---

Set swApp = Application.SldWorks
Set swModel = swApp.ActiveDoc
Set swSelMgr = swModel.SelectionManager

Dim i As Integer

For i = 0 To 9
    Set swFeat = swModel.FeatureByPositionReverse(i)
    Boolstatus = swModel.Extension.SelectByID2(swFeat.Name, "", 0, 0, 0, True, 1, Nothing, swSelectOptionDefault)
Next

swModel.Extension.DeleteSelection2 swDelete_Absorbed

---

Danach ist aber leider noch alles vorhanden.

Habe daraufhin den Delete Befehl rausgenommen, an der Stelle angehalten und so rausgefunden das er garnichts selektiert.
Hoffe jemand hat ne Lösung.

Danke!

[Diese Nachricht wurde von ZooM86 am 02. Jun. 2009 editiert.]

[Diese Nachricht wurde von ZooM86 am 02. Jun. 2009 editiert.]

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

---

Hi,

Zitat:

---

Original erstellt von ZooM86:
    Boolstatus = swModel.Extension.SelectByID2(swFeat.Name, "", 0, 0,
[/B]

---

Hier fällt mir als erstes auf dass du den Typ der Auswahl nicht angegeben hast. (Bei "") Das wäre in deinem Fall "BODYFEATURE" glaube ich. In der API-Hilfe kannst du nachschauen welche es für die entsprechenden Fälle gibt.

Wieso willst du überhaupt die Features löschen es reicht doch eigentlich auch die Maße zu ändern oder?

Gruß Andy

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

---

Hi Andy.
Zunächst mal Danke.

Habe die Typenbezeichnung weggelassen, da es sich teilweise um Sketches handelt, dachte der verwechselt da dann was.
Löschen, möchte ich das ganze weil meine Schleife zum erstellen des Bauteils nicht mehr funktioniert.
Aber deine Variante ist glaub ich besser und nicht so dirty wie meine .
Werd da mal dran rumwursten und mich dann nochma melden.
Danke,

Gruß Tobi

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

---

Du könntest auch den FeatureManager abfragen und Dir dort die letzten Einträge geben lassen.

------------------
Lutz Federbusch
Mein Gästebuch
Der Mensch, Herr oder Sklave der Technik?

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

---

wie wäre es damit.

swFeat.Select2(True, i+1)

Gruß Oliver

------------------
Software nach Maß für Ihr CAD-System
www.ib-knepper.de

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

---

Danke an alle habs dank euch hinbekommen .
Gruß Tobi

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