[yyv]

Здравствуйте
Уже мозг сломал, пока ничего не могу придумать, Может вы что подскажете.
Есть такая задача.
Регулярно создается большое количество инсталлеров. Некоторые могут отличаться сильно по секциям и страницам, а в некоторый отличие только в значении переменных.
к примеру отличаються только названием программы и описанием
define PRODUCT_NAME "name test"
переменные задаются при генерации скрипта через ключ /D.
Стал вопрос можно ли на этот тип инсталлеров сделать один типовой а остальные данные брать из вне при установке программы. скажем читать черз ini файл?
пробовал в функции .onInit вызвать другую функцию
и прочитать эти данные
ReadINIStr $R1 "$TEMP\settings.ini" "PRODUCT_NAME" "Text"
!undef PRODUCT_NAME
!define PRODUCT_NAME $R1

но это работает не так как надо
значение переменной вроде заменяться
MessageBox MB_OK|MB_ICONSTOP "${PRODUCT_NAME}"
выводит именно то значение что прописано в settings.ini
но на страницах где должно отображаться PRODUCT_NAME отображается 0.
реально ли выполнить задачу под эти требования?
если да буду раз советам
с ув. Ярослав

[Krinkels]

yyv
Не думаю что такое возможно, хотя подождем, что скажет на это гуру kotkovets
А вообще, ИМХО, в таких случаях проще все константы которые нужно изменить запихнуть в отдельный файл и там их изменять.

[kotkovets]

yyv,
Можно сделать примерно так (пример на этапе инсталляции):
1. Команды не в коем случае не перемещать - здесь очень важна последовательность действий!
2. Константы иницилизируем, только в функции OnInit, потом будет поздно и значения констант определяем только после отработки макроса PRODUCTNAME и следовательно, объявляем значения констант после макроса - банальная последовательность действий
3. Это извращение, проще хранить значения в переменных. причем в данном случае в объявленных переменных, может быть покажу, когда именно, в какой момент нужно делать - здесь вся загвоздка.

Код:

!include "MUI2.nsh"
!include "Logiclib.nsh"

OutFile file.exe

!macro PRODUCTNAME
  ReadINIStr $R1 "$EXEDIR\settings.ini" "PRODUCT_NAME" "Text"
  ${IfNot} $R1 == ""
       StrCpy $R1 "$R1"
  ${Else}
       ClearErrors
       StrCpy $R1 "это NSIS ${NSIS_VERSION}" ;если $R1 = "пустому значению", то назначаем по умолчанию значение
  ${EndIf}
!macroend

!define MUI_WELCOMEPAGE_TITLE "$R1"
!define PRODUCT_NAME "$R1"
Caption "$R1"

!insertmacro MUI_PAGE_WELCOME
!insertmacro MUI_PAGE_INSTFILES
!insertmacro MUI_LANGUAGE "Russian"

ShowInstDetails show

Function .OnInit
 !insertmacro PRODUCTNAME
FunctionEnd

Section ""
  MessageBox MB_ICONINFORMATION|MB_OK ${PRODUCT_NAME}$\n$\r$R1
SectionEnd

[yyv]

спасибо это вроде работает.
надо будет еще тестировать

Это извращение, проще хранить значения в переменных. причем в данном случае в объявленных переменных, может быть покажу, когда именно, в какой момент нужно делать - здесь вся загвоздка. »

я понимаю что это извращение , но первоначальный код писал не я и там во все коде очень много завязано на этих константах.
там перед фунцией
идет куча проверок
типа

Код:

!ifdef AFTERDOWNLOAD  	Page custom customPageAfterdownload  	 !endif

т.е. в зависимости от того есть или нет константа показывать или нет страницу.

из за этого получается много инсталеров.
вот решили попробовать сделать один а странницы показывать или нет с ини файлика вытягивать данные

[kotkovets]

надо будет еще тестировать »

тестируйте. а в самый лучший вариант изменения всех страниц, делать в функциях во время открытия страниц, по различным условиям - будь это запуск с ключом /G и так далее, я так делаю и без проблем!эти функции можно узнать в Справочнике по NSIS (стандартные функции в MUI) или в оригинальной справке. Если не разберетесь - я вам пример приведу.

[wolkow70]

