---

Hallo,

mal wieder eine VB.net Frage. Ich hoffe jemand ist schlauer als ich.

In meinem Projekt habe ich über IModelDoc2 die Feature einer Bauteildatei ausgelesen und in einem Array gespeichert. Nun lasse ich eine Schleife mit GetTypeName2 darüber laufen und mit Select Case differenziere ich über den Typ die einzelnen Feature. Ich zähle also beispielsweise, wie viele Bohrungen vorhanden sind.

Nun möchte ich aber nähere Informationen aus den Bohrungen auslesen (Durchmesser etc.), dafür wollte ich das einzelne Feature in ein WizardHoleFeatureData2 Objekt umwandeln, was allerdings nicht funktioniert. 

Hat jemand einen Tipp für mich?

Hier noch ein wenig Code:

Code:

---

For Each swFeature As SldWorks.Feature In swFeatures
    FeatureType = swFeature.GetTypeName2   
    Select Case FeatureType
          Case "HoleWzd"                 
              HoleWzdCounter += 1       
              swWzdHole = swFeature
    End Select

---

bei swWzdHole = swFeature sagt er mir, dass das Objekt nicht umgewandelt werden kann.

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

---

Hallo JensemannDU,

das funktioniert so nicht.
Um das spezielle Objekt deines Features zur instanzieren musst du über die Methode GetSpecificFeature2 gehen.
Also ungefähr so:

Code:

---

swWzdHole = swFeature.GetSpecificFeature2

---

------------------
Mfg Daniel

www.MySldWorks.de - SolidWorks API Snippets

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

---

Hallo Daniel,

wieder einmal vielen Dank für die schnelle Antwort.

Ich habe das soweit auch probiert, und der Fehler kommt auch erst in der Zeile danach, bei HoleDia = swWzdHole.Diameter(). Da sagt er mir: Der Objektverweis wurde nicht auf eine Objektinstanz festgelegt. Und ich solle mit New eine neue Instanz einfügen.

Code:

---

Case "HoleWzd"                 
    HoleWzdCounter += 1       
    swWzdHole = swFeature.GetSpecificFeature2()
    HoleDia = swWzdHole.Diameter()
    TxtBoxDia.Text = TxtBoxDia.Text & HoleDia & Wrap

---

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

---

Einmal wenn man nicht richtig auspasst.
GetSpecificFeature2 ist der flasche Befehl. Diesem benutz man, wenn man zum Beispiel bei einer Skizze das Skizzenfeature initialisieren möchte.
Du aber nöchtest ja die Definition deines Features.
Dazu verwendet man die Methode GetDefinition

Code:

---

Dim oSwHoleFeature As sldworks.WizardHoleFeatureData2
Dim dDurchmesser As Double
oSwHoleFeature = CType( _
    oMyFeature.SwFeature.GetDefinition,  _
    sldworks.WizardHoleFeatureData2)
dDurchmesser = oSwHoleFeature.Diameter

---

Sorry das ich dich in die Irre geführt habe!

------------------
Mfg Daniel

www.MySldWorks.de - SolidWorks API Snippets

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

---

Heho!

Danke, klingt für mich auch sehr logisch, ergibt auch keinen Fehler, allerdings auch das Ergebnis 0,0 was bei einer 5mm Bohrung irgendwie komisch ist. Ich hatte deinen Code so für mich angepasst:

Code:

---

Dim swWzdHole As SldWorks.WizardHoleFeatureData2
Dim HoleDia As Double

swWzdHole = CType( _
    swFeature.GetDefinition,  _
    SldWorks.WizardHoleFeatureData2)

HoleDia = swWzdHole.Diameter()

---

Damit ich das richtig verstehe, CType übergibt die Parameter aus swFeature in ein WizardHoleFeatureData2 Objekt, oder? Hast du eine Ahnung, wo mein Fehler liegt?

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

---

Hallo JensemannDU,

es gibt verschiedene Typen von WizardHoleFeatureData.

Code:

---

Dim eSwWzdHoleTypes As swconst.swWzdHoleTypes_e
eSwWzdHoleTypes = CType(oSwHoleFeature.Type, swconst.swWzdHoleTypes_e)

---

Je nach Typ musst du den Durchmesser anders ermitteln:

Code:

---

dDurchmesser = oSwHoleFeature.HoleDiameter
dDurchmesser = oSwHoleFeature.MajorDiameter
dDurchmesser = oSwHoleFeature.ThruHoleDiameter
dDurchmesser = oSwHoleFeature.TapDrillDiameter

---

Da musst du mal in der API Hilfe nachschlagen.

Zu CType: Damit wird eine Typenumwandlung in Visual Basic angegeben. swFeature.GetDefinition hat als Rückgabe den Typ Object. Der zweite Parameter legt fest, in welchen Typ CType er das Object umwandelt, im Beispiel SldWorks.WizardHoleFeatureData2. Ist Typ sicherer.

------------------
Mfg Daniel

www.MySldWorks.de - SolidWorks API Snippets

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

---

Nun funktionert es! Vielen Dank!

Bei dem Durchmesser hatte ich leider Property mit Methode verwechselt. :-)

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