Смотрите видео ниже, чтобы узнать, как установить наш сайт в качестве веб-приложения на домашнем экране.
Примечание: Эта возможность может быть недоступна в некоторых браузерах.
[Setup]
AppName=Painkiller Hell & Damnation
AppVersion=1.5
DefaultDirName={pf}\Painkiller Hell & Damnation
[_Code]
var
Language: TNewComboBox;
s0,s1,s2,s3,s4,s5,s6,s7,s8,s9,s10,s11,s12,s13,s14,s15,s16,s17,s18,s19,s20,s21: String;
LanguageLabel: TLabel;
procedure InitializeWizard();
begin
Language := TNewComboBox.Create(WizardForm);
with Language do
begin
Parent := WizardForm.SelectDirPage;
Left := ScaleX(120);
Top := ScaleY(120);
Width := ScaleX(145);
Height := ScaleY(21);
Items.Add('japanese');
Items.Add('polish');
Items.Add('hungarian');
Items.Add('czech');
Items.Add('brazilian');
Items.Add('german');
Items.Add('spanish');
Items.Add('italian');
Items.Add('french');
Items.Add('english');
Items.Add('russian');
ItemIndex := 0;
end;
LanguageLabel := TLabel.Create(WizardForm);
with LanguageLabel do
begin
Parent := WizardForm.SelectDirPage;
Caption := 'Selet game language:';
Left := ScaleX(0);
Top := ScaleY(120);
Width := ScaleX(112);
Height := ScaleY(13);
end;
end;
procedure CurStepChanged(CurStep: TSetupStep);
begin
s0:= + '=';
s1:= + '[Game]' + #13#10;
s2:= + 'AppId = 214870' + #13#10;
s3:= + 'Language' + s0 +(Language.Text) + #13#10 + #13#10;
s4:= + '[Settings]' + #13#10;
s5:= + 'PlayerName =Origins' + #13#10 + #13#10;
s6:= + '[Subscriptions]' + #13#10;
s7:= + 'Default = true' + #13#10 + #13#10;
s8:= + '[DLC]' + #13#10;
s9:= + '1 = 219130' + #13#10;
s10:= + '2 = 219131' + #13#10;
s11:= + '3 = 219133' + #13#10;
s12:= + '4 = 219135' + #13#10;
s13:= + '5 = 219136' + #13#10;
s14:= + '6 = 229190' + #13#10;
s15:= + '7 = 229210' + #13#10;
s16:= + '8 = 229230' + #13#10;
s17:= + '9 = 229250' + #13#10;
s18:= + '10 = 229270' + #13#10;
s19:= + '11 = 229290' + #13#10;
s20:= + '12 = 229310' + #13#10;
s21:= + '13 = 230010' + #13#10;
CreateDir(ExpandConstant('{app}\Binaries\Win32'));
case CurStep of
ssPostInstall: SaveStringToFile(ExpandConstant('{app}\Binaries\Win32\SKIDROW.ini'), s1+s2+s3+s4+s5+s6+s7+s8+s9+s10+s11+s12+s13+s14+s15+s16+s17+s18+s19+s20+s21, False);
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;
[Ini]
Filename: "{app}\Binaries\Win32\SKIDROW.ini"; Section: "Game"; Key: "Language"; String: "russian"; Components: text\rus;
Filename: "{app}\Binaries\Win32\SKIDROW.ini"; Section: "Game"; Key: "Language"; String: "english"; Components: text\eng;