FastReport报表预览打印
提示:frxReport1关联预览控件frxPreview1
提示:演示效果如下;可以预览,打印,放大,缩小,另存为PDF
源代码如下
提示:常用报表frxReport1功能
procedure TForm1.Button1Click(Sender: TObject);
begin
Close;
end;
procedure TForm1.FormActivate(Sender: TObject);
begin
frxReport1.ShowReport();
frxPreview1.ZoomMode := zmPageWidth;
end;
procedure TForm1.FormMouseWheel(Sender: TObject; Shift: TShiftState;
WheelDelta: Integer; MousePos: TPoint; var Handled: Boolean);
begin
frxPreview1.MouseWheelScroll(WheelDelta);
end;
procedure TForm1.frxPreview1PageCh