[hb860]

Вы написали неправильный код
Вот его и исправьте
Вы считаете, что кто-то на форуме является шаманом и вот как вам голословно способен помочь?
Хоть покажите, чё написали, а мы посмотрим и попробуем подсказать

[Krinkels]

Делал на основе этого кода:
ReInstall.ini:

Код:

[Settings]
NumFields=3
[Field 1]
Type=Label
Left=0
Right=-1
Top=0
Bottom=24
Text=MyProg is already installed. Select the operation you want to perform and click Next to continue.
[Field 2]
Type=RadioButton
Left=30
Right=-1
Top=50
Bottom=58
State=1
Text=Reinstall MyProg
[Field 3]
Type=RadioButton
Left=30
Right=-1
Top=70
Bottom=78
Text=Uninstall MyProg

reinstall.nsi:

Код:

!include "MUI.nsh"

!define MUI_ABORTWARNING

;!!!!!!!!!!!!!!!
InstallDirRegKey HKLM "Software\Antaris\TestReInstall" "Install_Dir"
Name "TestReInstall"
OutFile "TestReInstall.exe"
InstallDir "$PROGRAMFILES\MyNSISTest\TestReInstall"

!insertmacro MUI_PAGE_WELCOME
Page custom PageReinstall
!insertmacro MUI_PAGE_DIRECTORY
!insertmacro MUI_PAGE_INSTFILES
!insertmacro MUI_UNPAGE_INSTFILES
!insertmacro MUI_LANGUAGE "English"

ReserveFile "ReInstall.ini"
!insertmacro MUI_RESERVEFILE_INSTALLOPTIONS

Function .onInit
         !insertmacro MUI_INSTALLOPTIONS_EXTRACT "ReInstall.ini"
FunctionEnd

Section Files
        SetOutPath "$INSTDIR"
        ;File "1.exe"
SectionEnd

Section -Post
;!!!!!!!!!!!!!!!
        WriteRegStr HKLM "Software\Antaris\TestReInstall" "Install_Dir" "$INSTDIR"
        WriteUninstaller "$INSTDIR\uninstall.exe"
SectionEnd

Function PageReinstall
         !insertmacro MUI_HEADER_TEXT "Already Installed" "Choose the maintenance option to perform."
         ReadRegStr $R0 HKLM "Software\Antaris\TestReInstall" "Install_Dir"
         StrCmp $R0 "" 0 +2
         Abort
         StrCpy $R0 "2"

         !insertmacro MUI_INSTALLOPTIONS_DISPLAY "ReInstall.ini"
         !insertmacro MUI_INSTALLOPTIONS_READ $R1 "ReInstall.ini" "Field 2" "State"
         StrCmp $R0 "1" 0 +1
         StrCmp $R0 "2" 0 +2
         StrCmp $R1 "1" reinst_done
         ExecWait '$INSTDIR\uninstall.exe'
         Quit
         reinst_done:
FunctionEnd

Function un.onInit
         MessageBox MB_ICONQUESTION|MB_YESNO|MB_DEFBUTTON2 "Are you sure you want to completely remove MyProg?" IDYES +2
         Abort
FunctionEnd

Section Uninstall
        Delete "$INSTDIR\1.exe"
        Delete "$INSTDIR\uninstall.exe"
        RMDir "$INSTDIR"
        DeleteRegKey HKLM "Software\Antaris\TestReInstall"
SectionEnd

.
Просто добавил лишний RadioButton который ничего не делает. В этом коде тот же косяк, "<Назад" и "Далее>" действуют одинаково.

[hb860]

Код:

Page  custom [creator_function] [leave_function]

У вас написано

Код:

Page custom PageReinstall

т.е. одна функция на всё. Я полагаю, дело в этом
Попробуйте

Код:

Page custom PageIn PageReinstall

function PageIn оставьте без кода

[Krinkels]

hb860

Попробуйте Код: Page custom PageIn PageReinstall function PageIn оставьте без кода »

Если так поставить то страница вообще не появляется

[WolfSoul]

Используя ваш пример «Создание собственных страниц инсталлятора», вот сделал такую страничку.
Пример кода:

