FastReport的直接列引(100分)

S

snowtop

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-04-26

• #1

想知道直接打印的方法是什么,不用通过打印预览,直接发送到打印机.

 

L

luzhouman

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-04-26

• #2

Report.PrepareReport();
Report.Print;

 

S

snowtop

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-04-26

• #3

frReport沒有Print方法吧

 

S

szlbz

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-04-26

• #4

自己修改源码，加了Print方法，其中就是加以下2行：
Report.PrepareReport();
Report.Print;

 

D

delfier

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-04-26

• #5

if FrxReport.PrepareReport then
FrxReport.Print;

 

S

snowtop

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-04-26

• #6

我用的是fastreport中的frReport控件
frReport.ShowReport可以預覽報表然後點打印,但是我想不用預覽就能直接打印

 

G

guth

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-04-26

• #7

luzhouman的方法正确！

 

蓝

蓝叶菱

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-04-26

• #8

我给你一个函数，版本FR 2.7
printpreview(frxreport);
//就可以了。
procedure TDMReport.PrintPreview(AFrReport: TfrReport);
var
Pages:String;
Copies:Integer;
Collate:Boolean;
PrintPages:TfrPrintPages;
begin
try
Pages:='';
Copies:=1;
Collate:=True;
PrintPages:=frAll;
AFrReport.PrepareReport;
AFrReport.PrintPreparedReport(Pages,Copies,Collate,PrintPages);
except
ErrMessage('初始化打印程序失败，请检查打印机或者打印机驱动程序的安装情况！');
Exit;
end;
end;

 

S

snowtop

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-04-26

• #9

接受答案了.