API: Een merk opslaan als onderdeel

3D Design Volume Model
1

Hallo

 

Ik ben op zoek naar een kleine macro die me in staat stelt om een set van montage in delen op te slaan. Heb je enig idee hoe ik dat kan doen?

Ik ben nieuw in de ontwikkeling van Solidworks, maar ik ken al veel van de VB-taal (Vba, vbnet, ...).

Bij voorbaat dank,

Gautier

2

Hallo

Heb je net geprobeerd een macro op te nemen? Extra/Macro/Opslaan

3

Ja en hier is de code:

Stel swApp in = _
Toepassing.SldWorks

Deel instellen = swApp.ActiveDoc
Deel instellen = swApp.NewDocument("N:\- solidworks library -\base solidworks\pieces_DMI_2011 .prtdot", 0, 0, 0)
swApp.ActivateDoc2 "Part5", False, longstatus
Deel instellen = swApp.ActiveDoc
Deel instellen = swApp.ActiveDoc
myModelView dimmen als object
Stel myModelView = Deel.ActiveView in
myModelView.FrameLeft = 0
myModelView.FrameTop = 0
Stel myModelView = Deel.ActiveView in
myModelView.FrameState = swWindowState_e.swWindowMaximized
swApp.ActivateDoc2 "Spanrol assemblage. SLDASM", Onwaar, longstatus
Deel instellen = swApp.ActiveDoc
longstatus = Part.SaveAs3("C:\a_travail\Deksel verwijderen socket\Spanrolmontage. SLDPRT", 0, 0)

4
Hallo

De instructie die moet worden gebruikt is de klassieke save as, met een paar parameters:

U kunt extra opties voor Opslaan als opgeven met behulp van ISldWorks::SetUserPreferenceIntegerValue. Bijvoorbeeld:

' Sla assemblage op als onderdeel voor meerdere lichamen en bewaar buitenvlakken als oppervlaktelichamen

swApp.SetUserPreferenceIntegerValue swSaveAssemblyAsPartOptions, swSaveAsmAsPart_ExteriorFaces swModelDocExt.SaveAs "H:\Assem1.SLDPRT", swSaveAsCurrentVersion, swSaveAsOptions_Silent, Nothing, nErrors, nWarnings

-goud-

' Sla alle tekenbladen op in een actief tekendocument als een eDrawings-bestand

swApp.SetUserPreferenceIntegerValue swEdrawingsSaveAsSelectionOption, swEdrawingSaveAll swModelDocExt.SaveAs "H:\Grid.edrw", swSaveAsCurrentVersion, swSaveAsOptions_Silent, Nothing, nErrors, nWarnings

Lente:

http://help.solidworks.com/2012/English/api/sldworksapi/SolidWorks.Interop.sldworks~SolidWorks.Interop.sldworks.IModelDocExtension~SaveAs.html

Een voorbeeld is hier beschikbaar:

https://forum.solidworks.com/servlet/JiveServlet/download/291777-83609/Save%20Assy%20As%20Part%20 (Buitenkant%20Oppervlakken).zip

3 likes
5

Geweldig bedankt, dat is precies wat ik nodig had.

Ik zal in staat zijn om te beginnen ;)

6

Aan de andere kant, een kleine vraag:

Waarom coderen:

Toepassing.FileDialog(msoFileDialogmapkiezer). Tonen

 

Werkt het niet?

 

Hiermee kan ik een map selecteren om een reeks bestanden te selecteren.