[Serg866]

Заметил такую странность (точнее, заметили пользователи моей программы) - некоторые функции готового инсталлятора не выполняются, если его заархивировать в WinRar и запустить инсталлятор из архива. В частности через код Function .OnInit может не отработать команда ${If} ${FileExists}. На XP у себя такой проблемы не наблюдаю, а вот на более старших системах баг проявляется, но не всегда. Может кто знает из-за чего такое в принципе может происходить.

Почему спрашиваю: через ${If} ${FileExists} у меня встроена проверка оригинальности файлов при запуске инсталлятора. И эта проверка легко обходится простым архивированием инсталлятора.

[Begin2Fly]

Serg866, вряд ли она может не отработать, скорее отрабатывает она не так, как вы того ожидаете. Нужно больше информации: часть кода, отвечающая за проверку, может даже установщик чтобы посмотреть на поведение вне архива и в архиве.

[Serg866]

Условный код функции

Код:

Function .OnInit
MessageBox MB_OK|MB_ICONINFORMATION "Здесь предупреждающий текст" IDOK
Dialer::GetConnectedState
Pop $2
StrCmp $2 "offline" +2
ExecShell "open" "http://forum.oszone.net"
sleep 100
${If} ${FileExists} "$APPDATA\proverka.txt"
${OrIf} ${FileExists} "$EXEDIR\proverka2.txt"
${OrIf} ${FileExists} "$DOCUMENTS\proverka3.txt"
Quit
${EndIf}
FunctionEnd

При запуске инсталлятора из архива, команда ${If} ${FileExists} не выполняет свою задачу, то есть проверка файла не происходит. На XP всё работает нормально.
Замечен баг только на старших системах (Windows 7, 8, 10), но закономерность не обнаружена - на каких-то сборках работает, на каких-то нет.

Использую NSIS 3 (Юникод).

[MaGoth]

Привет народ..

Заметил очередную странность в работе программы, суть ее вот в чем::
написал инсталлер с установкой проги на 8 языках в зависимости от выбора чекбоксов..
далее, прикрутил автоопределение языка и в зависимости от языка ОС автоматически проставляется галочка на установку аналогичного языка. При инсталляции все работает вроде исправно, но если запускать деинсталл, то чек бокс проставляется на одну строку в низ, а не туда куда нужно..

Пример кода для инсталла и деинсталла для выбора языка установки в чек-боксах::

Код:

Function .onInit
  Push $R0
  SetCurInstType 0
  !insertmacro MUI_LANGDLL_DISPLAY
  !insertmacro MUI_INSTALLOPTIONS_EXTRACT "setup.ini"
  StrCpy $1 ${SecMod}
  SetSilent normal

;--------------------------------
# При запуске инсталлятора назначаем секции статус "Отмечена"
  ${If} $LANGUAGE == ${LANG_ENGLISH}
	;IntOp $0 	${SF_SELECTED} // $0
	SectionSetFlags ${SecModFiles1} 1
  ${ElseIf} $LANGUAGE == ${LANG_ROMANIAN}
	SectionSetFlags ${SecModFiles2} 1
  ${ElseIf} $LANGUAGE == ${LANG_GERMAN}
	SectionSetFlags ${SecModFiles3} 1
  ${ElseIf} $LANGUAGE == ${LANG_RUSSIAN}
	SectionSetFlags ${SecModFiles4} 1
  ${ElseIf} $LANGUAGE == ${LANG_ITALIAN}
	SectionSetFlags ${SecModFiles5} 1
  ${ElseIf} $LANGUAGE == ${LANG_CZECH}
    SectionSetFlags ${SecModFiles6} 1
  ${ElseIf} $LANGUAGE == ${LANG_POLISH}
	SectionSetFlags ${SecModFiles7} 1
  ${ElseIf} $LANGUAGE == ${LANG_SPANISH}
	SectionSetFlags ${SecModFiles8} 1
  ${EndIf}


....
Function un.onInit
  !insertmacro MUI_UNGETLANGUAGE
  Push $R0
    StrCpy $1 ${unSecMod}

;--------------------------------
  ${If} $LANGUAGE == ${LANG_ENGLISH}
	;IntOp $0 	${SF_SELECTED} // $0
	SectionSetFlags ${SecModFiles1} 1
  ${ElseIf} $LANGUAGE == ${LANG_ROMANIAN}
	SectionSetFlags ${SecModFiles2} 1
  ${ElseIf} $LANGUAGE == ${LANG_GERMAN}
	SectionSetFlags ${SecModFiles3} 1
  ${ElseIf} $LANGUAGE == ${LANG_RUSSIAN}
	SectionSetFlags ${SecModFiles4} 1
  ${ElseIf} $LANGUAGE == ${LANG_ITALIAN}
	SectionSetFlags ${SecModFiles5} 1
  ${ElseIf} $LANGUAGE == ${LANG_CZECH}
    SectionSetFlags ${SecModFiles6} 1
  ${ElseIf} $LANGUAGE == ${LANG_POLISH}
	SectionSetFlags ${SecModFiles7} 1
  ${ElseIf} $LANGUAGE == ${LANG_SPANISH}
	SectionSetFlags ${SecModFiles8} 1
  ${EndIf}

Как с этим бороться хз, может есть у кого какие мысли ?!
Использую нсис-юникод 2.46.5

[Serg866]

Задумал проверять разрешение экрана пользователя.

Пример из справки "Определяем и меняем разрешение экрана" не заработал на NSIS3 (Unicode).
Компилируется без ошибок, но при запуске ничего не происходит.

