Innosetup 读写注册表，读写INI文件

一.innosetup读写注册表

        1.注册表读写字符串 (RegQueryStringValue，RegWriteStringValue)

        RegQueryStringValue(HKEY_CURRENT_USER, 'SOFTWARE\SODA', 'appversion',         appversion)

         RegWriteStringValue(HKEY_CURRENT_USER, 'SOFTWARE\SODA', 'appversion',         'soda_value');

        2.注册表读写DWORD (RegQueryStringValue，RegWriteStringValue)

        RegQueryDWordValue(HKEY_CURRENT_USER,  'SOFTWARE\SODA', 'appversion', 
        appversion)

        RegWriteDWordValue(HKEY_CURRENT_USER,  'SOFTWARE\SODA','appversion', 
        0)

        3.删除注册表某项

        RegDeleteValue(HKEY_CURRENT_USER, 'SOFTWARE\SODA', 'appversion')

二.innosetup 读写ini文件，示例展示读取ini文件, 并将字符串切割后写入注册表

        function RegisterSuffix(const Section, Key, Default, Filename: String): Boolean;
        var
        customSuffixArray: TArrayOfString;
        suffix:String;
        index:Integer;
        begin

                suffix := GetIniString(Section, Key, Default, Filename);
                customSuffixArray := StrSplit(suffix, ',');
                for index:=0 to GetArrayLength(customSuffixArray)-1 do
                begin

                        RegWriteStringValue(HKEY_CLASSES_ROOT, '.' + customSuffixArray[index], '',                         'SODA');
                end;

                Result := true;
        end;