bugron
Junior Member | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
[Setup]
AppName=My Program
AppVersion=1.5
DefaultDirName={pf}\My Program
DisableProgramGroupPage=yes
UninstallDisplayIcon={app}\MyProg.exe
OutputDir=userdocs:Inno Setup Examples Output
[Code]
var
DataDirPage: TInputDirWizardPage;
Label0: TLabel;
BitmapImage1: TBitmapImage;
procedure InitializeWizard;
begin
begin
DataDirPage := CreateInputDirPage(wpSelectDir,
'Select Personal Data Directory', 'Where should personal data files be installed?',
'Укажите путь до вашего Steam профиля:',
False, '');
DataDirPage.Add('');
DataDirPage.Edits[0].Text:= GetPreviousData('', 'Путь к профилю Steam');
end;
end; |
