首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > .NET > .NET >

先来先得分+:请问一个相当菜的Quick Report有关问题

2012-03-26 
先来先得分+在线等:请教一个相当菜的Quick Report问题我在窗体里设置了一个QuickRep1,与数据库建立好连接,

先来先得分+在线等:请教一个相当菜的Quick Report问题
我在窗体里设置了一个QuickRep1,与数据库建立好连接,可是非得要QuickRep1.Preview;才出现数据窗口

我想直接在窗体里出现预览结果!!!这如何实现! 够简单吧,我就是做不出来,郁闷

[解决办法]
好像有一个预览组件的
[解决办法]
在Form的OnCreate事件里写入:QuickRep1.Preview;窗口一打开就可以预览了
[解决办法]
或者加QRPreview组件到窗口上,直接在窗口里预览
[解决办法]
在窗体创建时QuickRep1.Preview;
加一个QRPreview
procedure TForm1.QuickRep1Preview(Sender: TObject);
begin
QRPreview1.QRPrinter:=TQRPrinter(Sender);
end;
[解决办法]
在窗体上放QRPreview1,在QRPreview1里放QuickRep1
相关程序如下:
procedure TForm1.QuickRep1Preview(Sender: TObject);
begin
QRPreview1.QRPrinter:=TQRPrinter(Sender);
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
QuickRep1.Visible:=false;
end;

procedure TForm1.ToolButton2Click(Sender: TObject);
begin
QRPreview1.ZoomToFit;
end;

procedure TForm1.ToolButton3Click(Sender: TObject);
begin
  
QuickRep1.Preview;
end;
procedure TForm1.QRPreview1PageAvailable(Sender: TObject;
PageNum: Integer);
begin
statusbar1.simpletext:='共'+inttostr(pagenum)+'页,第'+inttostr(qrpreview1.pagenumber)+'页';
end;

热点排行