Terugkerend probleem tekeningweergave in conceptkwaliteit

Hallo, ik heb een klein beetje code dat alle weergaven terugzet in "hoge kwaliteit". 

Als het helpt. 

'met les vues en haute qualité

    Dim swView As SldWorks.View
    Dim bRet As Boolean
    Set swApp = Application.SldWorks
    Set swDraw = swApp.ActiveDoc
    Set swSheet = swDraw.GetCurrentSheet
    Set swView = swDraw.GetFirstView
    While Not swView Is Nothing
        If swSheet.GetName <> swView.Name Then
            ' Does not work on drawing sheet, which IDrawingDoc::GetFirstView returns
            bRet = swView.SetDisplayMode3(False, swView.GetDisplayMode2, False, True): Debug.Assert bRet
        End If
        Set swView = swView.GetNextView
    Wend

 

1 like

Hallo

Ik had hetzelfde probleem met een tekening van een grote assemblage die me lege weergaven gaf bij het exporteren naar dwg of dxf

Ik vond het onderdeel dat een puinhoop maakte door de assemblage in iges te exporteren en opnieuw samen te stellen uit de iges

Op dat moment kreeg ik een bericht dat een bepaald onderdeel problemen veroorzaakte.

Ik heb het opnieuw gedaan en opnieuw geïntegreerd in de originele assemblage

En daar werkte de dwg-export correct!

Ik denk dat je op deze manier de hagedis in een grote vergadering kunt vinden zonder je er zorgen over te maken!?

Vriendelijke groeten