No4noylis or
All
Спасибо, работает!
Еще два вопроса:
1.А как на кастом пейджах сделать, чтоб оно появлялось?
Ввод кастом пейджа делался так:
читать дальше »
procedure CreateTheWizardPages;
var
Page1: TWizardPage;
Button_Install : TButton;
begin
{ TButton and others }
Page1 := CreateCustomPage(wpWelcome, 'Main Menu', 'Please choose desired action: ');
Button_Install := TButton.Create(Page1);
Button_Install.Top := Button_Install.Top + Button_Install.Height - ScaleY(20);
Button_Install.Left:= Button_Install.Left + (Button_Install.Width)*2 - ScaleY(20);
Button_Install.Width := ScaleX(150);
Button_Install.Height := ScaleY(50);
Button_Install.Caption := 'Go to Directory Page';
// Button_Install.OnClick := @ButtonOnClick;
Button_Install.Parent := Page1.Surface;
end;
2. Как сделать переход на страницу Выбора Директории по клику кнопки? А если такая же кастом страница?
