在FastReport中怎么判断是否已打印

[ncwuhh]

在FastReport的预览状态下如果用户单击了“打印”则弹出一提示信息,"close"的话则不做任何处理。现在的问题是怎么捕获它的“打印”状态。
用 if frxReport1.IsPrinting then
showmessage('message'); 好像不行。

[hqhhh]

可能不是太好设置

不过你可以设置两个按钮，一个是预览，另一个是打印！然后分别处理！

[Dreamnest]

在一个地方保存打印的次数不就行了吗？
每次打印前就去检查打印的次数

[dd_zhouqian]

close不允许处理退出窗口，你再close事件中写一下

[人鱼传说]

建立设立两个按钮,一个直接打印,一直预览,直接打印可以用上打印编号,预览时不用编号

[LWH008]

我也正为此事犯愁，目的就是要记录打印次数。楼上的那些方法可以借鉴，但感觉还不是很理想。
继续关注......

[人鱼传说]

如果你只想记录打印次数就不用两个按钮了,fastreport我不知如何处理,但quickreport里有一个onafterprint事件,你可以写入打印记数据语句,这样可以满面足你记录打印数量的要求,但你要自动编号并打印出来的话,可能就要将预览和打印分开了

[LWH008]

TO baronyang(魔蝎):
Fastreport也是有一个AfterPrint,可是预览时它也算是print了,我想捕捉的是真正送住打印机.

[ncwuhh]

问题已解决，多谢各位大虾的参与。
以下是我解决的方法，供参考，有更好方法者请多多指教。
1.在程序里新增一个预览窗体"FrmRepView"在该窗体上拖放"frxPreview1"(供打印时调用)
2.在预览窗体中添加功能按钮(如：打开，保存，打印.....)
3.代码
在打印按钮的单击事件中：
PrintFlag := 1;//打印标识
frxPreview1.Print;
调用方法:
s := 'FilePath';
frxReport1.LoadFromFile(s);
if FrmRepView=nil then FrmRepView:=TFrmRepView.Create(nil);
frxReport1.Preview := FrmRepView.frxPreview1;
if frxReport1.PrepareReport then
begin
frxReport1.ShowPreparedReport;
FrmRepView.ShowModal;
end;

本人用的是FastReport3.0