Partager via


ApplicationSettings.FreeformDrawingPrecision Property

Visio Automation Reference

Determines the margin of error allowed when the Freeform tool is drawing a straight line before it switches to drawing a spline. Read/write.

Version Information
 Version Added:  Visio 2003

Syntax

expression.FreeformDrawingPrecision

expression   A variable that represents an ApplicationSettings object.

Return Value
Long

Remarks

Setting the FreeformDrawingPrecision property is equivalent to setting the Precision option on the Advanced tab in the Options dialog box (Tools menu).

Possible values for the FreeformDrawingPrecision property range from 0 (Tight) to 10 (Loose). The default is 5.

Example

The following Microsoft Visual Basic for Applications (VBA) macro shows how to use the FreeformDrawingPrecision property to print the current freeform drawing precision setting in the Immediate window. It also shows how to get an ApplicationSettings object from the Visio Application object.

Visual Basic for Applications
  Public Sub FreeformDrawingPrecision_Example()
Dim vsoApplicationSettings As Visio.ApplicationSettings
Dim lngPrecisionSetting As Long

Set vsoApplicationSettings = Visio.Application.Settings
lngPrecisionSetting = vsoApplicationSettings.FreeformDrawingPrecision

Debug.Print lngPrecisionSetting

End Sub

See Also