2Pascal-新时代的Pascal

 找回密码
 立即注册
搜索
热搜: fastreport
查看: 1782|回复: 1
打印 上一主题 下一主题

最简单调用锐浪报表例子

[复制链接]

29

主题

73

帖子

724

积分

管理员

Rank: 9Rank: 9Rank: 9

积分
724
跳转到指定楼层
楼主
发表于 2015-11-8 11:05:33 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
京东数码购物支持本站
窗体添加UniHTMLFrame控件

html属性为

[mw_shl_code=javascript,true]<html xmlns="http://www.w3.org/1999/xhtml">
<head>
  <title>Web报表(B/S报表)演示 - 最简单例子,用插件在网页中展现报表</title>
  <meta http-equiv="Content-Type" content="text/html; charset=utf-8"/>
  <script src="CreateControl.js" type="text/javascript"></script>
</head>
<body style="margin:0">
  <script type="text/javascript">
            CreatePrintViewerEx("100%", "100%", "files/simple.grf", "files/simple.xml", true, "");
  </script>
</body>
</html>[/mw_shl_code]

simple.grf simple.xml 放到files目录下

server模块初始化添加mime定义,解决权限问题
[mw_shl_code=delphi,true]procedure TUniServerModule.UniGUIServerModuleCreate(Sender:TObject);
begin
MimeTable.AddMimeType('grf','grf report');
end;[/mw_shl_code]
server模块中cutomfiles添加CreateControl.js文件,ok


实际引用时,替换files/simple.grf为应用的grf模板,程序生成对应的xml文件,替换files/simple.xml



回复

使用道具 举报

29

主题

73

帖子

724

积分

管理员

Rank: 9Rank: 9Rank: 9

积分
724
沙发
 楼主| 发表于 2015-12-28 16:57:32 | 只看该作者
京东数码购物支持本站
这个例子有个问题,就是会占用所有的窗口,无法最小化,关闭后就退出了
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|Archiver|手机版|小黑屋|新时代Pascal论坛

GMT+8, 2024-4-30 08:24 , Processed in 0.058610 second(s), 23 queries .

Powered by Discuz! X3

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表