;-Создание собственной страницы инсталлятора (страница "Выбор установки ключа регистрации"), начало функций Var Dialog1 Var GroupBox Var RadioButtonA Var RadioButtonB Var RadioButtonC Function fnCustomInit2 !insertmacro MUI_HEADER_TEXT "Вабор регистрационого ключа для Total Commander 6.55" "Выбирите из предлогаемого списка один из ключей" nsDialogs::Create 1018 Pop $Dialog ${NSD_CreateGroupBox} 0 5% 100% 50% "Регистрационные ключи для Total Commander 6.55:" Pop $GroupBox ${NSD_CreateRadioButton} 10 18u 70% 10% "Browseup Ltd" Pop $RadioButtonA ${NSD_CreateRadioButton} 10 30u 70% 10% "CNRS IRIT-UMR 5505" Pop $RadioButtonB ${NSD_CreateRadioButton} 10 42u 70% 10% "COMVERSE CNS" Pop $RadioButtonC nsDialogs::Show FunctionEnd Function fnCustomDestroy2 ${NSD_GetState} $RadioButtonA $R0 StrCmp $R0 1 0 SkipA SetOutPath "$INSTDIR" File "..\Setups\TotalCmd\Browseup Ltd\WinCmd.key" SkipA: ${NSD_GetState} $RadioButtonB $R0 StrCmp $R0 1 0 SkipB SetOutPath "$INSTDIR" File "..\Setups\TotalCmd\CNRS IRIT-UMR 5505\WinCmd.key" SkipB: ${NSD_GetState} $RadioButtonC $R0 StrCmp $R0 1 0 SkipC SetOutPath "$INSTDIR" File "..\Setups\TotalCmd\COMVERSE CNS\WinCmd.key" SkipC: FunctionEnd ;-Конец функций

В ней пользователь должен выбрать один из предлагаемых трёх элементов.
Всё работает лишь тогда когда прописывается путь полностью…
Пример кода:

Function fnCustomDestroy2 ${NSD_GetState} $RadioButtonA $R0 StrCmp $R0 1 0 SkipA SetOutPath "$INSTDIR" File "..\Setups\TotalCmd\Browseup Ltd\WinCmd.key" SkipA: ${NSD_GetState} $RadioButtonB $R0 StrCmp $R0 1 0 SkipB SetOutPath "$INSTDIR" File "..\Setups\TotalCmd\CNRS IRIT-UMR 5505\WinCmd.key" SkipB: ${NSD_GetState} $RadioButtonC $R0 StrCmp $R0 1 0 SkipC SetOutPath "$INSTDIR" File "..\Setups\TotalCmd\COMVERSE CNS\WinCmd.key" SkipC: FunctionEnd

Я пробовал изменить код, ну чтобы не прописывать путь к файлу полностью…
Пример кода 1:

Function fnCustomDestroy2 ${NSD_GetState} $RadioButtonA $R0 StrCmp $R0 1 0 SkipA SetOutPath "$INSTDIR" File /r "TotalCmd\Browseup Ltd\WinCmd.key" SkipA: ${NSD_GetState} $RadioButtonB $R0 StrCmp $R0 1 0 SkipB SetOutPath "$INSTDIR" File /r "TotalCmd\CNRS IRIT-UMR 5505\WinCmd.key" SkipB: ${NSD_GetState} $RadioButtonC $R0 StrCmp $R0 1 0 SkipC SetOutPath "$INSTDIR" File /r "TotalCmd\COMVERSE CNS\WinCmd.key" SkipC: FunctionEnd

или
Пример кода 2:

Function fnCustomDestroy2 ${NSD_GetState} $RadioButtonA $R0 StrCmp $R0 1 0 SkipA SetOutPath "$INSTDIR" File /r "TotalCmd\*.key*" SkipA: ${NSD_GetState} $RadioButtonB $R0 StrCmp $R0 1 0 SkipB SetOutPath "$INSTDIR" File /r "TotalCmd\*.key*" SkipB: ${NSD_GetState} $RadioButtonC $R0 StrCmp $R0 1 0 SkipC SetOutPath "$INSTDIR" File /r "TotalCmd\*.key*" SkipC: FunctionEnd

Но так не срабатывает.
ВОПРОС
Как сделать, чтобы не прописывать путь к файлу полностью?

[kotkovets]

Как сделать, чтобы не прописывать путь к файлу полностью? »

Так:
File /r "TotalCmd\*.*"

или так:
File /r "TotalCmd\*.key"

Скрипт должен находится на одном уровне с папкой TotalCmd

[Sauron3]

Доброго времени суток. У меня возник следующий вопрос(заранее прошу прошения, если такая тема уже всплывала)
при создании инсталятора, мне необходимо открыть файл (не exe) дождаться чтобы пользователь проделал с ним какие-либо операции? закрыл этот файл и только потом установка продолжилась. Открываю файл с помощью

