Delphi 7 中使用RAVE报表（四）

Delphi 7 中使用RAVE报表（四）

                                                                                            ——利用程序设计一张报表

---

   上一篇向大家介绍了建立一张简单报表的过程。这篇文章向大家介绍rave报表代码编程实例。窗体上放置组件：RvSystem， Button即可。

具体代码如下：
##################################################################################

unit Unit1;

interface

uses

  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

  Dialogs, StdCtrls, RpDefine, RpBase, RpSystem;

type

  TForm1 = class(TForm)

    RvSystem1: TRvSystem;

    Button1: TButton;

    procedure RvSystem1Print(Sender: TObject);

    procedure Button1Click(Sender: TObject);

  private

    { Private declarations }

  public

    { Public declarations }

  end;

var

  Form1: TForm1;

implementation

{$R *.dfm}

 

procedure TForm1.RvSystem1Print(Sender: TObject);

var</