[ARX函数]：如何才能准确搜索出autocad200,autocad2002的安装目录？

lxm

如何才能准确搜索出中文、英文autocad200、autocad2002的安装目录？用RegOpenKey时，子键名是否都是Software\\Autodesk\\AutoCAD\\R15.0\\ACAD-1：804
盼高手指点？万分感谢！

rave

最初由 lxm 发布
[B]如何才能准确搜索出中文、英文autocad200、autocad2002的安装目录？用RegOpenKey时，子键名是否都是Software\\Autodesk\\AutoCAD\\R15.0\\ACAD-1：804
盼高手指点？万分感谢！ [/B]

如果是英文版 子键名是Software\\Autodesk\\AutoCAD\\R15.0\\ACAD-1：409

在Arx中，是没有必要通过访问注册表来获得ACAD安装路径的, 用 ::GetModuleFileName() 就可以直接得到

1. 
   
2.     TCHAR fullpath[_MAX_PATH];
   
3.     ::GetModuleFileName( acedGetAcadWinApp()->m_hInstance, fullpath, _MAX_PATH );
   
4.     //...
   

复制代码

在VBA中, 也可以通过 Application.FullName 得到

2. 
   
3. Public Sub ACADPATH()
   
4.     MsgBox ThiDrawing.Application.FullName
   
5. End Sub
   

<br /> Public Sub ACADPATH()<br />     MsgBox ThiDrawing.Application.FullName<br /> End Sub<br />

如果想在ACAD之外检测ACAD的安装路径, 你应当首先得到HKEY_LOCAL_MACHINE\\Software\\Autodesk\\AutoCAD\\R15.0\\CurVer 的值( 这个值是与语言相关的) , 再去取AcadLocation.
下面是检测ACAD安装路径的一段NSIS脚本,你可以参考

1.   
   
2.   ReadRegStr $R9 HKLM Software\Autodesk\AutoCAD\R15.0 CurVer
   
3.   StrCmp $R9 "" abort
   
4.   StrCpy $R9 "Software\Autodesk\AutoCAD\R15.0\$R9"
   
5.   
   
6.   ReadRegStr $9 HKLM $R9 AcadLocation
   
7.   StrCmp $9 "" abort
   

复制代码

lxm

谢谢！

panhaizhou

我都有了，可就是不太会用，还不如用R14

DARCY

"Rave"斑竹，看来你做“ARX程序安装程序“很有经验，能否给我传授一二？
           我的邮箱：DARCY_LIU@163.COM