客户想自己修改报表 ReportMachine

[wrost]

我用的是ReportMachine，客户想自己修改报表。

就是在程序里边可以打开报表编辑器，修改一下报表

请问该怎么做

[vip_diablo2]

分不够发帖，借地问个问题，手里有个demo程序源程序，打开项目提示找不到"TDragCheckListBox"这个组件，那么请问哪里能找得到呢？

[7年]

ReportMachine没用过，就像类似于fastreport那样，把编辑报表字段的打开让客户自己弄呗

[wrost]

[Quote=引用 2 楼 的回复:]
ReportMachine没用过，就像类似于fastreport那样，把编辑报表字段的打开让客户自己弄呗
[/Quote]

OK，我搜索下fastreport是怎么弄的

[wrost]

[Quote=引用 2 楼 的回复:]
ReportMachine没用过，就像类似于fastreport那样，把编辑报表字段的打开让客户自己弄呗
[/Quote]

我在网上查了下，还没有搜索到把设计器嵌入到程序里边的方法，请问您怎么做？

[kaikai_kk]

如果用fastreport,frxReport+frxDesigner控件各一个
frxReport.DesignReport;就进入设计器了,可以在程序运行的时候修改报表
修改后的报表若想保存,触发事件是frxDesigner的onSaveReport,可以这里处理

[wrost]

[Quote=引用 5 楼 的回复:]
如果用fastreport,frxReport+frxDesigner控件各一个
frxReport.DesignReport;就进入设计器了,可以在程序运行的时候修改报表
修改后的报表若想保存,触发事件是frxDesigner的onSaveReport,可以这里处理
[/Quote]
恩，谢谢，我也搜索到了
http://topic.csdn.net/t/20060316/11/4618206.html


放一个TfrxDesigner控件

if(OpenDialog1.Execute()) then
begin
frxReport1.Clear;
frxReport1.LoadFromFile(OpenDialog1.FileName);
frxReport1.DesignReport;
end;

[wrost]

[Quote=引用 5 楼 的回复:]
如果用fastreport,frxReport+frxDesigner控件各一个
frxReport.DesignReport;就进入设计器了,可以在程序运行的时候修改报表
修改后的报表若想保存,触发事件是frxDesigner的onSaveReport,可以这里处理
[/Quote]

修改后的报表若想保存,触发事件是frxDesigner的onSaveReport,可以这里处理

请教下，我直接就用的fr3的保存，打印后也正常。 那么什么时候用onSaveReport事件呢？

[kaikai_kk]

按左上角的保存按扭,或者菜单中file->save as就会触发onSaveReport这个事件
就是保存/另存修改过的fr3文件,很简单:

function TFrom1.frxDesigner1SaveReport(Report: TfrxReport;
  SaveAs: Boolean): Boolean;
begin
  if SaveAs then //为true表示file->save as另存
  begin
    if SaveDialog1.Execute then
       Report.SaveToFile(SaveDialog1.FileName);
  end 
  else{...直接保存}  
end;

[wrost]

[Quote=引用 8 楼 的回复:]
按左上角的保存按扭,或者菜单中file->save as就会触发onSaveReport这个事件
就是保存/另存修改过的fr3文件,很简单:

Delphi(Pascal) code

function TFrom1.frxDesigner1SaveReport(Report: TfrxReport;
SaveAs: Boolean): Boolean;
begin
if ……
[/Quote]

thinks！！

[wrost]

现在暂时用不到onSaveReport，还没体会到什么时候用，再说了