Скрипты Inno Setup. Помощь и советы [часть 3]

[Iska]

Доброго времени суток !



Как зделать 3 разных кнопки в инстоляторе (Назад, Далее , Установить/Отмена/Завершить/выбор папок) ?



сами кнопки есть:

http://rghost.ru/5110713

...



вот если что скрипт:

http://rghost.ru/5110569

вот что выдает инстал при запуске:





испробовал все что пришло на ум, помогите пожалуйсто .



если что:

http://rghost.ru/5110611

Зарание благодарю .



P.S. Кнопки есть но они не подогнаны пока под инстал

[Iska]

Serega, спасибо, видимо, как сейчас есть - проще не придумаеш, так что не буду и голову ломать, просто хочется избавиться от километров кода

EvilAlex, такая ошибка говорит о том, что есть обращение к файлу, а сам файл отсутствует(буквалный перевод - деление на ноль) сейчас посмотрю твой скрипт.

Позже:

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

[ChVL]

Лександер, скорее всего удолил, там 3 кнопки и я заменял в некоторых местах названия, может где-то что-то не то сделал ...

[insombia]

кто то может сделать мне скрипт установки Devil May Cry 4 типа как NFS Undercover?

[insombia]

insombia, береш скрипт NFS Undercover и просто меняеш там названия, ярлыки, реестр, графику оформления на те, которые должны быть в нужной тебе игре. Это совсем несложно, хотя-бы начни, если непонятно - тебе подскажут.

За тебя такой сложный скрипт с нуля точно никто писать не будет, если только за деньги.

[Serega]

EvilAlex

http://s51.radikal.ru/i132/1104/0f/4faebeaff7dd.jpg

[Gnom_aka_Lexander]

Serega, это пустой инстал... полный он около 60 метров, скрипт окол 11-ти метров. Перезалил

сюда

- ссылка прямая, может не будет скидывать.

Подскажите пожалуйста, как сюда:



Код:

Код: Выделить всё

procedure CurStepChanged(CurStep: TSetupStep); 
ResultCode, tmp:integer; 
begin 
if CurStep = ssDone then 
if MsgBox('{#SetupSetting("AppName")}' +' успешно ' + ' установлена!' + #10#10#13 + 'Запустить ' + '{#SetupSetting("AppName")}' + '?' , mbInformation, MB_OKCANCEL) = IDOK then 
Exec(ExpandConstant('{#AppExe}'), '', '', SW_SHOW, ewNoWait, ResultCode); 
end; 
end;

приделать еще одну кнопку, на запуск еще одного файла?

[Serega]

попробуй в коде NeedRestart := True



Код:

Код: Выделить всё

var   Version: TWindowsVersion;
....
GetWindowsVersionEx (Version);
if ( (Version.Major = 6) and (Version.Minor >= 1) ) then begin
...
NeedRestart := True
...
end;

Не проверял - не обещаю что сработает.

[insombia]

кто то может сделать подобный инсталятор для call of duty modern warfare 2?



И вопрос есть ли програмка для того чтобы можно было как то с любой игры знать коды для inno припустим как у механиков

[insombia]

insombia,

Держи

свой айфон.