关于installshield的设置环境变量的问题

594king 2004-02-10 02:32:16
我使用了以下代码,想在path环境变量后添加我自己的路径,但是安装程序执行之后,程序仍然找不到在该path路径下的dll,手工进入环境变量设置区查看发现path变量下有该路径,点击确定退出之后再执行应用程序,发现程序又可以找到该path路径下的dll了,不知道为什么,是不是注册表添加一项之后还需要激活一下才能使用啊?请高手指点
代码如下:
function OnFirstUIAfter()
STRING szTitle, szMsg1, szMsg2, szOption1, szOption2;
NUMBER bOpt1, bOpt2;
string szKeyName;
NUMBER nResult, nvType, nvSize;
STRING szPath, szBinPath;
begin
Disable(STATUSEX);
//DialogSetInfo ( DLG_INFO_ALTIMAGE , SUPPORTDIR ^ "Icon.bmp" , TRUE );
ShowObjWizardPages(NEXT);

RegDBSetDefaultRoot(HKEY_LOCAL_MACHINE);

szKeyName = "SYSTEM\\CURRENTCONTROLSET\\CONTROL\\SESSION MANAGER\\ENVIRONMENT";
nResult = RegDBGetKeyValueEx ( szKeyName, "Path", nvType, szPath, nvSize);
if ( nResult < 0 ) then
MessageBox( "Warning! The \"Path\ envionment variable doesn't exit,please check the envionment variable" , INFORMATION );
endif;
szBinPath = TARGETDIR ^ "\\dll";
nResult = szPath % szBinPath;
if ( !nResult ) then
szPath = szPath + ";" + szBinPath;
Disable( LOGGING );
RegDBSetKeyValueEx ( szKeyName, "Path", nvType, szPath, nvSize );
Enable ( LOGGING );
endif;

end;

我使用的是installshield 6.22
...全文
312 2 打赏 收藏 转发到动态 举报
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复

3,424

社区成员

发帖
与我相关
我的任务
社区描述
其他开发语言 其他开发语言
社区管理员
  • 其他开发语言社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