CAD开发者社区 › 首页 ›AutoCAD开发文档› AutoCAD 2023 开发者帮助 › 查看内容

AutoCAD 2023 开发者帮助

Preferences 属性（ActiveX）

2024-5-18 18:57| 发布者: admin| 查看: 241| 评论: 0|原作者: admin|来自: AutoCAD

获取 Preferences 对象。

支持的平台：仅限 Windows

签名

VBA：

object.Preferences

对象

类型：应用程序、数据库、文档

此属性应用于的对象。

属性值

只读：是的

类型：DatabasePreferences、Preferences

or 对象。DatabasePreferencesPreferences

言论

该对象保存“选项”对话框中的选项，这些选项驻留在注册表中。可以通过对象找到驻留在图形中的选项。PreferencesDatabasePreferences

例子

VBA：

Sub Example_Preferences()
    ' This example returns the current setting of
    ' LogFilePath from the preferences object.
    
    Dim preferences As AcadPreferences
    Set preferences = ThisDrawing.Application.Preferences
    
    ' Retrieve the current LogFilePath value
    MsgBox "The current value for LogFilePath is " & preferences.Files.LogFilePath, , "Preferences Example"
    
End Sub

可视化 LISP：

(vl-load-com)
(defun c:Example_Preferences()
    ;; This example returns the current setting of
    ;; LogFilePath from the preferences object.
    (setq acadObj (vlax-get-acad-object))
    (setq preferences (vla-get-Preferences acadObj))

    ;; Retrieve the current LogFilePath value
    (alert (strcat "The current value for LogFilePath is " (vla-get-LogFilePath (vla-get-Files preferences))))
)