菜单问题

china-hz · 发表于 2006-2-25 19:58:00

本帖最后由作者于 2006-2-25 20:43:12 编辑

如何增加支持文件路径（就是选项里的那个路径）？先谢了

王咣生 · 发表于 2006-2-25 21:16:00

Sub test()
    Dim preferences As AcadPreferences
    Dim currSupportPath As String
    Dim newSupportPath As String

    Set preferences = ThisDrawing.Application.preferences

    currSupportPath = preferences.Files.SupportPath

    newSupportPath = "c:\;" + currSupportPath   '添加c:\
    preferences.Files = newSupportPath
End Sub

china-hz · 发表于 2006-2-25 21:31:00

谢谢

china-hz · 发表于 2006-2-25 21:50:00

加载没问题了，可是在卸载的时候，会把不想要卸载的也会卸掉，如何解决呢？

王咣生 · 发表于 2006-2-25 22:35:00

你要判断要删除哪个路径了,

哪个不想卸就留着啊.

china-hz · 发表于 2006-2-26 09:58:00

请问如何卸载呢？比如要卸载刚才加载的"c:\"路径

账号		自动登录	找回密码
密码			注册

菜单问题

reply