FastReport VCL程序员手册：通过代码创建对话表单-控件新闻-慧都网

FastReport VCL程序员手册：通过代码创建对话表单

翻译|使用教程|编辑：杨鹏连|2021-04-21 14:06:51.010|阅读 112 次

概述：众所周知，报告可以包含对话形式。以下示例显示了如何使用“确定”按钮创建对话表单。

相关链接：

FastReport VCL是用于Delphi，C ++ Builder，RAD Studio和Lazarus的报告和文档创建VCL库。它提供了可视化模板设计器，可以访问为30多种格式，并可以部署到云，网站，电子邮件和打印中。

近日，FastReport VCL更新至v6.9，在新版本中，在PDF更新中增加了对以下对象的并行表单支持：文本，替换和图片。能够通过InteractiveFormsFont子集属性将所需的字形仅包含在相互形式中。同时修复了多个Bug问题。欢迎下载体验。（单击下方按钮下载）

立即点击下载FastReport VCL v6.9最新版

众所周知，报告可以包含对话形式。以下示例显示了如何使用“确定”按钮创建对话表单：

Pascal：

{ for working with dialogue objects the following unit should be used }
uses frxDCtrl;

var
  Page: TfrxDialogPage;
  Button: TfrxButtonControl;

{ add a page }
Page := TfrxDialogPage.Create(frxReport1);

{ create a unique name }
Page.CreateUniqueName;

{ set sizes }
Page.Width := 200;
Page.Height := 200;

{ set a position }
Page.Position := poScreenCenter;

{ add a button }
Button := TfrxButtonControl.Create(Page);
Button.CreateUniqueName;
Button.Caption := 'OK';
Button.ModalResult := mrOk;
Button.SetBounds(60, 140, 75, 25);

{ show a report }
frxReport1.ShowReport;

C ++：

// for working with dialogue objects the following unit should be used 
#include "frxDCtrl.hpp"

TfrxDialogPage * Page;
TfrxButtonControl * Button;

// add a page 
Page = new TfrxDialogPage(frxReport1);

// create a unique name  
Page->CreateUniqueName();

// set sizes 
Page->Width = 200;
Page->Height = 200;

// set a position 
Page->Position = poScreenCenter;

// add a button 
Button = new TfrxButtonControl(Page);
Button->CreateUniqueName();
Button->Caption = "OK";
Button->ModalResult = mrOk;
Button->SetBounds(60, 140, 75, 25);

// show a report 
frxReport1->ShowReport(true);