为什么会出现设计报表的窗体 ？？(50分)

L

ltqlyy125

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-17

• #1

我打印时，通过动态创建打印窗体，再进入预览窗体。代码是 ：
procedure Tfbjzd.BitBtn3Click(Sender: TObject);
var
rfbjdy:trfbjdy;
begin
inherited;
rfbjdy:=trfbjdy.Create(application);//
rfbjdy为设计报表的窗体
rfbjdy.QuickRep1.Preview;
end;
为什么会出现设计报表的窗体 ？？
怎么不让它出现？我只想出现预览窗体呀！！

 

T

t365

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-17

• #2

把application改成nil试试

 

D

dfan2000

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-17

• #3

试试下面的代码
implementation
uses rfbjdyUnit;
//引用报表窗体
{$R *.dfm}
procedure Tfbjzd.BitBtn3Click(Sender: TObject);
//var
//rfbjdy:trfbjdy;
//不必定义变量
begin
inherited;
rfbjdy:=trfbjdy.Create(application);// rfbjdy为设计报表的窗体
rfbjdy.QuickRep1.Preview;
end;

 

L

ltqlyy125

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-22

• #4

多人接受答案了。