论坛风格切换切换到宽版
  • 4774阅读
  • 2回复

[求助]innoSetup [Code]段对注册表的操作 [复制链接]

上一主题 下一主题
离线lovelost
 

发帖
140
金钱
1060
威望
106
只看楼主 倒序阅读 0 发表于: 2011-02-15
小弟想在[Code]段中删除注册表中的一项,但函数DeleteRegKey似乎不被innosetup支持,也无法声明一个Tregistry类型,我该如何在[Code]段中删除一个形如
(HKEY_LOCAL_MACHINE, 'SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\aaa')
的项呢?谢谢!
离线xwhminghan

发帖
263
金钱
1440
威望
144
只看该作者 1 发表于: 2011-02-15
  1. 注册表 函数
  2. function RegKeyExists(const RootKey: Integer; const SubKeyName: String): Boolean;
  3. function RegValueExists(const RootKey: Integer; const SubKeyName, ValueName: String): Boolean;
  4. function RegGetSubkeyNames(const RootKey: Integer; const SubKeyName: String; var Names: TArrayOfString): Boolean;
  5. function RegGetValueNames(const RootKey: Integer; const SubKeyName: String; var Names: TArrayOfString): Boolean;
  6. function RegQueryStringValue(const RootKey: Integer; const SubKeyName, ValueName: String; var ResultStr: String): Boolean;
  7. function RegQueryMultiStringValue(const RootKey: Integer; const SubKeyName, ValueName: String; var ResultStr: String): Boolean;
  8. function RegQueryDWordValue(const RootKey: Integer; const SubKeyName, ValueName: String; var ResultDWord: Cardinal): Boolean;
  9. function RegQueryBinaryValue(const RootKey: Integer; const SubKeyName, ValueName: String; var ResultStr: AnsiString): Boolean;
  10. function RegWriteStringValue(const RootKey: Integer; const SubKeyName, ValueName, Data: String): Boolean;
  11. function RegWriteExpandStringValue(const RootKey: Integer; const SubKeyName, ValueName, Data: String): Boolean;
  12. function RegWriteMultiStringValue(const RootKey: Integer; const SubKeyName, ValueName, Data: String): Boolean;
  13. function RegWriteDWordValue(const RootKey: Integer; const SubKeyName, ValueName: String; const Data: Cardinal): Boolean;
  14. function RegWriteBinaryValue(const RootKey: Integer; const SubKeyName, ValueName, Data: AnsiString): Boolean;
  15. function RegDeleteKeyIncludingSubkeys(const RootKey: Integer; const SubkeyName: String): Boolean;
  16. function RegDeleteKeyIfEmpty(const RootKey: Integer; const SubkeyName: String): Boolean;
  17. function RegDeleteValue(const RootKey: Integer; const SubKeyName, ValueName: String): Boolean;
呵呵,很囧,我本人没有学过计算机语言之类的课程,而我学习打包软件,完全处于自己的兴趣而已,Inno Setup 也只是学习了几个月,NSIS 也只是接触一点点,对于Pascal语言,没有一个系统的了解,因此还很陌生,还望大虾们以后多多赐教,表笑我啊~~
离线lovelost

发帖
140
金钱
1060
威望
106
只看该作者 2 发表于: 2011-02-15
太感谢了,搞定了!