BeJIuKuu_TaHKoBbIu_BouH Posted November 8, 2016 Share Posted November 8, 2016 выдаёт ошибку Result:=ExpandConstant('C:\Games\World_of_Tanks\'); //если ключа нет то будем ставить сюда а ты как он написал это в скрипт дописал? [Setup] DefaultDirName={code:WotDirNameRU} тот же вопрос @ Quote Link to comment Short link Share on other sites More sharing options...
sergy2010 Posted November 8, 2016 Share Posted November 8, 2016 (edited) тот же вопрос у меня просто ещё такой код стоит как вместе с ним соединить не могу догнать всю голову сломал function IsAppRunning(): Boolean;begin Result:=(FindWindowByWindowName('WoT Client') <> 0);end;function NextButtonClick(CurPage: Integer): Boolean;begin Result:=True;If CurPage=1 thenbegin if IsAppRunning() then begin MsgBox('Клиент игры World of Tanks в настоящее время запущен.' #13#13 'Необходимо закрыть его перед продолжением установки.', mbError, MB_OK); Result:=False; end else Result:=True;end;end; Edited November 8, 2016 by sergy2010 @ Quote Link to comment Short link Share on other sites More sharing options...
KIBORG Posted November 8, 2016 Share Posted November 8, 2016 Привет всем подскажите как эту проблему исправить с окнами @ Quote Link to comment Short link Share on other sites More sharing options...
sergy2010 Posted November 8, 2016 Share Posted November 8, 2016 (edited) Привет всем подскажите как эту проблему исправить с окнами Qzx4tI6.jpeg сделай значение ScaleX , ScaleУ такие же как у рамки Edited November 8, 2016 by sergy2010 @ Quote Link to comment Short link Share on other sites More sharing options...
KIBORG Posted November 8, 2016 Share Posted November 8, 2016 сделай значение х,у такие же как у рамки где сделать, не понял? @ Quote Link to comment Short link Share on other sites More sharing options...
sergy2010 Posted November 8, 2016 Share Posted November 8, 2016 (edited) Edited November 10, 2016 by sergy2010 @ Quote Link to comment Short link Share on other sites More sharing options...
Yusha Posted November 9, 2016 Share Posted November 9, 2016 (edited) кто подскажит скрип чтоб в конце 2 сайта были с чекбоксами на выбор Секция [Run] и [CustomMessages] postinstall Действителен только в секции [Run]. Указывает инсталлятору создать задание с флажком (checkbox) на странице мастера Установка завершена. Пользователь может снять или поставить этот флажок и тем самым выбрать, будет ли эта запись обработана или нет. Раньше этот флаг назывался showcheckbox. Если инсталлятор должен перезагрузить компьютер пользователя (после установки файла с флагом restartreplace или если директива AlwaysRestart секции [setup] равна yes), страница с флажком для выбора не сможет отобразиться и из-за этого параметр не будет обработан. Флаг isreadme для параметров секции [Files] теперь не нужен. Если компилятор обнаружит флаг isreadme, он его удалит и заменит соответствующим заданием секции [Run] в начале этой секции. У этого задания будут флаги shellexec, skipifdoesntexist, postinstall и skipifsilent. shellexec Этот флаг нужно использовать, только если в Filename задан не исполняемый файл (не .exe и не .com). Когда флаг установлен, Filename может быть папкой или любым зарегистрированным типом файла - включая .chm, .doc и т.д. Файл будет отрыт программой по умолчанию для его типа. То же произойдет, если пользователь дважды кликнет мышью на файле в окне Проводника. По умолчанию, при использовании флага shellexec, инсталлятор не будет ждать, пока завершится запущенный процесс. Если необходимо, чтобы инсталлятор подождал завершения выполнения процесса, следует комбинировать флаг shellexec с флагом waituntilterminated. Обратите внимание, что инсталлятор не будет ждать окончания процесса, если, например, в Filename указана папка. unchecked Действует только в секции [Run]. Указывает инсталлятору снять флажок. Пользователь может его выбрать, если захочет. Этот флаг игнорируется, если также указан флаг postinstall. waituntilidle Если установлен этот флаг, инсталляция остановится и подождет, пока пользователь введет необходимые ей данные, вместо того, чтобы ожидать окончания процесса. (Вызывается Win32 функция WaitForInputIdle). Не комбинируется с nowait или waituntilterminated. runasoriginaluser Работает только в секции [Run]. Если этот флаг определен, и система, в которой выполняется инсталлятор, является Windows Vista или более поздние версии, то порожденный процесс выполнится с учетными данными пользователя, который первоначально запустил инсталлятор (то есть, учетные данные "диалог pre-UAC"). Это - поведение по умолчанию, когда флаг postinstall используется. Если пользователь запустит инсталлятор от имени администратора (щелчок по правой кнопке мышки на EXE файле -> "Запуск от имени администратора"), то тогда этот флаг, к сожалению, не будет иметь никакого эффекта, потому что инсталлятор не имеет возможность выполнения любого кода с исходными пользовательскими учетными данными. Будем иметь аналогичную ситуацию, если инсталлятор запустится от уже поднятого процесса. Обратите внимание, однако, что это не специфичное ограничение для Inno Setup; основанные на установщике Windows инсталляторы в таких случаях тоже не могут возвращать исходные пользовательские учетные данные. Этот флаг не может комбинироваться с runascurrentuser. [Run] Filename: http://site1.com; Description: {cm:Site1}; Flags: postinstall shellexec runasoriginaluser Filename: http://site2.com; Description: Название сайта 2; Flags: postinstall shellexec runasoriginaluser unchecked [CustomMessages] Site1=Название сайта 1 Edited November 9, 2016 by Yusha 1 @ Quote Link to comment Short link Share on other sites More sharing options...
sergy2010 Posted November 9, 2016 Share Posted November 9, 2016 как такой лист создать 16.07.jpg @ Quote Link to comment Short link Share on other sites More sharing options...
BeJIuKuu_TaHKoBbIu_BouH Posted November 9, 2016 Share Posted November 9, 2016 у меня просто ещё такой код стоит как вместе с ним соединить не могу догнать всю голову сломал function IsAppRunning(): Boolean;begin Result:=(FindWindowByWindowName('WoT Client') <> 0);end;function NextButtonClick(CurPage: Integer): Boolean;begin Result:=True;If CurPage=1 thenbegin if IsAppRunning() then begin MsgBox('Клиент игры World of Tanks в настоящее время запущен.' #13#13 'Необходимо закрыть его перед продолжением установки.', mbError, MB_OK); Result:=False; end else Result:=True;end;end; function IsAppRunning(): Boolean; begin Result:=(FindWindowByWindowName('WoT Client') <> 0); end; Function NextButtonClick(CurPageID: Integer): Boolean; begin Result := True; case CurPageID of wpSelectDir: begin if not FileExists(ExpandConstant('{app}\WorldOfTanks.exe')) then begin MsgBoxEx(0, 'Установка модов невозможна, так как по выбранному пути отсутствует клиент игры World of Tanks!','Неправильный путь к игре World of Tanks',MB_OK or MB_ICONERROR, 0, 0); Result := False; end; end; wpReady: begin if IsAppRunning() then begin MsgBox('Клиент игры World of Tanks в настоящее время запущен!' + #13 + 'Необходимо закрыть его перед продолжением установки!', mbError, MB_OK); Result:=False; end; end; end; end; @ Quote Link to comment Short link Share on other sites More sharing options...
sergy2010 Posted November 9, 2016 Share Posted November 9, 2016 (edited) 1 Edited November 10, 2016 by sergy2010 1 @ Quote Link to comment Short link Share on other sites More sharing options...
sergy2010 Posted November 10, 2016 Share Posted November 10, 2016 (edited) й Edited November 10, 2016 by sergy2010 1 @ Quote Link to comment Short link Share on other sites More sharing options...
BeJIuKuu_TaHKoBbIu_BouH Posted November 10, 2016 Share Posted November 10, 2016 здарова Gad575 сможешь их вместе скомпелировать а то я болбес попробуйте этот вариант: [Code] function IsAppRunning(): Boolean; begin Result:=(FindWindowByWindowName('WoT Client') <> 0); end; function NextButtonClick(CurPageID: Integer): Boolean; begin Result := True; case CurPageID of wpSelectDir: begin if not FileExists(ExpandConstant('{app}\WorldOfTanks.exe')) then begin MsgBoxEx(0, 'Установка модов невозможна, так как по выбранному пути отсутствует клиент игры World of Tanks!','Неправильный путь к игре World of Tanks',MB_OK or MB_ICONERROR, 0, 0); Result := False; end; #ifdef DateToEnd begin Result := CompareStr(GetDateTimeString('yyyy.mm.dd', '.', #0), '{#DateToEnd}') <= 0; If not Result then begin MsgBox('время пользование модпака завершенно.', mbError, MB_OK); end else begin Result := True; end; end; end; #endif wpReady: begin if IsAppRunning() then begin MsgBox('Клиент игры World of Tanks в настоящее время запущен!' + #13 + 'Необходимо закрыть его перед продолжением установки!', mbError, MB_OK); Result:=False; end; end; end; end; @ Quote Link to comment Short link Share on other sites More sharing options...
Lom Posted November 10, 2016 Share Posted November 10, 2016 жаль только что если на компе перевести назад время то установка продолжается ((( @ Quote Link to comment Short link Share on other sites More sharing options...
sergy2010 Posted November 11, 2016 Share Posted November 11, 2016 Gad575 не подскажешь как в в выборе других задач создать создать 2 чекбокса с сайтами @ Quote Link to comment Short link Share on other sites More sharing options...
BeJIuKuu_TaHKoBbIu_BouH Posted November 11, 2016 Share Posted November 11, 2016 Gad575 не подскажешь как в в выборе других задач создать создать 2 чекбокса с сайтами [Tasks] Name: "gotositeone"; Description: "Перейти на первый сайт после окончания установки"; GroupDescription: "Дополнительные задачи:" Name: "gotositetwo"; Description: "Перейти на второй сайт после окончания установки"; GroupDescription: "Дополнительные задачи:" [Run] Filename: http://bla.ru/; Tasks: gotositeone Filename: http://blabla.ru/; Tasks: gotositetwo 1 @ Quote Link to comment Short link Share on other sites More sharing options...
sergy2010 Posted November 11, 2016 Share Posted November 11, 2016 [Tasks] Name: "gotositeone"; Description: "Перейти на первый сайт после окончания установки"; GroupDescription: "Дополнительные задачи:" Name: "gotositetwo"; Description: "Перейти на второй сайт после окончания установки"; GroupDescription: "Дополнительные задачи:" [Run] Filename: http://bla.ru/; Tasks: gotositeone Filename: http://blabla.ru/; Tasks: gotositetwo а ты сам то проверял этот скрипт ,там ошибка ссылается на неверное имя файла @ Quote Link to comment Short link Share on other sites More sharing options...
Lom Posted November 11, 2016 Share Posted November 11, 2016 (edited) а ты сам то проверял этот скрипт ,там ошибка ссылается на неверное имя файла Скрин ошибки кинь. покажи че там! Edited November 11, 2016 by ЛОМ @ Quote Link to comment Short link Share on other sites More sharing options...
sergy2010 Posted November 11, 2016 Share Posted November 11, 2016 не поверишь я не знаю как на компе делать скриншоты или прога нужна 1 @ Quote Link to comment Short link Share on other sites More sharing options...
Lom Posted November 11, 2016 Share Posted November 11, 2016 не поверишь я не знаю как на компе делать скриншоты или прога нужна скриншот какой кнопкой делается вообще же ты знаешь? )) так вот просто нажми на нее когда захочешь сделать скрин. затем открой стандартный фоторедактор что есть в винде, и там открой окошко с функциями и нажми создать. и в том что создал просто вставишь скрин нажав Ctrl+V. короче как то так))) @ Quote Link to comment Short link Share on other sites More sharing options...
sergy2010 Posted November 11, 2016 Share Posted November 11, 2016 у меня нет фото редактора @ Quote Link to comment Short link Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.