kotkovets,
Подскажите, плиз, что нужно добавить в данный макрос, что бы в контекстном меню файлов появилось Открыть в FastStone Image Viewer.

!macro RegisterExtension extenstion ContentType PerceivedType ClassName DefaultIcon OpenCommand

WriteRegStr HKCR "${extenstion}" "" "${ClassName}"
WriteRegStr HKCR "${extenstion}" "PerceivedType" "${PerceivedType}"
WriteRegStr HKCR "${extenstion}" "Content Type" "${ContentType}"
WriteRegStr HKCR "${ClassName}\DefaultIcon" "" "${DefaultIcon}"
WriteRegStr HKCR "${ClassName}\shell\open\command" "" "${OpenCommand}"
!macroend


Пробовал сам добавить таким макаром:

var CommandName


!macro RegisterExtension extenstion ContentType PerceivedType ClassName DefaultIcon OpenCommand CommandName

WriteRegStr HKCR "$ClassName\shell\open" "" "CommandName"

StrCpy $CommandName "Открыть в FastStone Image Viewer"

!insertmacro RegisterExtension ".bmp" "image/bmp" "image" "FastStone.bmp" "$OUTDIR\FSIcons.db,0" $OpenCommand $CommandName


Не работает вариант!

[kotkovets]

wolkow70
Две строчки кода и никаких гвоздей! на примере Reg2Nsis

Код:

Section
  WriteRegStr HKLM "SOFTWARE\Classes\regfile\shell\Reg2Nsis" "" "&Convert to nsis script"
  WriteRegStr HKLM "SOFTWARE\Classes\regfile\shell\Reg2Nsis\command" "" "$\"${NSISDIR}\reg2nsis.exe$\" $\"%1$\" -O"
SectionEnd

[wolkow70]

Две строчки кода и никаких гвоздей! на примере Reg2Nsis »

Это придется на каждое расширение делать. Мне именно макрос нужно поправить.

Сейчас попробовал применить другой макрос, сделал так:


!macro RegisterExtension extenstion
StrCpy $ClassName "FastStone.${extenstion}"
WriteRegStr HKCR ".${extenstion}" "" "$ClassName"
WriteRegStr HKCR "$ClassName\shell\open" "" "Открыть в FastStone Image Viewer"
WriteRegStr HKCR "$ClassName\shell\open\command" "" "$OpenCommand"
DeleteRegKey HKCU "Software\Microsoft\Windows\CurrentVersion\Explorer\FileExts\.${extenstion}\UserChoice"
WriteRegStr HKCU "Software\Microsoft\Windows\CurrentVersion\Explorer\FileExts\.${extenstion}\UserChoice" "Progid" "$ClassName"

${Switch} ${extenstion}
${Case} "BMP"
StrCpy $IconIndex 0
WriteRegStr HKCR "$ClassName" "" "FastStone BMP File"
${Break}
${Case} "PNG"
StrCpy $IconIndex 7
WriteRegStr HKCR "$ClassName" "" "FastStone PNG File"
${Break}
${Case} "JPG"
StrCpy $IconIndex 4
WriteRegStr HKCR "$ClassName" "" "FastStone JPG File"
${Break}
${EndSwitch}
WriteRegStr HKCR "$ClassName\DefaultIcon" "" "$IconFile,$IconIndex"
EndMacro:
!macroend

Section "!${PRODUCT_NAME}" sec01
бла-бла
StrCpy $OpenCommand "$\"$OUTDIR\FSViewer.exe$\" $\"%1$\""
StrCpy $IconFile "$INSTDIR\FSIcons.db"

SectionGroup "Ассоциация файлов" Sec06
;
Section "BMP" BMP
SectionIn 1 2
!insertmacro RegisterExtension ".bmp"
SectionEnd

Section "JPG" JPG
SectionIn 1 2
!insertmacro RegisterExtension ".jpg"
SectionEnd

Почему то в реестре расширения регистрируются с двумя точками
..bmp
..jpg
и т.д

[wolkow70]

Почему то в реестре расширения регистрируются с двумя точками ..bmp ..jpg и т.д »

Разобрался, все пока получается....!!!!!

[punsh]

WriteRegStr HKLM "SOFTWARE\BurnAware\Install" "InstallEntry" "?"

как прописать выше этой строчки, чтобы заместь "?" было полное имя компьютера из HKLM "SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon"