[vadjliss]

парни как сделать что бы с начало установился ориг. инсталлятор , а потом в эту папку закинуть доп. файлы без подтверждения на замену

[AlekseyPopovv]

Как сделать привязку через code?

Скрытый текст

[vint56]

AlekseyPopovv,

Пример

[Setup]
AppName=My Program
AppVersion=1.5
DefaultDirName={pf}\My Program
DefaultGroupName=My Program
OutputBaseFilename=setup

[Languages]
Name: "default"; MessagesFile: "compiler:Default.isl"

[Files]
;Source: compiler:Examples\Readme.txt; DestDir: {app}\1; Check: IsChecked(1)
;Source: compiler:Examples\Readme.txt; DestDir: {app}\2; Check: IsChecked(2)

[Icons]
//0
Name: "{commondesktop}\Версия 1.1.0.0 (рекомендуется)"; Filename: "{app}\MyProg.exe"; Check: IsChecked(1)
Name: "{commondesktop}\Версия 1.1.0.1"; Filename: "{app}\MyProg.exe"; Check: IsChecked(2)
Name: "{commondesktop}\Версия 1.1.0.5"; Filename: "{app}\MyProg.exe"; Check: IsChecked(3)
Name: "{commondesktop}\Версия 1.1.0.7"; Filename: "{app}\MyProg.exe"; Check: IsChecked(4)
Name: "{commondesktop}\Версия 1.1.0.8"; Filename: "{app}\MyProg.exe"; Check: IsChecked(5)

Name: "{commondesktop}\Haali Matroska Muxer 2013.04.14"; Filename: "{app}\MyProg.exe"; Check: IsChecked(6)
Name: "{commondesktop}\Surcode DTS Encoder 1.0.29.0"; Filename: "{app}\MyProg.exe"; Check: IsChecked(7)
Name: "{commondesktop}\Nero AAC Encoder 1.5.4.0"; Filename: "{app}\MyProg.exe"; Check: IsChecked(8)
Name: "{commondesktop}\Nero Audio Decoder 7"; Filename: "{app}\MyProg.exe"; Check: IsChecked(9)
Name: "{commondesktop}\Sonic Audio Decoder 4.3.0.169"; Filename: "{app}\MyProg.exe"; Check: IsChecked(10)

[code]
var
TasksPage,TasksPage2: TWizardPage;
CheckListBox,CheckListBox2: TNewCheckListBox;
BorderWidth,BorderWidth2: Integer;

function IsChecked(const Index: Integer): Boolean;
begin
Result:= CheckListBox.Checked[Index]
end;

procedure InitializeWizard();
begin
TasksPage := CreateCustomPage(wpWelcome, 'Выберите дополнительные задачи', 'Какие дополнительные задачи необходимо выполнить?');
CheckListBox := TNewCheckListBox.Create(WizardForm);
CheckListBox.Parent := TasksPage.Surface;
CheckListBox.SetBounds(ScaleX(0), ScaleY(0), ScaleX(417), ScaleY(210));
BorderWidth := (CheckListBox.Width-CheckListBox.ClientWidth) div 2;
CheckListBox.Flat := False;
CheckListBox.Color := clMenu;
CheckListBox.BorderStyle := bsNone;
CheckListBox.WantTabs :=True;

CheckListBox.AddCheckBoxEx('ArcSoft DTS decoder', '', 0, True, True, True, True, nil, True);
CheckListBox.AddRadioButtonEx('Версия 1.1.0.0 (рекомендуется)', '', 1, True, True, nil, False);
CheckListBox.AddRadioButtonEx('Версия 1.1.0.1', '', 1, False, True, nil, True);
CheckListBox.AddRadioButtonEx('Версия 1.1.0.5', '', 1, False, True, nil, True);
CheckListBox.AddRadioButtonEx('Версия 1.1.0.7', '', 1, False, True, nil, True);
CheckListBox.AddRadioButtonEx('Версия 1.1.0.8', '', 1, False, True, nil, True);

CheckListBox.AddCheckBoxEx('Haali Matroska Muxer 2013.04.14', '', 0, True, True, True, True, nil,True);
CheckListBox.AddCheckBoxEx('Surcode DTS Encoder 1.0.29.0', '', 0,True, True, True, True, nil,True);
CheckListBox.AddCheckBoxEx('Nero AAC Encoder 1.5.4.0', '', 0, True, True, True, True, nil,True);
CheckListBox.AddCheckBoxEx('Nero Audio Decoder 7', '', 0,True, True, True, True, nil,True);
CheckListBox.AddCheckBoxEx('Sonic Audio Decoder 4.3.0.169', '', 0, True, True, True, True, nil,True);
end;

[AlekseyPopovv]

vint56, Спасибо У меня есть этот код, только вот почему то "[Index]" потерялось

[valyok666]

Доброго времени суток Такой вопрос люди добрые,Inno Setup Ultra ещё есть?Или проект уже закрылся?

[dimantv_wot@vk]

Как сделать при запуске установщика всплывчатое лого

[ZVSRus]

dimantv_wot@vk

Как сделать при запуске установщика всплывчатое лого

[dimantv_wot@vk]

Как можно в установщике прописать отдельный путь к распаковки удаления инсталлятора

[dimantv_wot@vk]

ZVSRus, А на Юникоде как сделать что бы работало ?

[ZVSRus]

А на Юникоде как сделать что бы работало

У меня ANSI (видно в подписи), на Юникоде не проверял, так-как нету Юникоде и как сделать не знаю.

PS. Если у вас InnoSetup Ultra Unicode, тогда попробуй так: В папке куда установлена InnoSetup Ultra есть папка Dll Examples в ней папка Isgsg [0.6.0.69] данный пример работает и на Unicode