ultimo
Код:
[Setup]
AppName=My Application
AppVersion=1.5
DefaultDirName={pf}\My Application
[Types]
Name: full; Description: Full installation; Flags: iscustom;
[Components]
Name: text; Description: Язык субтитров; Types: full; Flags: fixed;
Name: text\rus; Description: Русский текст; Flags: exclusive;
Name: text\eng; Description: Английский текст; Flags: exclusive;
Name: voice; Description: Язык озвучки; Types: full; Flags: fixed;
Name: voice\rus; Description: Русская озвучка; Flags: exclusive;
Name: voice\eng; Description: Английская озвучка; Flags: exclusive;
[Languages]
Name: rus; MessagesFile: compiler:Languages\Russian.isl
Name: eng; MessagesFile: compiler:Default.isl
[_code]
procedure InitializeWizard;
begin
if ActiveLanguage = 'eng' then
begin
WizardForm.ComponentsList.Checked[2]:=True;
WizardForm.ComponentsList.Checked[5]:=True;
end;
end;
Код:
[Setup]
AppName=My Application
AppVersion=1.5
DefaultDirName={pf}\My Application
[Types]
Name: full; Description: Full installation; Flags: iscustom;
[Components]
Name: text; Description: Язык субтитров; Types: full; Flags: fixed;
Name: text\rus; Description: Русский текст; Flags: exclusive;
Name: text\eng; Description: Английский текст; Flags: exclusive;
Name: voice; Description: Язык озвучки; Types: full; Flags: fixed;
Name: voice\rus; Description: Русская озвучка; Flags: exclusive;
Name: voice\eng; Description: Английская озвучка; Flags: exclusive;
[Languages]
Name: rus; MessagesFile: compiler:Languages\Russian.isl
Name: eng; MessagesFile: compiler:Default.isl
[_code]
procedure InitializeWizard;
begin
if ActiveLanguage = 'eng' then
begin
WizardForm.ComponentsList.Checked[2]:=True;
WizardForm.ComponentsList.Checked[5]:=True;
end;
end;