为什么不能报表preview(30分)

我想动态的创建报表窗体
我的click事件是这样的
Form1 := TForm1.Create(self);
Form1.QuickRep1.Preview;
编译时却提示变量QuickRep1没有声明
而我已经uses unit1了
为什么呢？哪位大侠帮帮忙

你的Form1上放了QuickRep1吗？

那当然了
不然报表怎么做出来的

好歹,你的QuickRep也得建立三.你建了吗?我看你上面根本没有建.
Qrp:=TQuickRep.Create(Self);
Qrp.Preview;

啊，quickrep也要建？
quickrep不是在form1里吗
建了form1自然就建了quickrep啊
之前我先用让form1 show
然后在form1上通过preview按钮来实现预览的
这样没有任何问题，就是显示出form1时太难看
而且操作复杂，所以我希望跳过form1的show而直接预览报表

对不起,我看错了.我以为你是完全自动的建立QuickRep,原来你是已经放在表单中了.我试了
一下,没有问题.以下是我的例子.我的QuickRep上没有放任何东西,只是预览.
我想可能是你别的哪儿有问题,你试试最简单的方法看看.
主表单,Form2
unit Unit2;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TForm2 = class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form2: TForm2;
implementation
uses Unit1;
{$R *.dfm}
procedure TForm2.Button1Click(Sender: TObject);
begin
Form1 := TForm1.Create(self);
Form1.QuickRep1.Preview;
end;

end.

报表表单,Form1
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, ExtCtrls, QuickRpt;
type
TForm1 = class(TForm)
QuickRep1: TQuickRep;
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;
implementation
{$R *.dfm}
end.

不会吧，我这么衰
唉，我自己试试象你这样建立报表吧
并看看其他地方有没有问题
多谢大哥
大哥是不是武汉人啊
“好歹,你的QuickRep也得建立三.”撒是武汉的说法
在武汉读了四年书，然后出来工作
看到武汉的说法，觉得好亲切
在下对delphi初学，以后还请多多指教
谢谢你的热心帮助

呵呵,我不是武汉人,不过我对武汉呀很有亲热感呀.武汉话很像家乡话,害得我到武汉时跟他
们说普通话没人能听懂,搬出家乡话结果居然都能听懂.搞得我以为是在四川.呵呵...那是两
年前路过武汉,在那儿呆了将近一天,可惜只是路过黄鹤楼,都没有机会进去看看,好歹伸出车
窗去照了一张照片.
你有问题尽管到这儿来问,既使我帮不上你,也有许多其他的朋友能帮你解决.

你们QuickRep这么用呀,我都是直接把它放到调用它的窗体上,然后,sendtoback让别人看不见
优点: 一,不用再调窗体,直接preview
二, 和操作数据的其它控件如,dbtext,dbgrid共用一个dataset,效率高

楼上的大哥你说的对
但是我觉得这样太混乱了以后修改什么或别人看你代码就有点困难了

zhangkan
我查看了我的代码
我先建了另一个窗体
放了一个按钮
可以预览报表
得出结论，我的原来调用报表的那个窗体有问题
查看了一下
原来犯了一个低级错误
原来声明form1时写错了
var
Form1: TForm1;
写成了
var
Form1:Tform;
BTW:武汉的黄鹤楼没什么可看的
是建国后重新建造的
当初才到武汉的
慕其名，军训期间偷空大老远的从关山口跑到黄鹤楼
去了，结果大失所望
不去也罢