[Deen]

YURSHAT,
Ничего нипишут как было так и осталось.

Может что я нето делаю, вот посмотри

читать дальше »

[Setup]
DiskSpanning=true
DiskSliceSize=1457664000
AppId={{28E95C95-2094-4AAC-8D93-F5ACDB724359}
AppName=GTS
AppVerName=GTS 1.0
AppPublisher=DCore
DefaultDirName={pf}\GTS
DefaultGroupName=GTS
AllowNoIcons=yes
OutputDir=E:\Инсталяторы
OutputBaseFilename=setup
SetupIconFile=E:\Инсталяторы\icon.ico
Compression=lzma/ultra64
SolidCompression=true
InternalCompressLevel=ultra64

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

[Tasks]
Name: desktopicon; Description: {cm:CreateDesktopIcon}; GroupDescription: {cm:AdditionalIcons}; Flags: unchecked
Name: quicklaunchicon; Description: {cm:CreateQuickLaunchIcon}; GroupDescription: {cm:AdditionalIcons}; Flags: unchecked
Name: dxinstall; Description: Установить DirectX; Flags: unchecked
Name: C; Description: Установить С++ 2005 redistributable; Flags: unchecked

[Files]
Source: D:\Games\GTS\bin\win_x86\game.exe; DestDir: {app}\bin\win_x86\; Flags: ignoreversion
Source: D:\Games\GTS\*; DestDir: {app}; Flags: ignoreversion recursesubdirs createallsubdirs
; NOTE: Don't use "Flags: ignoreversion" on any shared system files

[Icons]
Name: {group}\GTS; Filename: {app}\bin\win_x86\game.exe; WorkingDir: {app}\bin\win_x86
Name: {group}\{cm:UninstallProgram,GTS}; Filename: {app}\bin\win_x86\game.exe; WorkingDir: {app}\bin\win_x86; IconIndex: 0
Name: {commondesktop}\GTS; Filename: {app}\bin\win_x86\game.exe; Tasks: desktopicon; WorkingDir: {app}\bin\win_x86; IconIndex: 0
Name: {userappdata}\Microsoft\Internet Explorer\Quick Launch\GTS; Filename: {app}\bin\win_x86\game.exe; Tasks: quicklaunchicon; WorkingDir: {app}\bin\win_x86; IconIndex: 0

[Run]
Filename: {app}\bin\win_x86\game.exe; Description: {cm:LaunchProgram,GTS}; Flags: nowait postinstall skipifsilent
Filename: {src}\Redist\DXSETUP.exe; Parameters: /silent; Tasks: dxinstall
Filename: {src}\Redist\vcredist_x86.exe; Parameters: /q; Tasks: C

[Code_]
function InitializeSetup(): Boolean;
var
ResultCode: Integer;
ResultStr:string;
begin
Result:=True;
begin
If RegQueryStringValue(HKLM, 'SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\Need for Speed™ Undercover_is1', 'UninstallString', ResultStr)
then
begin
If ResultStr<>''
then
begin
ResultStr:=RemoveQuotes(ResultStr);
if MsgBox('Игра Need for Speed™ Undercover уже установлена.' #13#13 'Вы хотите удалить существующую копию перед продолжением?', mbConfirmation, MB_YESNO) = idYes
then
if not Exec(ResultStr, '/silent', '', SW_SHOW, ewWaitUntilTerminated, ResultCode)
then
MsgBox('Ошибка удаления.' #13#13 '' + SysErrorMessage(ResultCode) + '.' #13#13 'Вероятно, деинсталлятор был перемещен, удален или переименован.', mbError, MB_OK);
end;
end;
end;
end;

Подскажите где посматреть мануал на создание установщика с архивами FreeArc.