FastReport的打印......(50分)

各位兄弟：
我用FastReport2.4生成了一个frf报表文件（aa.frf）.但不知如何用Button的OnClick
事件去打印它。。。。。

procedure print_report(report_fr:TfrReport);
var
p:TfrPreviewForm;
begin
report_fr.LoadFromFile(root_path+'report/'+'aa.frf');
report_fr.PrepareReport;
report_fr.ModalPreview :=false;
p:=TfrPreviewForm.Create(application);
p.Caption :='打印报表';
p.WindowState:=wsMinimized;
p.Show_Modal(report_fr);
p.PrintBtn.Click;
p.Free;
end;

procedure Tform1.Button1click(sender:Tobject);
begin
report_fr.LoadFromFile(root_path+'report/'+'aa.frf');
report_fr.PrepareReport;
report_fr.printpreparedreport;
end;

在下刚学FastReport，DEMO的例子没看明白。我想先预览再打印。望各位指教。。。。。。

多人接受答案了。