Pascal 7 & Objects


Построение объекта диалогового блока


-----------------------------------------------------------------

После того как ресурс диалогового окна будет определен, ваша программа может использовать его для создания и выполнения диало- гового окна. Диалоговые блоки выводятся обычно как дочерние окна основного окна приложения, но они создаются несколько по-другому, чем обычные окна.

Конструктор объекта диалогового блока выглядит как конструк- тор оконного объекта, воспринимающий два параметра. В обоих слу- чаях первый параметр - это указатель на объект порождающего окна. Второй параметр (PChar) определяет заголовок объекта окна. Однако для объекта диалогового блока в качестве шаблона диалогового бло- ка используется имя диалогового ресурса.

Файл ресурса для программы Steps определяет диалоговый блок с именем 'ABOUTBOX', которое вы можете использовать в качестве окна About box, показанного на Рис. 3.4. Построение объекта диа- логового блока из данного ресурса выглядит следующим образом:

New(PDialog, Init(@Self, 'ABOUTBOX'));

+-------------------------------------------------+ |#=#XXXXXXXXXXXXXXXXXAbout StepsXXXXXXXXXXXXXXXXXX| +-------------------------------------------------| | | | +----------------------------------------+ | | | | | | | @@@@ ObjectWindows tutorial program | | | | @@@@ | | | | Copiright (C) 1992 | | | | Borland International Inc. | | | | All Rights Reserved | | | +----------------------------------------+ | | | | +-----------+ | | |####OK#####| | | +-----------+ | +-------------------------------------------------+

Рис. 3.4 Окно About Box для программы Steps.




- Начало -  - Назад -  - Вперед -