Delphi 7 中使用RAVE报表（七）

Delphi 7 中使用RAVE报表（七）

----  一些技巧

作为《Delphi 7 中使用RAVE报表》的最后，整理一些技巧给大家。

1．设计好的Rave报表文件如何打包到EXE文件中？

       在Rvproject的属性中有一个StoreRav，只要load对应的rav文件即可!

同时最好把对应rvproject的ProjectFile属性清空。

2．如何显示中文化的打印预览对话框？

      拷贝C:/Rave5/Source目录中的RpFormPreview.pas和RpFormPreview.dfm到对应的项

目目录中。

      把RpFormPreview.pas加入到对应的项目文件中，把对应窗体的名字从

RavePreviewForm更改为SCRavePreviewForm；将文件RpFormPreview.pas另存为

SCFormPreview.pas。

      把窗体SCRavePreviewForm中的对应文字从英文更改为中文。

      在主窗体上加上 RvProject和 RvSystem部件，通过设定RvProject.Engine为

RvSystem部件来把两者挂接。    

      设置RvSystem部件的OverridePreview事件过程为以下代码：

procedure TForm1.RvSystem1OverridePreview(ReportSystem: TRvSystem;

  OverrideMode: TOverrideMode; var OverrideForm: TForm);

begin

    Case OverrideMode Of

    omCreate:

    Begin

        OverrideForm := TSCRavePreviewForm.Create(self);

        //OverrideForm.Caption := ReportSystem.TitlePreview;

        OverrideForm.Width := ReportSystem.SystemPreview.FormWidth;

        OverrideForm.Height := ReportSystem.SystemPreview.FormHeight;

        OverrideForm.WindowState := ReportSystem.SystemPreview.FormState;

        (OverrideForm As TSCRavePreviewForm).ReportSystem := ReportSystem;

    End;

    omShow:

    Begin

     &nb