Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  

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

Аватара для Dodakaedr

Ветеран


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

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


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

section main
;создание ключа для примера
${registry::Write} "HKLM\SOFTWARE\Classes\CLSID\{EF67C328-46СС-87D7-EA63-D8A946C17D7D}" "" "" "REG_SZ" $8
${registry::Unload}
${registry::Open} "HKLM\SOFTWARE\Classes\CLSID" "/K=1 /G=0 /V=0 /S=0 /NS='46СС'" $0
   ${DoUntil} $0 = 0
       ${registry::Find} $0 "$1" "$2" "$3" "$4"
       StrCpy $9 "$1" 4 -24
       StrCmp $9 '46СС' finish loop
       finish:
       ;${IfThen} "$9" == "" ${|}${Break}${|}  # поиск завершен, выход из цикла
       ${|}${Break}${|}
       ;StrCmp $9 '46СС' 0 +2
       MessageBox mb_ok|mb_iconinformation 'Ключ: $1'
loop:
   ${loop}
   ${registry::Unload}
sectionend

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


Отправлено: 23:51, 21-01-2016 | #1945