ronjonp 发表于 2007-5-17 18:32:37


嘿,Bryon,我很感激,我特别关注最后一个子集,我试过了,但我得到了一个子集或函数,没有在线定义WriteStringValue HKEY_CURRENT_USER, KeyName, valueName, dataValue
是否缺少一个函数或另一个子例程
谢谢你,马克

ronjonp 发表于 2007-5-17 19:26:14

Ml,它包含在您放入模块的部分中(我在我的dvb中称为“注册表”模块)
您需要它和使其工作的常数。

ronjonp 发表于 2007-5-18 08:33:47

PageSetupOverridesTemplateFile属性是您需要的。将下面的代码放入sub并运行它。它应该在即时窗口中打印图纸集模板文件的位置
Sub Example_PageSetupOverridesTemplateFile()
Dim MyFiles As IAcadPreferencesFiles2
Set MyFiles = AcadApplication.Preferences.Files
Debug.Print MyFiles.PageSetupOverridesTemplateFile
End Sub

ronjonp 发表于 2007-5-18 09:04:19


DOH
我需要更好地阅读帖子;

ronjonp 发表于 2007-5-18 09:11:01

这个怎么样
(vla-put-templatedwgpath
(vla-get-files
    (vla-get-preferences
      (vlax-get-acad-object)
    )
)
"c:\\"
)
(setenv "TemplatePath" "C:\\")
页: 1 [2]
查看完整版本: 图纸模板文件路径在API中的位置?