Unigui如何打印?Grid++Report锐浪报表解决方法

uniGUI is a Web Application Framework for Delphi,unigui使delphi使用extjs快速的开发web程序,unigui符合delphi开发者的习惯,开发web就象开发桌面程序一样。但unigui中打印没有好的办法,因为是web,所以要么是直接打印html代码,要么是生成pdf,然后打印,这儿我们介绍的是unigui中使用Grid++Report锐浪报表打印方法,使用Grid++Report锐浪报表需要事先安装Grid++Report锐浪报表插件,如果你不喜欢喜欢插件,就只有使用生成pdf文件再打印了,可以不必看下面的内容!

  1. 先在ServerModule模块的Customfiles中加入grinstall/CreateControl.js grinstall/GRInstall.js 这两个Grid++Report锐浪报表的JS,如果浏览器没有安装Grid++Report锐浪报表插件会提示安装!
  2. 引用UntGridppReportCommon.pas单元,该单元就是处理Grid++Report锐浪报表所需要的数据格式的!
  3. 在主窗口中加入TUniHTMLFrame控件!用来显示最终的html数据!
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
    23
    24
    25
    26
    27
    28
    29
    30
    procedure TMainForm.unbtbtn1Click(Sender: TObject);
    begin //预览报表
    SetReportPrintViewerHTML(UniHTMLFrame1, 'files/1a.grf', 'files/ff.txt');
    end;

    procedure TMainForm.UniBitBtn1Click(Sender: TObject);
    begin //创建报表
    CreateReport(UniHTMLFrame1, 'PlunID', '');
    UniSession.JSCode('PlunID.LoadFromURL("files/1a.grf");' +
    'PlunID.LoadDataFromURL("files/ff.txt");' + 'PlunID.PrintPreview(true);');
    end;

    procedure TMainForm.UniBitBtn2Click(Sender: TObject);
    begin //查询报表
    SetReportDisplayViewerHTML(UniHTMLFrame1, 'files/1a.grf', 'files/ff.txt');
    end;

    procedure TMainForm.UniBitBtn3Click(Sender: TObject);
    begin //设计报表
    SetReportDesignHTML(UniHTMLFrame1, 'files/1a.grf', 'files/ff.txt', self);
    end;

    procedure TMainForm.UniBitBtn4Click(Sender: TObject);
    begin
    //打印报表
    UniSession.JSCode('ReportViewer.Print(true);');

    Exit;
    UniHTMLFrame1.HTML.Text := ' ';
    end;
    虽然安装插件不是太理想,但安装插件后就可以实现和桌面打印一样的功能,为什么不安装呢?
    为什么使用Grid++Report锐浪报表呢?因为Grid++Report锐浪报表可以免费使用,付费就是去掉打印右下角的标志,免费使用有一个标志,不过不影响使用!最重要的是锐浪报表支持Web的打印,官网有详细教程,Grid++Report锐浪报表官网 http://www.rubylong.cn/

delphi源码下载地址:
链接: https://pan.baidu.com/s/1kVQFxHeNP_502ovWmC3myg 提取码: 2hzk 复制这段内容后打开百度网盘手机App,操作更方便哦

-------------本文已结束赏个小钱吧-------------
×

感谢您的支持,我们会一直保持!

扫码支持
请土豪扫码随意打赏

打开微信扫一扫,即可进行扫码打赏哦

分享从这里开始,精彩与您同在

64.7K