Используется какой-то древний плагин ChangeRes 2003 года.

Есть ли рабочие примеры проверки разрешения дисплея для NSIS 3 под юникод?

[Flix]

Задумал проверять разрешение экрана пользователя. »

Serg866, очень хорошо подумайте, прежде чем использовать подобный функционал. Ваши пользователи не будут в восторге, когда ваша программа установки сбросит параметры экрана. Функционал в плагине сделан без проверок: количество подключенных устройств, их текущие параметры, сохранение и восстановление этих параметров, поддерживаемые значения режимов, анализ возможных ошибок. По нормальному это нужно все делать, а здесь просто изменяется разрешение экрана и все. И да, сам плагин сделан тогда, когда версии Unicode и в помине не было. Как вариант, используйте сборку ANSI инсталлятора (с директивой Unicode false). Если по каким-то причинам такой вариант неприемлем, то используйте плагин CallAnsiPlugin, который позволяет использовать вызов функций ANSI плагинов в инсталляторах Unicode (с директивой Unicode true).

Есть ли рабочие примеры проверки разрешения дисплея для NSIS 3 под юникод?

Пример

Код:

Unicode true
Name "Get User Screen Resolution"
Caption "Get User Screen Resolution"
XPStyle "on"

Function .onInit
   ; Выполняем инициализацию папки для распаковки плагинов
   InitPluginsDir
   ; Устанавливаем каталог распаковки файлов
   SetOutPath $PLUGINSDIR
   ; Записываем файлы плагинов
   File "${NSISDIR}\Plugins\x86-unicode\CallAnsiPlugin.dll"
   File "${NSISDIR}\Plugins\x86-ansi\ChangeRes.dll"
   ; Получаем текущие размеры экрана
   System::Call 'user32::GetSystemMetrics(i 0) i .r0' ; Ширина в пикселях
   System::Call 'user32::GetSystemMetrics(i 1) i .r1' ; Высота в пикселях
   ; Выводим сообщение с текущим разрешением экрана
   MessageBox MB_OK|MB_ICONINFORMATION "Screen Resolution: $\r$\n$0 X $1"
   ; Изменяем разрешение экрана на 1024х768 пикселей, глубиной цвета 32-бит и частотой обновления 60 Гц
   CallAnsiPlugin::Call "$PLUGINSDIR\ChangeRes.dll" ChangeResolution 4 1024 768 32 60
   ; Получаем новые размеры экрана
   System::Call 'user32::GetSystemMetrics(i 0) i .r2' ; Ширина в пикселях
   System::Call 'user32::GetSystemMetrics(i 1) i .r3' ; Высота в пикселях
   ; Выводим сообщение с новым разрешением экрана
   MessageBox MB_OK|MB_ICONINFORMATION "New Screen Resolution: $\r$\n$2 X $3"
   ; Восстанавливаем передыдущее разрешение экрана (условно считаем, что у
   ; пользователя были установлены глубина цвета 32-бит и частота 60 Гц)
   CallAnsiPlugin::Call "$PLUGINSDIR\ChangeRes.dll" ChangeResolution 4 $0 $1 32 60
   ; Выход
   Quit
FunctionEnd

Section "-null"
SectionEnd

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

[Serg866]

Flix, спасибо за подробный разбор!

Я не планировал смену разрешения у пользователей.

Нужно только определять текущее разрешение экрана с целью узнать поддерживает ли монитор Full HD.
Таким образом, если разрешение равно 1920х1080, то один код в инсталляторе. Если нет, то код другой.

Понимаю теперь, что это делается без сторонних плагинов.

Основываясь на Справочнике и Вашем примере, получился такой код функции.
Будет ли сиё работать со всеми Windows от XP до 10? Или что-то нужно добавить?

Код:

Function .onInit
; Получаем текущие размеры экрана
   System::Call 'user32::GetSystemMetrics(i 0) i .r0' ; Ширина в пикселях
   System::Call 'user32::GetSystemMetrics(i 1) i .r1' ; Высота в пикселях
${If} $0 == 1920
${AndIf} $1 == 1080
MessageBox MB_OK "Установлено разрешение 1920x1080"
${Else}
   MessageBox MB_OK "Установлено любое другое разрешение"
${EndIf}
FunctionEnd

---------------------------

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

Вы о том, чтобы заменить переменные $0 и $1 на созданные? В Справочнике про это написано, но я не разобрался как созданные переменные правильно внедрять в логические конструкции.

[Flix]

Я не планировал смену разрешения у пользователей... Будет ли сиё работать со всеми Windows от XP до 10? Или что-то нужно добавить?»

Serg866, виноват. Понесла меня нелегкая и я развил эту тему в неверном направлении. Да, если просто узнать текущие размеры экрана, то должно работать, криминала в коде никакого нет. Дальше уже сами, по месту смотрите, какие действия предпринимать в зависимости от полученных результатов.

Вы о том, чтобы заменить переменные $0 и $1 на созданные? »

Конечно. Просто объявите собственные переменные и сразу после использования $0 и $1 копируйте их содержимое в ваши переменные. Но если ваш код останется таким же, как показано в вашем примере, то этого делать не обязательно.

[agrei678]

подскажите , и по возможности кто знает подправьте пожалуйста ,почему скрипт не компилируется? )

[Begin2Fly]

подскажите , и по возможности кто знает подправьте пожалуйста ,почему скрипт не компилируется? ) »

Потому что это криво распакованная сборка PowerISO (при чём моя), и ничего даже близко похожего к рабочему скрипту здесь нет.