[vahe-91]

kotkovets, спасибо, попробую избавится от goto

[kotkovets]

Попробуй, но не гарантирую, что будет "существенно" быстрее, трудно судить не видя проблемного кода,
если все таки есть цикл - это и есть тормоз, ведь ему надо "двигать" прогресс - это существенно замедляет работу в целом
Здесь только поможет макрос писать с использованием хидера Util.nsh - который основан на функции и перехода
по абсолютной метке - это сильно ускоряет работу цикла. Если надо могу показать такой пример цикла.

[vahe-91]

kotkovets спасибо за советы,если сам не справлюсь, отправлю скрипт по ПМ, если у вас будет время, посмотрите ?

[kotkovets]

да ради бога, сейчас не буду смотреть - позже.

[vahe-91]

макрос FileAssociation.nsh скачанный отсюда http://nsis.sourceforge.net/File_Association пишет в HKCR, а мне нужно в HKLM \SOFTWARE\Classes. Если я в FileAssociation.nsh изменю все HKCR в HKLM "SOFTWARE\Classes", то будет все корректно работать ? если уже есть исправленная версия дайте ссылку пожалуйста.

[kotkovets]

макрос FileAssociation.nsh скачанный отсюда http://nsis.sourceforge.net/File_Association пишет в HKCR, »

Особой такой разницы нету, HKCR или HKLM - все равно записи продублируются.
Ну коль зачесалось, то меняй HKCR или HKLM
расставь для отладки в макросе сообщения для наглядного просмотра и правки макроса, если нужно:

Код:

MessageBox MB_OK "$$R0 = $R0$\n$$R1 = $R1"

$R0 или $R1 могут(не проверял) - SOFTWARE\Classes или какой ты там ключ укажешь в аргументах макроса,
нетрудно сопоставить с нужными тебе ветками реестра. Еще имеет смысл $R0 - в кавычки одеть.

Код:

WriteRegStr HKCR "$R1" "" "$R0"

и так далее.

[CyberMaster]

Чет не врубаюсь, почему InstallDirRegKey не хочет брать путь из реестра? 100500 раз проверял путь в реестре - все правильно и запись существует. Если закомментировать InstallDir "$PROGRAMFILES\Directory", тогда поле "Папка установки" в ингаляторе вообще пустое.

Код:

	!define PRODUCT_NAME "TeamSpeak 3 Client"
	!define PRODUCT_VERSION "3.0.1"
	!define pkgdir "C:\TeamSpeak\package"

	;Name and file
	Name "${PRODUCT_NAME}"
	OutFile "TeamSpeak3-Client-win64-${PRODUCT_VERSION}.exe"

	SetCompressor /FINAL ZLIB

	;Default installation folder
	InstallDir "$PROGRAMFILES\Directory"
 
	;Get installation folder from registry if available
	InstallDirRegKey HKLM "Software\TeamSpeak 3 Client" ""
 
	RequestExecutionLevel user
;--------------------------------
;Interface Settings
	!include "MUI.nsh"
	!define MUI_ABORTWARNING
	!define MUI_ICON "${NSISDIR}\Contrib\Graphics\Icons\modern-install.ico"
	!insertmacro MUI_PAGE_DIRECTORY
	!insertmacro MUI_PAGE_INSTFILES
	!insertmacro MUI_PAGE_FINISH
	!insertmacro MUI_LANGUAGE "Russian"
;--------------------------------

Section
SectionEnd

[kotkovets]

Чет не врубаюсь, почему InstallDirRegKey не хочет брать путь из реестра? 100500 раз проверял путь в реестре - все правильно и запись существует »

Потому что, гладиолус

Код:

	;Default installation folder
	InstallDir "$PROGRAMFILES\Directory"

	;Get installation folder from registry if available
	InstallDirRegKey HKLM "SOFTWARE\NSIS" ""

При любом раскладе все работает!
А ваш InstallDirRegKey не соответсвует, тому что нужно, 100%

Код:

InstallDirRegKey HKLM "Software\TeamSpeak 3 Client" ""

100500 раз проверял »

Можно ключ по умолчанию проверить 100501 раз

Код:

ReadRegStr $0 HKLM "SOFTWARE\TeamSpeak 3 Client" ""
MessageBox MB_OK "$0"

[CyberMaster]

Код:

ReadRegStr $0 HKLM "SOFTWARE\TeamSpeak 3 Client" ""
MessageBox MB_OK "$0"

Так тоже выводит пустое сообщение, но вот экспортировал запись из своего реестра:

Код:

Windows Registry Editor Version 5.00

[HKEY_LOCAL_MACHINE\SOFTWARE\TeamSpeak 3 Client]
@="P:\\Program Files\\TeamSpeak"
"InstallMode"="AllUsers"
"ConfigLocation"="1"
"Start Menu Folder"="TeamSpeak 3 Client"

Как видите запись существует и путь к ней правильный. В чем же тогда дело? Это может быть связано с ОС? У меня Windows 7 x64

[kotkovets]

У меня Windows 7 x64 »

С этого и надо бы начинать!
InstallDirRegKey - имеет доступ только к 32-разрядному виду реестра.
Поэтому нужно редирект делать в первой функции.
Для начало подключаем хедер к телу скрипта - !include x64.nsh

Код:

Function .OnInit
   ${If} ${RunningX64}
         SetRegView 64 ;включаем 64-разрядный вид
         ClearErrors
         ReadRegStr "$INSTDIR" HKLM "SOFTWARE\TeamSpeak 3 Client" ""
         ${If} ${Errors}
         ${OrIf} "$INSTDIR" == ""
            StrCpy "$INSTDIR" "$PROGRAMFILES\Directory"
         ${EndIf}
         SetRegView 32 ;включаем 32-разрядный вид (для 32-битных приложений)
   ${EndIf}
FunctionEnd

Этот код почти аналог - InstallDirRegKey в х64