Sub SetTessellationQuality( _
   ByVal QualityNum As Integer _
) 

Dim instance As IModelDoc2
Dim QualityNum As Integer
 
instance.SetTessellationQuality(QualityNum)

void SetTessellationQuality( 
   int QualityNum
)

void SetTessellationQuality( 
&   int QualityNum
) 

Parameters

QualityNum

Number between 0 and 100 that indicates the quality of tessellation to use for this part; a higher index means finer tessellation

This method changes the shaded-display quality setting on your system, not just the current document. The numeric deviation value changes based on the current part. This deviation is calculated as follows:

QualityIndex = TessMin + QualityNum*((TessMax-TessMin)/100)

Deviation = 0.025 * (BodyDiameter) / QualityIndex

where BodyDiameter is the diagonal distance across the bounds of the part box. See IPartDoc::GetPartBox or IPartDoc::IGetPartDoc for details.

The resulting deviation value is in meters.

Use IModelDoc2::GraphicsRedraw2 after using this method to update part.