RevolvedCutouts.add mit VB.net ( Siemens Digital Industries Software/Solid Edge)


	Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für SolidEdge
Autor	Thema: RevolvedCutouts.add mit VB.net (263 mal gelesen)
progi Mitglied Programmierer Beiträge: 74 Registriert: 18.08.2004 VB.net SE 16	erstellt am: 24. Mrz. 2005 14:40 <-- editieren / zitieren --> Unities abgeben: Hallo, hat einer schon mal einen Ausschnitt rotiert per VB. Die Funktion ist mal wieder toll beschrieben, ich habe folgendes probiert: oRevolvedCutout = oModel.RevolvedCutouts.Add(1, oProfile, Profile.RefAxis, SolidEdge.Part.Interop.FeaturePropertyConstants.igLeft, SolidEdge.Part.Interop.FeaturePropertyConstants.igThroughAll, SolidEdge.Part.Interop.FeaturePropertyConstants.igRight, 180, Nothing, Nothing, SolidEdge.Part.Interop.FeaturePropertyConstants.igAll, SolidEdge.Part.Interop.FeaturePropertyConstants.igRight, 180, Nothing, Nothing) Besten Dank Andreas ------------------ Besten Dank Andreas Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP
modeng Ehrenmitglied V.I.P. h.c. Beiträge: 7061 Registriert: 10.12.2003	erstellt am: 04. Apr. 2005 14:30 <-- editieren / zitieren --> Unities abgeben: Nur für progi hmm, die Add Methode in dieser Form ist in V14 noch nicht vorhanden un per VB hab ich's auch noch nicht gemacht aber die Winkelangabe muesste wohl in Radians sein also 180 * (PI / 180) modeng Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP
progi Mitglied Programmierer Beiträge: 74 Registriert: 18.08.2004 VB.net SE 16	erstellt am: 04. Apr. 2005 14:42 <-- editieren / zitieren --> Unities abgeben: Hallo modeng, mit dem Bogenmaß habe ich mal wieder nicht gesehen. Ich habe jetzt die folgende Funktion genommen, damit klappts: oRevolvedCutout = oModel.RevolvedCutouts.AddFinite( _ oProfile, _ oRefAxis, _ Edge.Part.Interop.FeaturePropertyConstants.igLeft, _ SolidEdge.Part.Interop.FeaturePropertyConstants.igRight, _ Math.PI * 2) ------------------ Besten Dank Andreas Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP
modeng Ehrenmitglied V.I.P. h.c. Beiträge: 7061 Registriert: 10.12.2003	erstellt am: 04. Apr. 2005 14:51 <-- editieren / zitieren --> Unities abgeben: Nur für progi die AddFinite() gibt's auch in V14 ;-) -- wie hast du den das Profile (Linie o.ae.) un die RefAxis (auch als Linie ?) definiert? Aus der Hilfe wird man ja nicht so recht schlau. modeng Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP
progi Mitglied Programmierer Beiträge: 74 Registriert: 18.08.2004 VB.net SE 16	erstellt am: 04. Apr. 2005 14:57 <-- editieren / zitieren --> Unities abgeben: Hi, da muß man im Profile eine einfache Linie erzeugen, die man dann umwandelt, vielleicht geht das auch anders? Hier meine Lsg: oLine2D = Profile.Lines2d.AddBy2Points(fCenter2D(0), fCenter2D(1), _ fCenterEnd2D(0), fCenterEnd2D(1)) Profile.SetAxisOfRevolution(oLine2D) oRefAxes = moDoc.RefAxes moRefAxis = oRefAxes.Item(moDoc.RefAxes.Count) So klappts erst mal, jedoch kriege ich keine Relations an die RefAxis, muß ich wohl noch ein wenig rummurksen! ------------------ Besten Dank Andreas Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP
modeng Ehrenmitglied V.I.P. h.c. Beiträge: 7061 Registriert: 10.12.2003	erstellt am: 04. Apr. 2005 15:03 <-- editieren / zitieren --> Unities abgeben: Nur für progi lag ich also garnicht soweit daneben ;-) Ich hatte naemlich bei RefAxis geschaut -- aber da gab's kein Add nur wie nun dem AddFinite() eine RefAxis unterjubeln ... Ach dieses ewige 'stochern im Nebel' wenn's um die API geht ... Besten Dank nochmal modeng Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

Anzeige.:
X

Anzeige: (Infos zum Werbeplatz >>)