fastreport 3 生成的fr3文件，用什么编辑器可以直接编辑呀，不用进到程序里编辑

gordonjoegl 2011-11-30 01:55:41

fastreport 3 生成的fr3文件，用什么编辑器可以直接编辑呀，不用进到程序里编辑，急呀

...全文

2956 4 打赏收藏转发到动态举报

写回复

用AI写文章

4 条回复

切换为时间正序

请发表友善的回复…

发表回复

babydog01 2011-11-30

打赏
举报

[Quote=引用楼主 gordonjoegl 的回复:]
fastreport 3 生成的fr3文件，用什么编辑器可以直接编辑呀，不用进到程序里编辑，急呀
[/Quote]
不进程序怎么编辑？Fr3有自己的格式。单独做一个fr3编辑器就可以了。

kaikai_kk 2011-11-30

打赏
举报

fastreport自身的文件，當然是自己才能修改了

gordonjoegl 2011-11-30

打赏
举报

显示的是16进制，不是图表式的呀，也没有办法移动MEMO呀

iDeputy 2011-11-30

打赏
举报

文本编辑器可以打开

编写这个程序是因为在C#下用FastReport.net设计了一些报表应用,客户感觉.net的应用速度不理想,现改用Delphi XE2,需要将frx的报表转换回fr3. 两种格式都是xml文件,于是想到采用XSLT格式转换,程序读取frx格式定义与xsl转换定义,生成fr3转换结果文件.压缩包中包括完整的源代码/可执行程序与XSLT的初步定义.运行frx2fr3.exe将当前文件夹下的所有frx文件转换后保存到fr3子文件夹下.

fastreport报表脚本语言实例，包括frf及fr3格式, 显示值换行方法，及日期显示格式，不合法日期不显示脚本, 给大家参考。

FastReport把fp3文件转为excel文件，导出fp3文件后，然后通过FastReport工具打开就可以到处为EXCEL。

可以打开Fastreport frp及fp3的报表文件.

Test_FastReportPrint4万能fr3报表查看器自设计中支持按文本格式查看fr3报表, 前提是报表中最好不要有图片,否则打开会无响应或反应很慢测试fr3文件2M左右反应很慢 procedure TFrm_BarCode.FallBitBtn6Click(Sender: TObject); begin //默认设计 MyTmsPrintDropBtn1.FrxReport.DesignPreviewPage end; procedure TFrm_BarCode.FallBitBtn3Click(Sender: TObject); begin //自写设计 MyTmsPrintDropBtn1.PrintRpt_DesignerW(FrptPrintIDX,Frpttitle,FrptFile); end; procedure TFrm_BarCode.FallBitBtn5Click(Sender: TObject); begin //预览 MyTmsPrintDropBtn1.PrintRpt_PreviewNoDialog(FrptPrintIDX,Frpttitle,FrptFile); end; procedure TFrm_BarCode.FallBitBtn4Click(Sender: TObject); begin //无对话框打印 MyTmsPrintDropBtn1.PrintRpt_PrintNow(FrptPrintIDX,Frpttitle,FrptFile); end; procedure TFrm_BarCode.MyTmsPrintDropBtn1BeforeDropMenuClick( Sender: TMenuItem; ItemsTag: Integer; var CanClick: Boolean; var Memo: String); begin MyTmsPrintDropBtn1.RptFileName:=''; end; procedure TFrm_BarCode.AdvStringGrid1GetEditorType(Sender: TObject; ACol, ARow: Integer; var AEditor: TEditorType); begin if (ACol=0 ) and (ARow=0) then begin AEditor:=edComboList; end; end; procedure TFrm_BarCode.MyTmsPrintDropBtn2BeforeDropMenuClick( Sender: TMenuItem; ItemsTag: Integer; var CanClick: Boolean; var Memo: String); begin with MyTmsPrintDropBtn1 do begin RptPrintIDX:=0; RptPrtTitle:='xxxxxx'; RptFileName:=gsPath+'data\test.fr3' end; end; procedure TFrm_BarCode.FallBitBtn1Click(Sender: TObject); begin MyTmsPrintDropBtn1.FrxReport.PreviewPages.Export(frxXLSExport1) ; end; procedure TFrm_BarCode.FallBitBtn8Click(Sender: TObject); begin //初始化数据 with MyTmsPrintDropBtn1 do begin RptPrintIDX:=StrToInt(Trim(lbe_idx.Text)); //打印机 RptPrtTitle:=Trim(lbe_title.Text); //打印时显示的文件名 RptFileName:=Trim(lbe_file.Text) //打印模板 end; end; end.

Delphi

5,943

社区成员

262,943

社区内容

发帖

与我相关

我的任务

社区管理员

加入社区

近7日
近30日
至今

加载中

查看更多榜单

社区公告

暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章