zt:如何显示中文化的打印设置对话框?

转载 2004年07月14日 16:04:00

如何显示中文化的打印设置对话框?

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

      把RpFormSetup.pas加入到对应的项目文件中,把对应窗体的名字从RPSetupForm更改为SCSetupForm;将文件RpFormSetup.pas另存为SCFormSetup.pas。

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

      在主窗体上加上 RvProject和 RvSystem部件,通过设定RvProject.Engine为RvSystem部件来把两者挂接。   

      设置RvSystem部件的OverrideSetup事件过程为以下代码:

procedure TForm1.RvSystem1OverrideSetup(ReportSystem: TRvSystem;
  OverrideMode: TOverrideMode; var OverrideForm: TForm);
begin
    case
    OverrideMode of
    omCreate:
    begin
        OverrideForm := TSCSetupForm.Create(nil);
        //OverrideForm.Caption := RvSystem1.TitleSetup;
        (OverrideForm as TSCSetupForm).ReportSystem := ReportSystem;
    end;
    omShow:
    begin
        with OverrideForm as TSCSetupForm, ReportSystem do
        begin
          PreviewSetup := False;
          Aborted := ShowModal = mrCancel;
        end;
    end;
    omWait:
    begin
     {because showModal: no wait necessary!}
    end;
    omFree:
    begin
        OverrideForm.Free;
    end;
    end;
end;

       编译运行这个项目,其打印设置对话框就会变成中文的了!
       这种方式进行中文化不会受到RAVE版本升级的影响!

 

--------------------------------------------------------------------------------------

参考资料一

How to override the standard setupdialog

Category

Rave - General

Question

    How can I change the setup-dialogbox in an other look or in an other language, for example german ?


 

Solution

    In Rave 5 exist a standard setup-form. Many user , especially in "non"-english countries, would localize this dialog.

    Normally the Printsetup Form is displayed when executing the report to allow the user to select the report destination and other settings (copies, file format to use).

    Copy the rpFormSetup.pas- and rpFormSetup.dfm-file in the project folder and change the filenames and the unit-name inside the pas-file and the form-name. for example in dtFormSetup (dt is the abbreviation of "deutsch"- german).

    Sample Files: rave_dtformsetiup.zip

    Add dtFormSetup to the uses statement in the project. Make visual changes and localization to the form and save it.

    Connect the RvSystem component with the RvProject component.
    Select the RvSystem component and create the OverrideSetup event and enter the following code:

    procedure TForm1.RvSystem1OverrideSetup(ReportSystem: TRvSystem; OverrideMode: TOverrideMode; var OverrideForm: TForm); begin case OverrideMode of omCreate: begin OverrideForm := TdtSetupForm.Create(nil); OverrideForm.Caption := RvSystem1.TitleSetup; (OverrideForm as TdtSetupForm).ReportSystem := ReportSystem; end; omShow: begin with OverrideForm as TdtSetupForm, ReportSystem do begin PreviewSetup := False; Aborted := ShowModal = mrCancel; end; end; omWait: begin {because showModal: no wait necessary!) end; omFree: begin OverrideForm.Free; end; end; end; 


    Compile and run any of the reports, your special Setup Form should be displayed when you execute a rave-report.
    -> this way doesn't override your setupform on a rave-update, too.

zt:如何显示中文化的打印预览对话框

如何显示中文化的打印预览对话框       拷贝C:/Rave5/Source目录中的RpFormPreview.pas和RpFormPreview.dfm到对应的项目目录中。       把RpFo...
  • foreveryday007
  • foreveryday007
  • 2004年07月14日 16:05
  • 1449

eclipse的中文化

解压缩eclipse-SDK-3.0.1-win32.zip到E:/eclipse3.0.1解压缩NLpack-eclipse-platform-SDK-3.0.x-win32拷贝features和p...
  • wldandanpig
  • wldandanpig
  • 2005年03月27日 13:44
  • 705

Python_Django_local中文化

检查  ...\Lib\site-packages\Django-1.10.2-py2.7.egg\django\conf\locale下无zh-cn文件夹,有zh-Hans和zh-Hant两个文件,...
  • mikyz
  • mikyz
  • 2017年06月19日 15:56
  • 187

Java的中文化

1.servlet的中文化:示例: public void doPost(HttpServletRequest request, HttpServletResponse response)   thr...
  • westwindwing
  • westwindwing
  • 2006年04月14日 17:36
  • 709

设置对话框显示位置

CHipDlg是IDD_HIP_DIALOG的类  CHipDlg *m_HipDlg;    //先定义  m_HipDlg=new CHipDlg(this); m_HipDlg->Create(...
  • wfq_1985
  • wfq_1985
  • 2011年03月01日 11:19
  • 2776

[ZT]全国车牌详解(含军牌)

全国车牌详解(含军牌) 当我们驾车在路上是不是经常看到一些很少见甚至不懂是什么部门的车牌呢?或许你能在这里找到答案哦!记得见到那些牛B的车牌可得。。。除非你比他更牛。。。不过我觉得我们吉普挂个“赛”...
  • u014461454
  • u014461454
  • 2014年03月31日 17:31
  • 733

全程图解主板 (ZT)

 大家知道,主板是所有电脑配件的总平台,其重要性不言而喻。而下面我们就以图解的形式带你来全面了解主板。   一、主板图解   一块主板主要由线路板和它上面的各种元器件组成   1.线路板   PCB印...
  • wishfly
  • wishfly
  • 2005年12月20日 12:48
  • 925

Eclipse 中文化

说起来也算是只老鸟了,但是因为以前很少用到Eclipse,所以对于怎样汉化Eclipse一无所知,近段时间迷上GTK+,这几个月一直都用CDT开发,虽然英文界面对我没多大障碍,但是中文界面会显得更加亲...
  • DavidHsing
  • DavidHsing
  • 2011年09月28日 14:10
  • 911

[ZT]设计“好看”的用户界面(作者:王咏刚 2003 年10 月)

设计“好看”的用户界面 (王咏刚 2003 年10 月) 1 问题引入 两周前,我的一个朋友小W 找我聊天,跟我说了件烦心事儿:他们公司开发的一套行业软件在竞标时败给了竞争对手;当时,用户给出的理由是...
  • l1t
  • l1t
  • 2004年12月01日 11:49
  • 3388

Debian中文化

1.locale设置locel    #apt-get install locales    if have installed,use this:        #dpkg-reconfigure ...
  • starshus
  • starshus
  • 2005年05月27日 22:40
  • 2039
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:zt:如何显示中文化的打印设置对话框?
举报原因:
原因补充:

(最多只允许输入30个字)