zoukankan      html  css  js  c++  java
  • [翻译]Writing Custom Wizards 编写自定义的向导

    Writing Custom Wizards  编写自定义的向导

     

    You can extend FastReport's functionality with the help of custom wizards. FastReport, for example, contains the standard “Report Wizard” which is called from the “File >|New…” menu item.

    There are two types of wizards supported by FastReport. The first type includes the wizard already mentioned, called from the “File>New…” menu item. The second one includes wizards that can be called from the “Wizards” toolbar.

    The base class for any wizard is “TfrxCustomWizard”, defined in the “frxClass” file.

    TfrxCustomWizard = class(TComponent)

    Public

    Constructor Create(AOwner: TComponent); override;

    class function GetDescription: String; virtual; abstract;  //需要实现

    function Execute: Boolean; virtual; abstract;   //需要实现

    property Designer: TfrxCustomDesigner read FDesigner;

    property Report: TfrxReport read FReport;

    end;

    To write your own wizard inherit from this class and override at least the “GetDescription” and “Execute” methods. The first method returns the wizard name; the second method is called when running the wizard; it must return “True” if the wizard finished successfully and made any changes to the report. While the wizard is running you can access designer and report methods and properties as normal using the “Designer” and “Report” properties.

     

    Wizard registration and deletion is performed using the procedures defined in the “frxDsgnIntf” file:

    向导的注册用以下方法,声明在frxDsgnIntf文件:

    frxWizards.Register(ClassRef: TfrxWizardClass; ButtonBmp: TBitmap;IsToolbarWizard: Boolean = False);

    frxWizards.Unregister(ClassRef: TfrxWizardClass);

    On registration supply the wizard class name, its picture and whether the wizard is to be placed on the “Wizards” toolbar. If the wizard should be placed on the toolbar the ButtonBmp size must be either 16x16 pixels or 32x32 pixels.

    //举例

    Let's look at a primitive wizard that will be accessed through the "File>New..." menu item. It adds a new page to a report.

    uses frxClass, frxDsgnIntf;

    type

    TfrxMyWizard = class(TfrxCustomWizard)

    public

    //需要重写的方法

    class function GetDescription: String; override;

    function Execute: Boolean; override;

    end;

    class function TfrxMyWizard.GetDescription: String;

    begin

    Result := 'My Wizard';

    end;

    function TfrxMyWizard.Execute: Boolean;

    var

    Page: TfrxReportPage;

    begin

    { lock any drawings in designer }

    Designer.Lock;

    { create new page in report }

    Page := TfrxReportPage.Create(Report);

    { create unique name for page }

    Page.CreateUniqueName;

    { set paper sizes and orientation to defaults }

    Page.SetDefaults;

    { update report pages and switch focus to last added page }

    Designer.ReloadPages(Report.PagesCount - 1);

    end;

     

    //注册

    var

    Bmp: TBitmap;

    initialization

    Bmp := TBitmap.Create;

    { load picture from resource; of course, it must already be there }

    Bmp.LoadFromResourceName(hInstance, 'frxMyWizard');

    frxWizards.Register(TfrxMyWizard, Bmp);

    finalization

    frxWizards.Unregister(TfrxMyWizard);

    Bmp.Free;

    end.

  • 相关阅读:
    50.EasyGank妹纸App
    项目开发规范,数据库设计规范
    用外部物理路由器时与外部dhcp服务时怎样使用metadata服务(by quqi99)
    [报错处理]Python Requests
    [译]为什么在__new __()后总是调用__init __()?
    '>/dev/null 2>&1' 是什么意思?
    “努力就会成功”
    [译]如何在红帽系统(RHEL)上源码安装python3?
    [译]在你的GitHub主页固定仓库
    [译]拉取仓库远程分支
  • 原文地址:https://www.cnblogs.com/moon25/p/5531673.html
Copyright © 2011-2022 走看看