获取首选项文件对象。 支持的平台:仅窗口 言论该对象保存存储在注册表中的“选项”对话框中“文件”选项卡中的所有选项。与图形一起存储的所有选项都可以在对象上找到。PreferencesFilesDatabasePreferences 例子工 务 局: Sub Example_Files()
' This example obtains a reference to the Files Preferences object
' from the Application Preferences object, and reads one of the File
' preferences
Dim ACADPref As AcadPreferencesFiles
' Obtain a reference to the Files Preferences object
Set ACADPref = ThisDrawing.Application.preferences.Files
MsgBox "We now have access to the properties and methods of the Files Preferences object!"
MsgBox "The File preference AutoSavePath is set to: " & ACADPref.AutoSavePath
End Sub
Visual LISP: (vl-load-com)
(defun c:Example_Files()
;; This example obtains a reference to the Files Preferences object
;; from the Application Preferences object, and reads one of the File
;; preferences
(setq acadObj (vlax-get-acad-object))
(setq preferences (vla-get-Preferences acadObj))
;; Obtain a reference to the Files Preferences object
(setq ACADPref (vla-get-Files preferences))
(alert "We now have access to the properties and methods of the Files Preferences object!")
(alert (strcat "The File preference AutoSavePath is set to: " (vla-get-AutoSavePath ACADPref)))
)
|
|Archiver|CAD开发者社区
( 苏ICP备2022047690号-1 苏公网安备32011402011833)
GMT+8, 2025-10-29 09:03
Powered by Discuz! X3.4
Copyright © 2001-2021, Tencent Cloud.