5)给出信息框,告知安装成功,如有问题则告知安装失败。 需要指出的是,在添入acad2000doc.1sp的内容中须有如下语句 ( command“menu”( strcat( getvar" menuname")".mnu")),目的是为 了强制执行菜单文件装入命令,将改动后的acad.mu文件编译后装入。 另外,在添入acad2000doc.sp的内容中还有一赋值语句,将准备创建的 包含所有二次开发生成文件的子目录全路径名赋予一全局变量,以供二次 开发程序在需要时调用,从而避免了在 AutoCaD环境下交互设定路径的麻 烦 实现方式及关键函数 为获得 AutoCaD2000的安装路径,需要利用 WINDOWS系统注册表的有关功能 首先通过 RegOpenKeyl函数打开注册表 HKEY hKey; LONGret=RegOpenKey( HKEY LOCAL mACHine, Software\\Autodesk\ \AutoCAD\\R14. 0\\ACAD-1: 804",&hKey 其中第一参数 HKEY LOCAL-MACHINE为注册表中预定义的主键句柄,第二 参数为注册表中 HKEY LOCAL MACHINE下的子键内容,第三参数hKey将返 回一子键句柄,用于接下来的键值查询。若该函数运行成功,将返回一长 整型数 ERROR SUCCES 接下来利用 RegQueryValueEx函数进行键值查询: dWoRd dwType=REG SZ BYTE sZData[1005） 给出信息框，告知安装成功，如有问题则告知安装失败。 需要指出的是，在添入acad2000doc.lsp的内容中须有如下语句： （command“_menu”(strcat (getvar "menuname") ".mnu")），目的是为 了强制执行菜单文件装入命令，将改动后的acad.mnu文件编译后装入。 另外，在添入acad2000doc.lsp的内容中还有一赋值语句，将准备创建的 包含所有二次开发生成文件的子目录全路径名赋予一全局变量，以供二次 开发程序在需要时调用，从而避免了在AutoCAD环境下交互设定路径的麻 烦。 二、 实现方式及关键函数 为获得AutoCAD2000的安装路径，需要利用WINDOWS系统注册表的有关功能 。 首先通过RegOpenKey函数打开注册表： HKEY hKey; LONGret=RegOpenKey( HKEY_LOCAL_MACHINE, "Software\\Autodesk\\AutoCAD\\R14.0\\ACAD-1:804", &hKey); 其中第一参数HKEY＿LOCAL－MACHINE为注册表中预定义的主键句柄，第二 参数为注册表中HKEY＿LOCAL＿MACHINE下的子键内容，第三参数hKey将返 回一子键句柄，用于接下来的键值查询。若该函数运行成功，将返回一长 整型数ERROR＿SUCCESS。 接下来利用RegQueryValueEx函数进行键值查询： DWORD dwType=REG_SZ; BYTE szData[100];