| | |
 | Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für CATIA & Co. |
| | |
 | KISTERS 3DViewStation: Schutz sensibler 3D CAD Daten, egal von wo Sie arbeiten, eine Pressemitteilung
|
|
Autor
|
Thema: 3D Genauigkeit per CATVBA ändern (870 mal gelesen)
|
geekv5
Mitglied
Konstrukteur
   Beiträge: 214
Registriert: 13.07.2011 Notebook<P>MSI GX660R
Intel Core i5 460M
8GB DDR3
1GB Mobility HD5870
80GB Intel X25-M Postville
250GB HDD<P>Desktop<P>AMD Phenom II X4 965
1GB HD4890@ FirePro V8700
8GB DDR3-1600
2,5TB HDD<P>Belinea 2485 S1W 24" MVA
|
erstellt am: 05. Dez. 2011 11:16  <-- editieren / zitieren -->   Unities abgeben:          
Hallo zusammen! Ist es eigentlich möglich per VBA die 3D Genauigkeit zu ändern? Hintergrund ist, ich möchte eine STL exportieren und wenn ich das richtig sehe hängt die Genauigkeit der Tesselierung von der Genauigkeit der Darstellung ab.. Korrigiert mich bitte, wenn ich falsch liege.. Gruß Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
bgrittmann
Moderator
Konstrukteur
    
Beiträge: 12054
Registriert: 30.11.2006 CATIA V5R19
|
erstellt am: 05. Dez. 2011 11:37 <-- editieren / zitieren --> Unities abgeben: Nur für geekv5 
|
geekv5
Mitglied
Konstrukteur
Beiträge: 214
Registriert: 13.07.2011 Notebook<P>MSI GX660R
Intel Core i5 460M
8GB DDR3
1GB Mobility HD5870
80GB Intel X25-M Postville
250GB HDD<P>Desktop<P>AMD Phenom II X4 965
1GB HD4890@ FirePro V8700
8GB DDR3-1600
2,5TB HDD<P>Belinea 2485 S1W 24" MVA
|
erstellt am: 05. Dez. 2011 11:49 <-- editieren / zitieren --> Unities abgeben:
Hi, das Ergebnis der Aufzeichnung funktioniert sofort, wusste nicht, dass er auch Änderungen der Settings aufzeichnen kann.. Wer sich die Arbeit sparen will, hier der Code: Code:
Sub CATMain()Dim settingControllers1 As SettingControllers
Set settingControllers1 = CATIA.SettingControllers Dim visualizationSettingAtt1 As VisualizationSettingAtt
Set visualizationSettingAtt1 = settingControllers1.Item("CATVizVisualizationSettingCtrl") visualizationSettingAtt1.TwoSideLightingMode = False visualizationSettingAtt1.Viz3DFixedAccuracy = 0.2 visualizationSettingAtt1.SaveRepository End Sub
Danke für die schnelle Hilfe! Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Foren auf CAD.de
| 
