Sub OnPageAccessible(Sender: Object; Args: ICancelEventArgs);
Begin
//набор операторов;
End Sub OnPageAccessible;
Sender - параметр, возвращающий компонент, сгенерировавший событие.
Args - параметр, позволяющий определить параметры события.
Событие OnPageAccessible наступает при проверке страницы на доступность.
Недоступная страница в компоненте WizardSplash подсвечивается серым цветом и выбор данной страницы запрещен. С помощью свойства Allowed аргумента события можно определить доступность страницы.
Для выполнения примера предполагается наличие формы, компонента Wizard с несколькими страницами и компонента WizardSplash.
Sub WizardPage1OnPageAccessible(Sender: Object; Args: ICancelEventArgs);
Begin
Args.Allowed := False;
End Sub WizardPage1OnPageAccessible;
После выполнения примера при запуске формы все страницы, для которых в качестве обработчика события OnPageAccessible указана данная процедура, в компоненте WizardSplash будут подсвечены серым цветом и доступ к ним будет запрещен.
См. также: