как создать новую страницу?

Mrman

Новичок
Всем доброго дня!
Вопрос таков :
как создать новую страницу и зделать переход на нее при нажатии определенной кнопки?
Имеется ввиду как зделано в скрипте каталистов с Md5,
ну и собственно после завершения переходило на следуюшую страницу
 
Последнее редактирование:

Хамик

Старожил
Код:
[Setup]
AppName=My Application
AppVersion=1.5
DefaultDirName={pf}\My Application

[Code]
var
AkkPage: TWizardPage;
portbtn: TNewCheckbox;

procedure InitializeWizard();
begin
AkkPage := CreateCustomPage(wpWelcome, 'Page_Caption', 'Page_Description');

portbtn := TNewCheckBox.Create(WizardForm);
portbtn.Parent := WizardForm.WelcomePage;
portbtn.Caption := 'Показать страничку';
portbtn.SetBounds(ScaleX(180), ScaleY(280), ScaleX(80), ScaleY(23));
end;

function ShouldSkipPage(PageID: Integer): Boolean;
begin
  if (PageID = AkkPage.id) then Result := not portbtn.Checked;
end;
 
Сверху