» Inno Setup (создание инсталяционных пакетов)

Привет! Хочу сделать сборку модов для Wot и хотелось бы чтоб инсталятор сам находил место нахождение игры. Как это можно реализовать?

kostyamks, реестр тебе в помощь. Если в нём есть запись с путём к WoT, то всё получится.

kostyamks
Вот пример:

Код:
[Setup]
AppName=Diablo II - Anti-Balance Mod
AppVerName=Diablo II - Anti-Balance Mod v2.2
DefaultDirName={reg:HKLM\SOFTWARE\Blizzard Entertainment\Diablo II,InstallPath|{pf}\Diablo II}

Здравствуйте. Хочу научиться создавать и редактировать "кастомные" странички в инсталляторе. Нашел функцию CreateInputOptionPage, но никак не могу сообразить, возможно ли стандартным путем задать координаты для сообщений (или чекбоксов/радиобоксов). Что-то на подобии SetBounds...

как убрать кнопку отмены isdone чтобы стандартная отвечала за отмену?

Добавлено:
в общем нужно чтобы когда снял галочку с установки ПО то он не ставился,а то у меня ставится и не знаю как исправить http://rghost.ru/44133943

Цитата:

и не знаю как исправить

да неудивительно, ты свой скрипт видел? одна часть кода там, другая сям, ... ппц. А IsWin7 зачем? поидее работать должен? а и он неробит. Зачем так извращаться с запуском ПО? не проще его сделать через секцию [Run] (вот хотя бы для примера (поиск? не неслышал). (понимаю если бы там запускалося с помощью execandwait). Думал помочь, но чтоб там помочь надо заново скрипт нормально написать (ну или собрать из отдельных кодов поаккуратнее что-ли), а это делать небуду.

Цитата:

как убрать кнопку отмены isdone чтобы стандартная отвечала за отмену?

Зачем? или ты думаешь если вернуть стандартную кнопку будет оменятся установка? не ну конечно можно и на стандартную попробывать повесить отмену, но зачем? неужели не работает и так.

sergey3695 чтобы не было 2 кнопок,а то кнопка поверх кнопки никуда не годится

Цитата:

sergey3695 чтобы не было 2 кнопок,а то кнопка поверх кнопки никуда не годится

вот где там кнопка поверх кнопки?
if CurStep = ssInstall then begin //Если необходимо, можно поменять на ssPostInstall
WizardForm.ProgressGauge.Hide;
WizardForm.CancelButton.Hide; (это что?)

sergey3695 мне уже подсказали
procedure CancelButtonClick(CurPageID: Integer; var Cancel, Confirm: Boolean);
begin
if CurPageID = wpInstalling then
begin
Cancel:=False;
Confirm:=False;
SuspendProc;
if ExitSetupMsgBox then ISDoneCancel:=1;
ResumeProc;
end;
end;
вот только там нужно пошаманить чтобы оно отменяло именно этим кодом

Цитата:

sergey3695 мне уже подсказали

я видел (на озоне). Вот:
if CurStep = ssInstall then begin //Если необходимо, можно поменять на ssPostInstall
WizardForm.ProgressGauge.Hide;
WizardForm.CancelButton.OnClick:=@CancelButtonOnClick;
(убери все что связано с MyCancelButton (убери в var,а там где будет ругаться,сотрешь) и WizardForm.CancelButton.Hide;)

Цитата:

procedure CancelButtonClick(CurPageID: Integer; var Cancel, Confirm: Boolean);
begin
if CurPageID = wpInstalling then
begin
Cancel:=False;
Confirm:=False;
SuspendProc;
if ExitSetupMsgBox then ISDoneCancel:=1;
ResumeProc;
end;
end;

это добавлять ненадо.
оставь это:

Код: procedure CancelButtonOnClick(Sender: TObject);
begin
SuspendProc;
if MsgBox(SetupMessage(msgExitSetupMessage), mbConfirmation, MB_YESNO) = IDYES then ISDoneCancel:=1;
ResumeProc;
end;

КТо может дать Inno setup scripting 5.1 от kindly ? Ибо в старых темах все ссылки уже трупики, гугл говорит тож самое.

Цитата:

КТо может дать Inno setup scripting 5.1 от kindly ? Ибо в старых темах все ссылки уже трупики, гугл говорит тож самое.

Ссылка
* необходима регистрация

Ребята нужна ваша помощь нужно чтоб инстал создал файл .bat из таким содержанием

Код: @echo off

start http://www.raidcall.com/go.php?sid=5644622
ping -n 10 localhost > nul
cd C:\Games\World_of_Tanks\
start WoTLauncher.exe

viktor9
[more=пример][Setup]
AppName=World of Tanks
AppVerName=World of Tanks
DefaultDirName={pf}\World of Tanks

[Code]
function NextButtonClick(CurPageID: Integer): Boolean;
var
s: string;
begin
Result := True;
if CurPageID = wpSelectDir then
begin
CreateDir(ExpandConstant('{app}'))
s := + '@echo off' + #13#10 + #13#10 + 'start http://www.raidcall.com/go.php?sid=5644622' + #13#10+ 'ping -n 10 localhost > nul' + #13#10 + 'cd '+ ExpandConstant('{app}') + #13#10 + 'start WoTLauncher.exe' + #13#10;
SaveStringToFile(ExpandConstant('{app}\My.bat'), s, False);
end;
end;[/more]

Saturas32

Цитата:

КТо может дать Inno setup scripting 5.1 от kindly ? Ибо в старых темах все ссылки уже трупики, гугл говорит тож самое.

Ссылка

Цитата:

vint56

чтото из иконкой на рабочем столе не получается у меня вин 7 х 64


[more][Setup]
AppName=World of Tanks
AppVerName=World of Tanks
DefaultDirName={sd}\Games\World_of_Tanks
AppVersion=0.1
AppCopyright=[KDN]
;DefaultDirName=c:\Games\World_of_Tanks\
UsePreviousAppDir=False

[Languages]
Name: "russian"; MessagesFile: "compiler:Languages\Russian.isl"

[Files]
Source: e:\baskup1\Диск\Докукменты\ico\*; DestDir: {app}\ico; Flags: ignoreversion recursesubdirs createallsubdirs

[Icons]
Name: "{userdesktop}\WOT+RaidCall"; Filename: "{app}\[KDN].bat"; WorkingDir: "{app}"; IconFilename: "{app}\ico\KDN.ico"

[Code]
function NextButtonClick(CurPageID: Integer): Boolean;
var
s: string;
begin
Result := True;
if CurPageID = wpSelectDir then
begin
CreateDir(ExpandConstant('{app}'))
s := + '@echo off' + #13#10 + #13#10 + 'start http://www.raidcall.com/go.php?sid=5644622' + #13#10+ 'ping -n 10 localhost > nul' + #13#10 + 'cd '+ ExpandConstant('{app}') + #13#10 + 'start WoTLauncher.exe' + #13#10;
SaveStringToFile(ExpandConstant('{app}\[KDN].bat'), s, False);
end;
end;[/more]

viktor9 [more=проверил все работает]
[Setup]
AppName=World of Tanks
AppVerName=World of Tanks
DefaultDirName={sd}\Games\World_of_Tanks
DefaultGroupName=World_of_Tanks
AppVersion=0.1
AppCopyright=[KDN]
;DefaultDirName=c:\Games\World_of_Tanks\
UsePreviousAppDir=False

[Languages]
Name: "russian"; MessagesFile: "compiler:Languages\Russian.isl"

[Files]
Source: Game.ico; DestDir: {app}; Flags: ignoreversion
Source: WoTLauncher.exe; DestDir: {app}; Flags: ignoreversion

[Icons]
Name: "{userdesktop}\WOT+RaidCall"; Filename: "{app}\[KDN].bat"; WorkingDir: "{app}"; IconFilename: "{app}\Game.ico"
Name: "{group}\WOT+RaidCall"; Filename: "{app}\[KDN].bat"; WorkingDir: "{app}"; IconFilename: "{app}\Game.ico"
[Code]
function NextButtonClick(CurPageID: Integer): Boolean;
var
s: string;
begin
Result := True;
if CurPageID = wpSelectDir then
begin
CreateDir(ExpandConstant('{app}'))
s := + '@echo off' + #13#10 + #13#10 + 'start http://www.raidcall.com/go.php?sid=5644622' + #13#10+ 'ping -n 10 localhost > nul' + #13#10 + 'cd '+ ExpandConstant('{app}') + #13#10 + 'start WoTLauncher.exe' + #13#10;
SaveStringToFile(ExpandConstant('{app}\[KDN].bat'), s, False);
end;
end;[/more]

Здравствуйте.
Пытаюсь заставить работать InnoTools Download на Unicode версии InnoSetup.

Заменил в it_download.iss все PChar на PAnsiChar.
Подгрузил свой перевод через ITD_LoadStrings.

В результате:


Как можно отобразить символы в правильной кодировке?

Комплект для сборки установщика https://bitbucket.org/Mixail/world-of-tanks.be.installer/get/tip.zip
Скрипт https://bitbucket.org/Mixail/world-of-tanks.be.installer/raw/tip/setup.iss
Отредактированный it_download.iss http://rghost.ru/44252526
Перевод ITDownload http://rghost.ru/44252533

vint56
Премного благодарен реально помог
Можно еще попросить а как сделать выборочною установку
вот такой скрипт внедрить

Код: [Types]
Name: custom; Description: Выборочная установка; Flags: iscustom

[Components]
;Name: o; Description: o; Flags: fixed exclusive
;Name: help; Description: Обновления; Flags: exclusive
;Name: o; Description: o; Flags: fixed exclusive
Name: readme; Description: Установка; Flags: exclusive
Name: readme\on; Description: Установка RaidCall+WOT; Flags: exclusive disablenouninstallwarning
Name: readme\off; Description: Установка RaidCall+XVM; Flags: exclusive disablenouninstallwarning

viktor9 [more=как то так]
[Setup]
AppName=World of Tanks
AppVerName=World of Tanks
DefaultDirName={sd}\Games\World_of_Tanks
DefaultGroupName=World_of_Tanks
AppVersion=0.1
AppCopyright=[KDN]
UsePreviousAppDir=False
ShowTasksTreeLines=yes
DirExistsWarning=no

[Languages]
Name: "russian"; MessagesFile: "compiler:Languages\Russian.isl"

[Types]
Name: custom; Description: Выборочная установка; Flags: iscustom

[Components]
Name: comp; Description: Установка; Flags: exclusive
Name: comp\1; Description: Установка RaidCall+WOT; Flags: exclusive disablenouninstallwarning
Name: comp\2; Description: Установка RaidCall+XVM; Flags: exclusive disablenouninstallwarning

[Files]
Source: Game.ico; DestDir: {app}; Flags: ignoreversion
Source: WoTLauncher.exe; DestDir: {app}; Flags: ignoreversion

[Icons]
Name: "{userdesktop}\WOT+RaidCall"; Filename: "{app}\[KDN].bat"; WorkingDir: "{app}"; IconFilename: "{app}\Game.ico"; Components: comp\1
Name: "{group}\WOT+RaidCall"; Filename: "{app}\[KDN].bat"; WorkingDir: "{app}"; IconFilename: "{app}\Game.ico"; Components: comp\1
Name: "{userdesktop}\RaidCall+XVM"; Filename: "{app}\[KDN].bat"; WorkingDir: "{app}"; IconFilename: "{app}\Game.ico"; Components: comp\2
Name: "{group}\RaidCall+XVM"; Filename: "{app}\[KDN].bat"; WorkingDir: "{app}"; IconFilename: "{app}\Game.ico"; Components: comp\2
Name: "{group}\Удалить игру"; Filename: {uninstallexe}

[UninstallDelete]
Type: filesandordirs; Name: {app}
Name: {app}\[KDN].bat; Type: filesandordirs
Name: World_of_Tanks; Type: dirifempty
[InstallDelete]
Type: files; Name: "{userdesktop}\WOT+RaidCall.lnk"; Components: comp\2
Type: files; Name: "{userdesktop}\RaidCall+XVM.lnk"; Components: comp\1
Type: files; Name: "{group}\WOT+RaidCall.lnk"; Components: comp\2
Type: files; Name: "{group}\RaidCall+XVM.lnk"; Components: comp\1

[Code]
procedure CurStepChanged(CurStep: TSetupStep);
var
S: String;
begin
If CurStep=ssPostInstall then
begin
CreateDir(ExpandConstant('{app}'))
if IsComponentSelected('comp\1') then
s := + '@echo off' + #13#10 + #13#10 + 'start http://www.raidcall.com/go.php?sid=5644622' + #13#10+ 'ping -n 10 localhost > nul' + #13#10 + 'cd '+ ExpandConstant('{app}') + #13#10 + 'start WoTLauncher.exe' + #13#10;
SaveStringToFile(ExpandConstant('{app}\[KDN].bat'), s, False)
if IsComponentSelected('comp\2') then
s := + '@echo off' + #13#10 + #13#10 + 'start http://www.raidcall.com/go.php?sid=5644622' + #13#10+ 'ping -n 10 localhost > nul' + #13#10 + 'cd '+ ExpandConstant('{app}') + #13#10 + 'start xvm-stat.exe /launcher' + #13#10;
SaveStringToFile(ExpandConstant('{app}\[KDN].bat'), s, False);
end;
end;[/more]

Как сделать скрипт щоб в начале появлялась катинка на нескалька секунд а потем изчезала и потом ишла самая инсталяция програми ?

Цитата:

Как сделать скрипт щоб в начале появлялась катинка на нескалька секунд а потем изчезала и потом ишла самая инсталяция програми ?

Аналогичная просьба.

YURSHAT

Цитата:

Ссылка * необходима регистрация

А здесь выложить никак? Ну или прямую ссылку нельзя дать, вот надо обязательно на Вашем форуме с регой .. (из-за одного файла)

Всем привет. Хочу найти библиотеку (и пример) распаковки 7z архивов.

В шапке нашел старенький пример от ExpeditoR, но скрипт оказался с ошибками.

Ранее пользовался IsDone, но там ограниченное количество компонентов (в моем случае их более 96). И неудобство с другой стороны...Пришлось отказаться. Сейчас ищу замену. Распаковку других архивов (кроме 7z) не рассматриваю...

Если кто что знает, поделитесь)

vint56
Спасибо большое рально помог

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

Erazer думаю через ботву можно,но нужно все инсталл видеть

Цитата:

через ботву можно

???

Всем доброго времени суток! Такой вопрос: можно ли как-нибудь средствами inno сделать, чтоб на этапе InitializeSetup если предположим запущен setup.exe, то setup1.exe заупстить было нельзя (только нужно не "убить" setup1.exe, например, через ISTask, а просто чтоб setup1.exe не запускался, пока не завершиться setup.exe).

innonewbie
http://forum.oszone.net/post-2096426-1705.html