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

[Serega]

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



Хочу запаковать игру в 7z (без сжатия), потом Precomp-ом, потом SRep-ом и наконец FreeArc-ом! Как это реализовать и как правильно создать скрипт, чтобы потом игра нормально установилась!?



+ может есть менее геморройный способ упаковки игры с таким эффектом, можно тоже скрипт)))!?

[Habetdin]

DevilisH,

1) WizardForm.Font.Color:=clWhite; или WizardForm.Font.Color:=$ffffff;

2) //Избавиться от разделительных полос сверху и снизу

WizardForm.Bevel.visible:=true; // Если не надо, то WizardForm.Bevel.visible:=false;

WizardForm.Bevel1.visible:=true; // Если не надо, то WizardForm.Bevel1.visible:=false;

[Cinot]

Помогите! Как исправить!?

Полностью:

http://rghost.ru/1944098

[SeDmY]

Цитата DevilisH:



как для каждой страницы инсталлятора сделать свой фон?

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

В смысле на каждую страницу свою картинку или просто цвет?

[vint56]

На каждую страницу свою картинку. Во многих репаках игр такое видел. Допустим приветствие - один фон, выбор папки - другой и т.д..

[vint56]

SeDmY, у тебя стоит Unicode а скрипт Ansi потому ошибка

[МИШАНЧИК]

Serega, посмотрите пожалуйста ЛС.

[SeDmY]

Использую InnoSetup 5.3.10 (u)

Создаю установочный скрипт



Код:

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

[Tasks]
Name: desktopicon; Description: {cm:CreateDesktopIcon}; GroupDescription: {cm:AdditionalIcons}; Flags: unchecked
Name: quicklaunchicon; Description: {cm:CreateQuickLaunchIcon}; GroupDescription: {cm:AdditionalIcons}; Flags: unchecked; Languages:
[Files]
Source: I:\marsbyte\Time Controller\Time_Controller.exe; DestDir: {app}; Flags: ignoreversion
Source: I:\marsbyte\Time Controller\*; DestDir: {app}; Flags: ignoreversion recursesubdirs createallsubdirs
Source: \marsbyte\TIME_CONTROL.FDB; DestDir: {userappdata}\{#MyAppPublisher}\{#MyAppName}; Flags: ignoreversion confirmoverwrite; Tasks:
; NOTE: Don't use "Flags: ignoreversion" on any shared system files
[Icons]
Name: {group}\{#MyAppName}; Filename: {app}\{#MyAppExeName}
Name: {group}\{cm:ProgramOnTheWeb,{#MyAppName}}; Filename: {#MyAppURL}
Name: {group}\{cm:UninstallProgram,{#MyAppName}}; Filename: {uninstallexe}
Name: {commondesktop}\{#MyAppName}; Filename: {app}\{#MyAppPublisher}\{#MyAppExeName}; Tasks: desktopicon
Name: {userappdata}\Microsoft\Internet Explorer\Quick Launch\{#MyAppName}; Filename: {app}\{#MyAppExeName}; Tasks: quicklaunchicon

Собираю установщик.

На Win7 x64 пробую устанавливать. И иконка в панели быстрого запуска не создается.

В чем проблема?



И еще как разрешить пользователю при установке прописать программу в автозагрузку?

[SeDmY]

BlackEric, пример скрипта с закреплением ярлыка в панели задач Windows 7:



Код:

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

[Setup]
AppName=My Program
AppVerName=My Program 1.5
AppPublisher=My Company, Inc.
AppPublisherURL=http://winaddon.net/
AppSupportURL=http://winaddon.net/
AppUpdatesURL=http://winaddon.net/
DefaultDirName={pf}\My Program
DefaultGroupName=My Program
AllowNoIcons=yes
OutputDir=.
OutputBaseFilename=setup
Compression=lzma/ultra64
SolidCompression=true
InternalCompressLevel=ultra64
[Tasks]
Name: desktopicon; Description: {cm:CreateDesktopIcon}; GroupDescription: {cm:AdditionalIcons}; Flags: unchecked
Name: quicklaunchicon; Description: {cm:CreateQuickLaunchIcon}; GroupDescription: {cm:AdditionalIcons}; Flags: unchecked; OnlyBelowVersion: 0,6.1
Name: quicklaunchicon7; Description: {cm:CreateQuickLaunchIcon}; GroupDescription: {cm:AdditionalIcons}; Flags: unchecked; MinVersion: 0,6.1
[Files]
Source: compiler:Examples\MyProg.exe; DestDir: {app}; Flags: ignoreversion
Source: PinToTasckbar.vbs; DestDir: {tmp}; Flags: deleteafterinstall
[Icons]
Name: {group}\My Program; Filename: {app}\MyProg.exe
Name: {group}\{cm:UninstallProgram,My Program}; Filename: {uninstallexe}
Name: {commondesktop}\My Program; Filename: {app}\MyProg.exe; Tasks: desktopicon
Name: {userappdata}\Microsoft\Internet Explorer\Quick Launch\My Program; Filename: {app}\MyProg.exe; Tasks: quicklaunchicon
[Run]
Filename: {tmp}\PinToTasckbar.vbs; Parameters: """{app}\MyProg.exe"""; Flags: shellexec; Tasks: quicklaunchicon7
[Languages]
Name: russian; MessagesFile: compiler:Languages\Russian.isl

7 / 2008 R2 - [решено] Автоматическое вынесение ярлычков приложений на панель быстрого запуска в W7

- сохраняем в кодировке win-1251

[CrOsP]

Подскажите пожалуйста, какая строковая переменную отвечает за текст, отображаемый над статус баром? Параметр description для секции Run мне не подходит.



Планирую такую реализацию:

{Files}

Source: MyFile.exe; DestDir: {app}; Afterinstall: Myprocedure



{code}

procedure myprocedure;

begin

:='Текст';

exec(expandconstant('{app}\MyFile.exe'),'','',SW_Show,ewWaitUntilTerminated,resultcode)

end;



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

Посидел в хелпе, кое-что нашёл... Возможно, - это WizardForm.StatusLabel.Caption / WizardForm.FileNameLabel.Caption