ApplicationSettings.FreeformDrawingPrecision Property (Visio)
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 Visio Options dialog box (click the File tab, and then click Options).
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.
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