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

AutoCAD 2024 开发者帮助

ImportProfile 方法（ActiveX）

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

导入由其他用户创建的配置文件。

支持的平台：仅限 AutoCAD for Windows;AutoCAD LT for Windows 不支持

签名

VBA：

object.ImportProfile Profile, RegFile, IncludePathInfo

对象

类型：PreferencesProfiles

此方法应用到的对象。

轮廓

访问：仅输入

类型：字符串

要导入的配置文件的名称。

注册文件

访问：仅输入

类型：字符串

应从中导入配置文件的注册表文件。该文件应具有 .arg 扩展名。

IncludePathInfo

访问：仅输入

类型：布尔

True：将保留注册表文件中的路径信息。
False：不会保留注册表文件中的路径信息。

返回值（RetVal）

无返回值。

言论

没有其他评论。

例子

VBA：

Sub Example_ImportProfile()
    ' This example imports a profile.
    ' NOTE: A dummy profile name is used so that your existing
    ' profiles are not changed.
    
    Dim preferences As AcadPreferences
    Dim strProfileToImport As String
    
    Set preferences = ThisDrawing.Application.preferences
    
    ' Specify the profile to delete.
    strProfileToImport = "TestProfile"
    
    ' Delete the profile
    ' The call will fail if "TestProfile" does not exist
    On Error GoTo Error
    preferences.Profiles.ImportProfile strProfileToImport, "TESTPROFILE.ARG", True
    
    Exit Sub
    
Error:
    MsgBox "ImportProfile of " & strProfileToImport & " failed. " & Err.Description, , "ImportProfile Example"
        
End Sub

可视化 LISP：

(vl-load-com)
(defun c:Example_ImportProfile()
    ;; This example imports a profile.
    ;; NOTE: A dummy profile name is used so that your existing
    ;; profiles are not changed.
    (setq acadObj (vlax-get-acad-object))
    (setq preferences (vla-get-Preferences acadObj))
    
    ;; Specify the profile to import.
    (setq strProfileToImport "TestProfile")
    (vla-ImportProfile (vla-get-Profiles preferences) strProfileToImport (findfile "TESTPROFILE.ARG") :vlax-true)
)