Inno Setup - создание инсталляционных пакетов (Часть 15) - [1727] :: Программы

Привет парни, помогите пожалуйста, застрял.
Хочу сделать репак игры, но не знаю как сделать, чтобы по мимо установки игры, вместе с ней устанавливались сохранения с настройками.
Например: устанавливаю игру в D:/Games/Crysis и вместе с ней нужно, чтобы в \Documents\My Games\Crysis устанавливались сохранения с настройками, как сделать?

[Setup]
SourceDir=.
OutputDir=Setup
AppName=Crysis 2
AppVerName=Crysis 2 v1.9
AppVersion=1.9
DefaultDirName={pf}\Crysis 2
DisableProgramGroupPage=yes
AllowNoIcons=false
OutputBaseFilename=Setup
WizardImageFile=D:\Загрузки\Скрипты Inno Setup\Crysis 2\Crysis 164х314.bmp
WizardSmallImageFile=D:\Загрузки\Скрипты Inno Setup\Crysis 2\Crysis 53х53.bmp
SetupIconFile=D:\Загрузки\Скрипты Inno Setup\Crysis 2\Icon.ico
WindowVisible=false
WindowShowCaption=false
WindowResizable=false
Compression=lzma2/Ultra64
DiskSpanning=true
DiskSliceSize=1887436800
SlicesPerDisk=1
InternalCompressLevel=Ultra64

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

[Registry]
Root: HKLM; SubKey: "SOFTWARE\Wow6432Node\Crytek\Crysis 2\1.0"; ValueName: DisplayName; ValueData: """Crysis 2"""; ValueType: string;
Root: HKLM; SubKey: "SOFTWARE\Wow6432Node\Crytek\Crysis 2\1.0"; ValueName: Language; ValueData: 00000010; ValueType: dword;
Root: HKLM; SubKey: "SOFTWARE\Wow6432Node\Crytek\Crysis 2\1.0"; ValueName: LanguageName; ValueData: """Russian"""; ValueType: string;
Root: HKLM; SubKey: "SOFTWARE\Wow6432Node\Crytek\Crysis 2\1.0"; ValueName: ProgramGroup; ValueData: """C:\\ProgramData\\Microsoft\\Windows\\Start Menu\\Programs\\Electronic Arts\\Crytek\\"""; ValueType: string;

[Tasks]
Name: desktopicon; Description: {cm:CreateDesktopIcon}; GroupDescription: {cm:AdditionalIcons}
Name: Soft; Description: Дополнительное ПО:; Flags: unchecked
Name: Soft\VCCheck; Description: Установить Microsoft Visual C++ 2008 Redist
Name: Soft\DirectX; Description: Установить DirectX

[Run]
Filename: {tmp}\vcredist_x86.exe; Tasks: Soft\VCCheck; Flags: skipifdoesntexist
Filename: {tmp}\DXSETUP.exe; Tasks: Soft\DirectX; Flags: skipifdoesntexist

[Files]
Source: ISSkin.dll; DestDir: {tmp}; Flags: ignoreversion dontcopy nocompression
Source: steam.cjstyles; DestDir: {tmp}; Flags: ignoreversion dontcopy nocompression
Source: D:\Games\Crysis 2\*; DestDir: {app}; Flags: ignoreversion recursesubdirs createallsubdirs sortfilesbyextension
Source: D:\Загрузки\Скрипты Inno Setup\Crysis 2\DirectX\*; DestDir: {tmp}
Source: D:\Загрузки\Скрипты Inno Setup\Crysis 2\Redistributables\*; DestDir: {tmp}

[Icons]
Name: {userdesktop}\Crysis 2; Filename: {app}\Bin32\Crysis2Launcher.exe; WorkingDir: {app}\Bin32; Tasks: desktopicon; Parameters: -mod MaLDoHDv4

[Code]
procedure LoadSkin(lpszPath: String; lpszIniFileName: String); external 'LoadSkin@files:isskin.dll stdcall';
procedure UnloadSkin(); external 'UnloadSkin@files:isskin.dll stdcall';
function ShowWindow(hWnd: Integer; uType: Integer): Integer; external 'ShowWindow@user32.dll stdcall';

function InitializeSetup:boolean;
begin
ExtractTemporaryFile('steam.cjstyles');
LoadSkin(ExpandConstant('{tmp}')+'\steam.cjstyles', '');
Result:=True;
end;

procedure InitializeWizard();
begin
WizardForm.BorderStyle := bsDialog;
end;

procedure DeinitializeSetup;
begin
ShowWindow(WizardForm.Handle,0);
UnloadSkin();
end;

var
DesktopIcon: TCheckBox;

Модерирует : gyra, Maz
Версия для печати • Подписаться • Добавить в закладки
На первую страницу • к этому сообщению • к последнему сообщению