Отчет "Hello, World!" |
На этот раз мы создадим отчет, выводящий перед построением окно с приветственной надписью, используя диалоговую форму. Создадим новый проект в Delphi, положим на форму следующие компоненты: TfrxReport, TfrxDialogControls. Вызовем дизайнер FastReport двойным щелчком на компоненте TfrxReport и добавим в отчет диалоговую форму. На форму поместим объекты TfrxLabelControl, TfrxButtonControl:
Настроим свойства объектов:
TfrxLabelControl: Caption = 'Hello, World!'
TfrxButtonControl: Caption = 'OK' Default = True ModalResult = mrOk
У самой формы установим свойство BorderStyle = bsDialog. Как видим, все элементы управления и форма имеют тот же набор свойств, что и соответствующие элементы управления Delphi.
Закончив настройку диалоговой формы, вернемся на страницу отчета и поместим на нее объект "Текст" с каким-нибудь текстом внутри. Запустим отчет на выполнение и увидим нашу форму:
Если нажать кнопку ОК, отчет будет построен и показан. Если же закрыть окно кнопкой Х, отчет строиться не будет. Таков алгоритм работы FastReport: при наличии в отчете диалоговых форм отчет будет построен только в том случае, если каждая форма была закрыта кнопкой ОК, т.е. вернула ModalResult = mrOk. Именно поэтому мы установили свойство ModalResult нашей кнопки равным mrOk.
|