FastReport---Creating a dialogue form from a code

减小字体 增大字体 作者:佚名  来源:转载  发布时间:2010-10-30 12:59:28

As we know, a report can contain dialogue forms. The following example shows

how to create a dialogue form, with an «OK» button:

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;

14 FastReport 4.6 Programmer's manual

© 1998-2008 Fast Reports Inc.

{ add a button }

Button := TfrxButtonControl.Create(Page);

Button.CreateUniqueName;

Button.Caption := 'OK';

Button.ModalResult := mrOk;

Button.SetBounds(601407525);

{ 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(601407525);

// show a report

frxReport1->ShowReport(true);

Tags:

作者:佚名
  • 好的评价 如果您觉得此文章好,就请您
      0%(0)
  • 差的评价 如果您觉得此文章差,就请您
      0%(0)

文章评论评论内容只代表网友观点,与本站立场无关!

   评论摘要(共 0 条,得分 0 分,平均 0 分) 查看完整评论

广告位置B