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

Цитата:

помогите пожалуйста как вставить картинку на весь инсталлятор

Ну вот картинка на весь инстолятор только на первой странице
Для примера оставил путь до картинки. чтобы вставить свою укожи путь до изображения формата BMP в своём компе
К примеру WizardImageFile=C:\WizModernImage (2).bmp

Вот скрипт http://rghost.ru/2269777
P.S. Есть у меня скрипт который тупо расстягивает стандартное левое окно инстолятора на всех страницах. http://rghost.ru/2269931 чисто для себя просто заливал градиентом каким нибудь в фотошопе эту самую картинку а именно WizModernImage.bmp

Просьба к скачавшим или к автору перезалить кудато StarCraft2_v2.7z а то чтото ифолдер лагает и качается постоянно битый архив. Спасибо!

Kutsenko
обнови 7zip http://downloads.sourceforge.net/sevenzip/7z915.exe
и архив перестанет быть битым

У кого есть скрипт принц персии 2010 скинте или как зделоть реестровский файлы для 32 и 64 битной версии.

Provizor54

Цитата:

зделоть

Новое слово в русском языке или это на олбанском!? Пишется "сделать".
И вообще вопросы про реестр это , такие вещи должны обсуждаться в других местах.

БОЛЬШОЕ СПАСИБО zxcvvcxz1

2 htuos
Спасибо за помощь, я просто WinRAR'ом пользуюсь и никогда такого небыло...

vint56
Ты помог найти скрипт. У меня был вариант без прогресса!
Сейчас мучаюсь подставляя время и проценты!

Пожалуйста подскажите как сделать строку, и то что там будет написано пользователем будет передаваться куда нибудь в секци "Code"?

vint56

Цитата:

[Icons]
Name: {group}\Играть Sniper Ghost Warrior; Filename: {app}\Sniper_x86.exe; WorkingDir: {app}
Name: {group}\Удалить Sniper Ghost Warrior; Filename: {uninstallexe}; WorkingDir: {app}
Name: {userdesktop}\Sniper Ghost Warrior; Filename: {app}\Sniper_x86.exe; WorkingDir: {app}

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

StalkMent
Ты хоть сам понял что спросил? По-русски можешь объяснить?

Попробую,
В инстолляторе есть строка "Какой процесс завершить?" , пользователь пишет что то, и это что то передаётся в функцию.

StalkMent
WizardForm.StatusLabel.Caption:='Рекомпрессия извлеченых файлов...';

ChanVS
Ты мне написал?

Привет всем. Помогите пожалуйста решить такую проблему: нужно что бы прогресбар двигался не по ходу выполнения распаковки, а по таймеру, т.е., я задаю в скрипте время, допустим, 10 мин., и инсталятор будет выполнять все действия (распаковку, установку доп. по и т.п.), но не показывать ход выполнения действий(прогрессбар), а показывать, как движется прогресс бар в течении заданного времени(10 мин.). И, если даже, инсталятор закончит выполнять все действия(распаковку, установку и т.д.) раньше заданного времени, то он не покажет страницу завершения работы(финальную), пока не кончится заданное время.
Уверен, что это легко делается, но моих знаний не достаточно реализовать.
____________________________________

ps: кому там скрипт starcraft2 нужен был?

http://tempfile.ru/file/1437800

StalkMent
Да.
Я так понял твой вопрос!

ChanVS,
Ну извини если не понимаешь...

П.С. В моём вопросе нет даже намёка на "статус"

StalkMent
Тогда как сказал StalkMent
Ты хоть сам понял что спросил? По-русски можешь объяснить?

скрипт Need for Speed™ Undercover который образец. помогите пожалуйста при компиляции своего скрипта вылетает ошибка. ПРИ ВСТАВКЕ 2 ВЫЛЕТАЕТ ОШИБКА Close round expected.

SystemLbl := TLabel.Create(WizardForm);
with SystemLbl do begin
AutoSize:=False;
SetBounds(ScaleX(107), ScaleY(420), ScaleX(150), ScaleY(22));
Transparent:=True;
Font.Name:= 'Arial';
Font.Size:= 9;
Font.Color:=$FFFFFF;
Font.Style:=[fsBold];
Caption := ExpandConstant('{cm:OperationSystem}');
Parent := WizardForm;
end;

SystemNameLbl := TLabel.Create(WizardForm);
with SystemNameLbl do begin
AutoSize:=False;
SetBounds(ScaleX(279), ScaleY(420), ScaleX(400), ScaleY(22));
Transparent:=True;
Font.Name:= 'Arial';
Font.Size:= 9;
Font.Color:=$FFFFFF;
Font.Style:=[fsBold];
Caption := GetWindowsName;
Parent := WizardForm;
end;

GetWindowsVersionEx(Version);

