Hay nueve objetos relacionados con las opciones, cada uno de ellos representado en una ficha del cuadro de diálogo Opciones. Estos objetos proporcionan acceso a todas las opciones almacenadas en el registro mediante el cuadro de diálogo Opciones. Muchos de los parámetros de AutoCAD pueden adaptarse a necesidades personales a través de las propiedades de estos objetos, que son los siguientes:
- PreferencesDisplay
- PreferencesDrafting
- PreferencesFiles
- PreferencesOpenSave
- PreferencesOutput
- PreferencesProfiles
- PreferencesSelection
- PreferencesSystem
- PreferencesUser
Puede acceder a estos objetos a través del objeto Preferences Para acceder al objeto Preferences, utilice la propiedad Preference del objeto Application:
Dim acadPref as AcadPreferences
Set acadPref = ThisDrawing.Application.Preferences
Puede acceder a cualquiera de los objetos Preferences mediante las propiedades Display, Drafting, Files, OpenSave, Output, Profile, Selection, System y User.
Configuración del cursor en cruz para pantalla completa
Sub Ch2_PrefsSetCursor()
' This example sets the crosshairs of the AutoCAD drawing cursor
' to full screen.
' Access the Preferences object
Dim acadPref As AcadPreferences
Set acadPref = ThisDrawing.Application.Preferences
' Use the CursorSize property to set the size of the crosshairs
acadPref.Display.CursorSize = 100
End Sub
Visualización del menú de pantalla y las barras de desplazamiento
Sub Ch2_PrefsSetCursor()
' This example enables the screen menu and disables the scroll
' bars with the DisplayScreenMenu and DisplayScrollBars
' properties.
' Access the Preferences object
Dim acadPref As AcadPreferences
Set acadPref = ThisDrawing.Application.Preferences
' Display the screen menu and disable scroll bars
acadPref.Display.DisplayScreenMenu = True
acadPref.Display.DisplayScrollBars = False
End Sub