Код:

ExecShell "open"

, он открывается, но установка продолжается. Команада

Код:

ExecWait

не помогает.
Заранее Спасибо.

[kotkovets]

мне необходимо открыть файл (не exe) дождаться, чтобы пользователь проделал с ним какие-либо операции, закрыл этот файл и только потом установка продолжилась »

Можно так:

Код:

ExecWait 'notepad "Путь к файлу.txt"'

или так:

Код:

ExecShell "open" "Путь к файлу.txt"  
MessageBox MB_ICONQUESTION|MB_YESNO "Вы сделали все? продолжим?" IDNO NO IDYES YES
NO:
Quit
YES:   
;продолжение скрипта

[Sauron3]

Спасибо!

[WolfSoul]

Код:

Спасибо вам за ранее оказанную помощь в написание данного кода.
Подскажите, пожалуйста, как сделать CheckBox активным в самодельном окне?
И как сделать, чтобы запоминался выбор пользователя?
Пример кода:
;-Создание собственной страницы инсталлятора (страница "Ярлыки и автозагрузка"), начало функций
Var Dialog
Var CheckBoxSM
Var CheckBoxD
Var CheckBoxQL
Var CheckBoxA
Var GroupBox1
Var GroupBox2

Function fnCustomInit1
!insertmacro MUI_HEADER_TEXT "Выбирите допольнительные задачи" "Какие дополнительные задачи необходимо выполнить?"
nsDialogs::Create 1018
Pop $Dialog

${NSD_CreateGroupBox} 0 5% 100% 50% "Ярлыки программы:"
Pop $GroupBox1

${NSD_CreateCheckBox} 10 18u 70% 10% "В меню Пуск"
Pop $CheckBoxSM

${NSD_CreateCheckBox} 10 30u 70% 10% "На рабочем столе"
Pop $CheckBoxD

${NSD_CreateCheckBox} 10 42u 70% 10% "В панели быстрого запуска"
Pop $CheckBoxQL

${NSD_CreateGroupBox} 0 -25% 100% 25% "Запуск программы вместе с системой:"
Pop $GroupBox2

${NSD_CreateCheckBox} 10 -22u 70% 10% "Добавить программу в автозапуск"
Pop $CheckBoxA

nsDialogs::Show
FunctionEnd

Function fnCustomDestroy1
${NSD_GetState} $CheckBoxSM $R0
StrCmp $R0 1 0 SkipSM
	CreateDirectory "$SMPROGRAMS\AudioGrabber"
	CreateShortCut "$SMPROGRAMS\AudioGrabber\Help.lnk" "$INSTDIR\AudioGrabber.hlp" "" "" "" "" "" "Помощь!!!"
	CreateShortCut "$SMPROGRAMS\AudioGrabber\AudioGrabber.lnk" "$INSTDIR\AudioGrabber.exe" "" "" "" "" "" "AudioGrabber 1.83.0.1"
	CreateShortCut "$SMPROGRAMS\AudioGrabber\Website.lnk" "$INSTDIR\${PRODUCT_NAME}.url" "" "" "" "" "" "Посетить сайт автора -> AudioGrabber"
	CreateShortCut "$SMPROGRAMS\AudioGrabber\Uninstall.lnk" "$INSTDIR\Uninstall.exe" "" "" "" "" "" "Удалить -> AudioGrabber с Вашей системы"
SkipSM:

${NSD_GetState} $CheckBoxD $R0
StrCmp $R0 1 0 SkipD
	CreateShortCut "$DESKTOP\AudioGrabber.lnk" "$INSTDIR\AudioGrabber.exe" "" "" "" "" "" "AudioGrabber 1.83.0.1"
SkipD:

${NSD_GetState} $CheckBoxQL $R0
StrCmp $R0 1 0 SkipQL
	CreateShortCut "$QUICKLAUNCH\AudioGrabber.lnk" "$INSTDIR\AudioGrabber.exe" "" "" "" "" "" "AudioGrabber 1.83.0.1"
SkipQL:

${NSD_GetState} $CheckBoxA $R0
StrCmp $R0 1 0 SkipA
	WriteRegStr HKEY_LOCAL_MACHINE "Software\Microsoft\Windows\CurrentVersion\Run" "AudioGrabber" "$INSTDIR\AudioGrabber.exe"
SkipA:
FunctionEnd
;-Конец функций