在.net App中集成COM组件的一些简单技巧
[[wiki]wiki[/wiki]][/wiki]先谈一下我对FR的感受,FR源于1997一个俄罗斯人的不经意间的一个决定,他在delphi[wiki]编程[/wiki]中发现没有一个报表[wiki]系统[/wiki]可以满足他当时的需要,于是就打算亲手做一个。在98年作者的想做一个快速响应,简单的,支持脚本的报表系统有了正式的命名。作者凭借着很强的ole操作技巧很快的把FR变成了delphi中间使用率很高的报表组件。个人不喜欢pascal语言,自然的就不喜欢delphi,我对FR的景仰完全礫wiki]氖[/wiki]且蛭髡呤且桓龆砺匏沟腫wiki]程序[/wiki]员,并且FR体现的理念很独到,另外小巧的组件大小也是作者自豪的地方。我这次公开的demo中包含的是FR3.0系列的COM专用组件。我在它的论坛了解到4.0会有部分不兼容3.0并且在报表定义上有些分歧,当然也多了一些功能。
在.net调用com本身是一件很容易的事情,但是有很多技巧需要把握。如果仔细观察demo你会发觉一点,这也是我想和大家分享的地方,因为本篇以FR为例但是不局限于FR,我对FR的了解大致是通透的一份programmers manual和5分钟的user manual跳读,我还没有用FR做过一份业务上的模版,所以一些问题我可能也说不上,据我的同事们说在不同的[wiki]操作系统[/wiki]諿wiki]锌[/wiki]赡芑嵊行┫感〉腷ug,所以我推荐用户[wiki]环境[/wiki]是[wiki]XP[/wiki]。
中午花了点[wiki]时间[/wiki]准备,下面就是成果了 :P
FastReportService.Instance.ShowDesigner(delegate(TfrxReport report) { report.MainWindowHandle = (int)this.Handle; },
null, GetDataSource(), null, String.Format("{0}\\Simple list.fr3", Application.StartupPath), null);
FastReportService.Instance.ShowReport(null, null, GetDataSource(), tr[wiki]UE[/wiki], false, null,
String.Format("{0}\\Simple list.fr3", Application.StartupPath));
FastReportService.Instance.ShowDesigner((int)this.Handle, GetDataSource());
这是demo中的片断,你可以看到,封装后的.net调用足够的简单。这是常见的三个场景用例。
service.Cus[wiki]Tom[/wiki]RegSvr = true;
这个开关显示着一个com免部署的方法。要看效果直接运行FRDemo.exe。我希望可以有些惊奇。
这个demo依赖两个程序集,分别是frlib.dll和RegSvrEx.dll。给公司的版本是签名的,我给出没有签名的版本,请合理使用。