Вопрос Выбор компонента

aza

Новичок
vint56, Мне нужна выборка когда прошел все этапы,выбор пути и тд потом идет выбор потом выбор языка.Твой пример ставит правильно rev.ini(Без остального шлака),но выборки отдельной нету;(
 

sergey3695

Ветеран
Модератор
aza, :facepalm:
Код:
#define MyAppName "Counter-strike source "
#define MyAppVersion "v86 (3029837)"
#define MyAppPublisher "Steam, Inc."
#define MyAppURL "http://myaza.ru"
#define MyAppExeName "Counter-strike source v86.exe"

[Setup]
AppId={{A32503D2-C463-46FA-885A-A5B2CD673667}
AppName={#MyAppName}
AppVersion={#MyAppVersion}
;AppVerName={#MyAppName} {#MyAppVersion}
AppPublisher={#MyAppPublisher}
AppPublisherURL={#MyAppURL}
AppSupportURL={#MyAppURL}
AppUpdatesURL={#MyAppURL}
DefaultDirName={pf}\{#MyAppName}
DefaultGroupName={#MyAppName}
OutputDir=C:\Users\Aza\Desktop
OutputBaseFilename=setup
Compression=lzma
SolidCompression=yes
// Показывать размер компонентов в списке компонентов
ShowComponentSizes=no

[Languages]
Name: "english"; MessagesFile: "compiler:Languages\English.isl"
Name: "russian"; MessagesFile: "compiler:Languages\Russian.isl"
Name: "ukrainian"; MessagesFile: "compiler:Languages\Ukrainian.isl"

[Types]
Name: full; Description: Full installation; Flags: iscustom

[Components]
Name: Local; Description: Язык интерфейса:; Types: full; Flags: fixed
Name: Local\eng; Description: Английский; Flags: exclusive
Name: Local\rus; Description: Русский; Flags: exclusive
Name: Local\ukr; Description: Украинский; Flags: exclusive

[Tasks]
Name: "desktopicon"; Description: "{cm:CreateDesktopIcon}"; GroupDescription: "{cm:AdditionalIcons}"; MinVersion: 0.0,5.0;
Name: "quicklaunchicon"; Description: "{cm:CreateQuickLaunchIcon}"; GroupDescription: "{cm:AdditionalIcons}"; MinVersion: 0.0,5.0; OnlyBelowVersion: 0.0,6.01;

[Files]
Source: "Counter-strike source v86.exe"; DestDir: "{app}"; Flags: ignoreversion
Source: "AutoUpdater_CSS.exe"; DestDir: "{app}"; Flags: ignoreversion
Source: "In\*"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs
Source: "ini\rev.ini"; DestDir: "{app}"; DestName: "rev.ini";MinVersion: 0.0,5.0; Components:Local\rus;Flags: ignoreversion;
Source: "ini\rev2.ini"; DestDir: "{app}"; DestName: "rev.ini";MinVersion: 0.0,5.0; Components:Local\eng;Flags: ignoreversion;
Source: "ini\rev3.ini"; DestDir: "{app}"; DestName: "rev.ini";MinVersion: 0.0,5.0; Components:Local\ukr;Flags: ignoreversion;

[Icons]
Name: "{group}\{#MyAppName}"; Filename: "{app}\{#MyAppExeName}";MinVersion: 0.0,5.0;
Name: "{group}\Автообновлятор CSS"; Filename: "{app}\AutoUpdater_CSS.exe";MinVersion: 0.0,5.0;
Name: "{group}\{cm:UninstallProgram,{#MyAppName}}"; Filename: "{uninstallexe}";MinVersion: 0.0,5.0;
Name: "{commondesktop}\{#MyAppName}"; Filename: "{app}\{#MyAppExeName}"; Tasks: desktopicon; MinVersion: 0.0,5.0;
Name: "{commondesktop}\Автообновлятор CSS"; Filename: "{app}\AutoUpdater_CSS.exe"; Tasks: desktopicon;MinVersion: 0.0,5.0;
Name: "{userappdata}\Microsoft\Internet Explorer\Quick Launch\{#MyAppName}"; Filename: "{app}\{#MyAppExeName}"; Tasks: quicklaunchicon;MinVersion: 0.0,5.0;

[Run]
Filename: "{app}\{#MyAppExeName}"; Description: "{cm:LaunchProgram,{#StringChange(MyAppName, '&', '&&')}}"; Flags: nowait postinstall skipifsilent

[Code]
procedure InitializeWizard();
begin
if ActiveLanguage='english' then
  WizardForm.ComponentsList.Checked[1]:=true;
if ActiveLanguage='russian' then
  WizardForm.ComponentsList.Checked[2]:=true;
if ActiveLanguage='ukrainian' then
  WizardForm.ComponentsList.Checked[3]:=true;
end;

// Скрывает страницу компонентов
//function ShouldSkipPage(PageID: Integer): Boolean;
//begin
//  if (PageID = 7) then
//  Result:= True;
//end;
 
Сверху