if not Version.NTPlatform or
(Version.NTPlatform and (Version.Major<{#WinVerMajor})) or
(Version.NTPlatform and (Version.Major={#WinVerMajor}) and (Version.Minor<{#WinVerMinor})) or
(Version.NTPlatform and (Version.Major={#WinVerMajor}) and (Version.Minor={#WinVerMinor}) and (Version.ServicePackMajor<{#ServicePack})) then begin
RequirementsLbl.Caption := ExpandConstant('{cm:Requirements4}');
AddLabelToArray(ASysReq,SystemNameLbl);
end;

ТАМ НОДО ВСТАВЛЯТЬ ВОТ ЭТО #define WinVerMajor "5"
#define WinVerMinor "1"
#define ServicePack "2"

Попробую описать свой вопрос по другому-
[more=Есть такая вот форма] [/more]
Мне нужно результат вписать сюда - SaveStringToFile('fsgame.ltx', '$app_data_root$=true|false|' + #13#10, true); (результат каждого "комбо бокса")
И ели не трудно то сделать надпись по Русски а результат по английски.

StalkMent
дык, такие вопросы уже здесь были по поводу кастомных форм и как туда-сюда данные перегонять.

SotM
В какой части?


П.С. Тут "плюсы" как ставить?

Можно глупый вопрос Пытаюсь записать в лог файл дату, имя копируемого файла и имя запускаемого файла

Код:
SaveStringToFile(ExpandConstant('{app}\setup_{#DateTime}.log'), #13#10 + GetDateTimeString('dd/mm/yyyy hh:nn:ss', '-', ':') + ' - ' + ExpandConstant(CurrentFileName), True);

Подскажите, пожалуйста, как сделать проверку на отсутствие драйверов и запускать их установщики соответствуя версии Windows?

Кто подскажет реально в "соде" внести это?

[Run]
Filename: "{app}\oggdec.exe"; Parameters: "*.ogg"; WorkingDir: "{app}\main\sound\";

Такой вариант правельный?
[Code]
Exec( 'cmd.exe', '/c for /R %i in (*.ogg) do oggdec.exe "%i"', '', SW_SHOW, ewWaitUntilTerminated, ResultCode )

Всем привет!Кто может помочь по айсдоне.
вот мне нужно распаковать архив
1.севен зип 2.прекомп 3.среп 4.арк
Вот что я пишу в модуле айсдоне если не верно подскажите где моя ошибка
if not ISArcExtract ( 0, OveralPct, 0, ExpandConstant('{src}\bin\bin.arc'), ExpandConstant('{app}'), false,CallBack, '', '', '') then break;
if not ISSRepExtract ( 0, OveralPct, 0, ExpandConstant('{app}\bin\bin.srep'), ExpandConstant('{app}\bin.pcf'), '', true, CallBack ) then break;
if not ISPrecompExtract( 0, OveralPct, 0, ExpandConstant('{app}\bin\bin.pcf'), ExpandConstant('{app}\bin.7z'), true, CallBack ) then break;
if not IS7ZipExtract ( 0, OveralPct, 0, ExpandConstant('{app}\bin\bin.7z'), ExpandConstant('{app}'), true, CallBack, '' ) then break;

Архив фриарк распаковывается а вот среп пишет что неправильно задан входной файл.Игра у меня распаковывается в директорию C:\Program Files\Prince of Persiа возможно нужно прописать эту папку?

StalkMent
А ты скачай все оффлайн версии и поищи в них.


Цитата:

Тут "плюсы" как ставить?

Какие еще плюсы? Тут плюсов нет, а одни минусы...

quorg
А ты понял что спросил?
Цитата:

отсутствие драйверов

- я не думаю, что это правильный раздел где нужно спрашивать об этом.

ChanVS
ёлы-палы, наверное каждый кто сюда приходит считает за честь спрашивать про одно и тоже. Про oggdec уже несколько раз здесь пробегали вопросы/ответы.
В оффлайн версиях форума посмотри.

dumanow1
внимательнее с папками. Надо как-то так:

Код: if not ISArcExtract ( 0, OveralPct, 0, ExpandConstant('{src}\bin\bin.arc'), ExpandConstant('{app}\bin'), false,CallBack, '', '', '') then break;
if not ISSRepExtract ( 0, OveralPct, 0, ExpandConstant('{app}\bin\bin.srep'), ExpandConstant('{app}\bin\bin.pcf'), '', true, CallBack ) then break;
if not ISPrecompExtract( 0, OveralPct, 0, ExpandConstant('{app}\bin\bin.pcf'), ExpandConstant('{app}\bin\bin.7z'), true, CallBack ) then break;
if not IS7ZipExtract ( 0, OveralPct, 0, ExpandConstant('{app}\bin\bin.7z'), ExpandConstant('{app}\bin'), true, CallBack, '' ) then break;

SotM,
Офф лайн не всегда может помочь...
Вот если бы ты сделал справочник то это точно должно помочь.