Farser21 согласно картинкам сверху отображающим статус текущей страницы страница компонентов у тебя есть.
но согласно коду её роль выполняет страница задач wpSelectTasks
как я уже говорил. Добавив секцию [Components] ты получишь страницу с компонентами, но пустую потому что я правильно предположил, что OuterNotebook скрыт
предлагаю поступить так
1. заводим себе секцию с компонентами. Для начала вот такую маленькую
[Components]
Name: "main"; Description: "Main Files";
2. пропускаем возникшую страницу ведь у нас есть страница задач - wpSelectTasks, исполняющая роль заместителя страницы компонетов предположительно по непостижимой задумке автора
"вкопируй" себе эту функцию где-нибудь
читать дальше »
Код:
function ShouldSkipPage(PageID: Integer): Boolean;
begin
Result := (PageID = wpSelectComponents);
end;
3. в процедуре InitializeWizard после авторских манипуляций с визуальными компонентами мы установим родителем ComponentsList-а нашу главную форму и скроем его, чтоб он не маячил на каждой "странице"
читать дальше »
Код:
procedure InitializeWizard;
begin
CreateWizardImage;
CreateWizard;
ButtonsTextures;
WizardForm.ComponentsList.Parent := WizardForm;
WizardForm.ComponentsList.SetBounds(30, 230, 300, 100); // устанавливаем координаты (слева, сверху, ширина, высота)
WizardForm.ComponentsList.Color := WizardForm.Color; // цвет присвоим от цвета WizardForm
WizardForm.ComponentsList.Hide; // ну и спрячем
....
4. в процедуре procedure CurPageChanged(CurPageID: Integer);
нужно вписать
читать дальше »
Код:
wpSelectDir:
begin
...
WizardForm.ComponentsList.Hide;
end;
wpSelectProgramGroup:
begin
...
WizardForm.ComponentsList.Hide;
end;
wpSelectTasks:
begin
...
WizardForm.ComponentsList.Show;
end;
wpReady:
begin
...
WizardForm.ComponentsList.Hide;
end;
другими словами мы показываем его на странице wpSelectTasks, а на предыдущей и последующей скрываем
здесь правда я скрываю его на 2-х предыдущих: wpSelectProgramGroup, wpSelectDir
хотя достаточно на wpSelectProgramGroup, но почему-то эта страница перепрыгивается.
готово.
теперь как обычно заполняешь секцию компонентов компонентами и судя по тому что ты не используешь встроенныое решение для сжатия и распаковки файлов, регулируешь распаковку через Check: например так:
читать дальше »
Код:
[Components]
Name: "program"; Description: "Program Files"; Check: Extract('program');
Name: "help"; Description: "Help File"; Check: Extract('help');
Name: "readme"; Description: "Readme File"; Check: Extract('readme');
[code ]
function Extract( const ComponentName: String ): Boolean;
begin
case ComponentName of
'program':
begin
// здесь код отвечающий за распаковку файлов этого компонента
end;
'help':
begin
// соответсвенно
end;
'readme':
begin
// ...
end;
end;
end;
результат:
