安装目录前添加函数判断是否覆盖安装

Share

可以在安装目录前添加一个函数判断是否是覆盖安装，如果是则禁用掉目录选择按钮。

1. 
   
2. ;此函数如果发现注册表中已经有数据，也就是说已经安装了产品则禁用掉路径选择页面的对话框和浏览按钮两控件。
   
3. !define MUI_PAGE_CUSTOMFUNCTION_show Pageshow
   
4. !insertmacro MUI_PAGE_DIRECTORY
   
5. 
   
6. Function PageShow
   
7. ReadRegStr $0 HKLM "${PRODUCT_DIR_REGKEY}" ""
   
8. ${If} $0 == ""
   
9. ${Else}
   
10. ;禁用浏览按钮
    
11. FindWindow $0 "#32770" "" $HWNDPARENT
    
12. GetDlgItem $0 $0 1001
    
13. EnableWindow $0 0
    
14. ;禁用编辑的目录
    
15. FindWindow $0 "#32770" "" $HWNDPARENT
    
16. GetDlgItem $0 $0 1019
    
17. EnableWindow $0 0
    
18. FindWindow $0 "#32770" "" $HWNDPARENT
    
19. GetDlgItem $0 $0 1006
    
20. 
    
21. SendMessage $0 ${WM_SETTEXT} 0 "STR:已经检测到在您的电脑上安装了 ${PRODUCT_NAME} ，现在进行的覆盖安装不能更改安装目录，如果您需要更改安装目录，请先卸载已经安装的版本之后再运行此安装程序！"
    
22. ${EndIf}
    
23. FunctionEnd
    
24. 
    
25. ;从注册表中读取安装路径
    
26. InstallDirRegKey HKLM "${PRODUCT_DIR_REGKEY}" ""               
    
27. ;默认安装路径
    
28. InstallDir "$PROGRAMFILES\${PRODUCT_NAME}"     
    
29. 复制代码
    
30. 
    

复制代码