Есть базовая форма, на ней лежит Tab с одной вкладочкой, на которую автоматом при запуске визарда грузиться описание мастера из БД (ну и галочка для выключения этой странички по желанию пользователя - как в визардах Sybase Central). Так же есть кнопки управления ходом визарда и целая куча логики - от приема и обработки параметров окну, таких как режим работы (добавление, изменение или удаление информации), стартовая страница визарда, параметры для потомков, плюс туча функций управления ходом работ (инициализация страниц визарда, уведомления о смене режима работ, запросы на подтверждения достоверности данных, запросы на сохранение данных и т.д.). В общем вся целостная логика самого визарда реализована полностью - он полностью отвечает за ход работ и организовывает все необходимые уведомления и оповещения для своих потомков как в пределах событий формы, так и событий пользовательских вкладок. Далее чтобы быстро слепить мастер нам достаточно наследоваться от формы визарда, в Tab понаделать сколько надо вкладок или вставить UserObject-ы (если страничка используется в нескольких визардах одновременно). Никаких особых требований к страничкам вкладок нет - если вкладка хочет участвовать в ходе работ визарда, то ей просто достаточно подписаться на определенные события, вот их список:
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
33.
34.
35.
36.
37.
38.
39.
40.
41.
42.
43.
44.
45.
46.
47.
48.
/*
События страничек:
none ue_Init( reference boolean p_Complete, reference boolean p_Visible )
- Уведомление странички о необходимости инициализации
ее параметров. Вызывается, когда визард уже считал
и установил все свои необходимые характеристики.
Страничка имеет право остановить работу визарда,
установив p_Complete в False. Страничка может указать свою
видимость через p_Visible
none ue_Activate()
- Уведомление странички о передаче ей фокуса.
Вызывается после передачи фокуса страничке.
none ue_SetFocus()
- Уведомление страничке о необходимости установки фокуса.
Вызывается после передачи фокуса страничке и вызова
события ue_Activate.
none ue_Validate( boolean p_IsBefore, reference boolean p_Complete )
- Запрос о готовности настроек странички. Если p_IsBefore = TRUE,
то вызывается сразу после попадания фокуса на страничку для
определения возможности перехода с нее на следующую страничку
или при вызове метода ValidPage(). Иначе вызывается при попытке
ухода со странички с p_IsBefore = FALSE для окончательного
определения готовности данных странички и возможности ухода
с нее. Через p_Complete страничка может указать визарду, правильно
ли введены все ее данные.
none ue_Deactivate()
- Уведомление странички о потери фокуса.
Вызывается перед самой потерей фокуса страничкой.
none ue_Finish( reference boolean p_Complete )
- Уведомление странички о завершении работы визарда и
о необходимости ее сохранения данных. Страничка имеет
право остановить процесс завершения работы визарда,
установив флаг p_Complete в False.
none ue_Row_New()
- Запрос на добавление новой записи (shortcut)
none ue_Row_Delete()
- Запрос на удаление записи (shortcut)
none ue_Row_Retrieve()
- Запрос на обновление записей (shortcut)
*/
Так что шлепаем на вкладки DataWindow Control и другие контролсы, создаем в вкладке только те события, на логику которых нам нужно реагировать и честно туда вписываем свою логику. Все остальное нас не заботит - визард честно все инициализирует, будет следить за пользователем, чтобы все данные были заполнены, сам при подтверждении окончания работы создаст транзакцию, сам ее подтвердит или откатит в зависимости от результатов работы и позволит потомкам вернуть свой код завершения работы окна для оповещения о проделанной визардом работе. Так же события ue_Row_* позволяют каждой страничке реагировать на клавишы быстрого доступа (для этого визард скрытно на окно цепляет меню).
P.S. Конечно на том же Delphi я все реализовал немного по другому - существовал предок для страничек визарда, но в принципе разницы большой в этом нет - там бы я делал OVERRIDE базовых методов странички, здесь же визард просто динамически вызывает событие у вкладки, которая просто должна его иметь. Мне честно говоря даже модель визарда в PB больше нравиться, чем ту, которую я делал на Delphi, хотя конечно тут опять же свою роль играет DataWindow :)
P.S. В принципе данный визард вполне универсальный и самодостаточный (PBL с системными функциями и PBL с самим визардом), в БД ему нужно создать 3 таблички и одну ХП, через которую он вписывает пользовательские настройки. Эти обьекты элементарно переносятся на любую СУБД, так что подключить визард к любому проекту не представляет никакой сложности. Если кому то будет нужно, то я всегда могу выложить ссылку для его скачки в FAQ.
