Имя пользователя:
Пароль:
 

Показать сообщение отдельно

Аватара для Dodakaedr

Ветеран


Сообщения: 863
Благодарности: 262

Профиль | Отправить PM | Цитировать


Подскажите, пожалуйста, в чем проблема? Почему если в конце ключа реестра стоит цифра то этот ключ пропускается? Для большей понятности:
Скрытый текст
Код: Выделить весь код
outfile "test find key.exe"
!include "Registry.nsh"

function "_bak"
StrCpy $0 0
loop:
  EnumRegKey $1 HKLM "SOFTWARE" $0
  StrCmp $1 "" done
  IntOp $0 $0 + 1
  StrCpy $9 "$1" 14
  StrCmp $9 "ComSysControl." wel loop
  wel:
  ${registry::MoveKey} "HKLM\SOFTWARE\$1" "HKLM\SOFTWARE\$1_bak" $r9
  ${Registry::UnLoad}
  goto loop
done:
functionend

Section
${registry::Write} "HKLM\SOFTWARE\ComSysControl.UserVars.1" "" "" "REG_SZ" $9
${registry::Write} "HKLM\SOFTWARE\ComSysControl.UserVars" "" "" "REG_SZ" $9
${registry::Write} "HKLM\SOFTWARE\ComSysControl.Win_ini.1" "" "" "REG_SZ" $9
${registry::Write} "HKLM\SOFTWARE\ComSysControl.Win_ini" "" "" "REG_SZ" $9
${registry::Unload}
call _bak
SectionEnd

-------
Inno Setup 5 Ultra Unicode


Отправлено: 19:15, 11-03-2016 | #2004